problems with tui forms (.per) with interval field defined like database field
Øyvind Gjerstad <[email protected]>
| Newsgroups | gmane.comp.lang.4gl.aubit.general |
|---|---|
| Message-ID | <[email protected]> |
I am unable to input interval values in a form when the form field is defined like a database column with interval type. If I change the definition in the form to "interval day to minute" it works, but if I use "like testtable.interval_field" in the form definition I get "error in field" whatever I input (at runtime). The form itself compiles just fine in bot cases. Given a database called 'test' with this table: create table testtable (interval_field interval day to hour); and the attached form and 4gl program, this can be easlily reproduced Is this a known bug? Are there workarounds (other than changing the form field definitions)? -- *Øyvind Gjerstad * Systemkonsulent M +47 909 41 485 [email protected] <mailto:[email protected]> *____________________ _* *PostNord AS * T +47 09300 IT og Forretningsutvikling Øran Vest Postboks 100 6301 Åndalsnes www.postnord.no <http://www.postnord.no> ------------------------------------------------------------------------------ Site24x7 APM Insight: Get Deep Visibility into Application Performance APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month Monitor end-to-end web transactions and take corrective actions now Troubleshoot faster and improve end-user experience. Signup Now! http://pubads.g.doubleclick.net/gampad/clk?id=272487151&iu=/4140 _______________________________________________ Aubit4gl-discuss mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
foo.4gl
(text/plain, 417 B)
database test
main
define p_tst interval day to minute,
p_dummy char(1),
p_minutes interval minute(3) to minute
open form f_test from "foo"
display form f_test
while true
input p_tst
from formonly.tst
let p_minutes = p_tst
display p_minutes to formonly.resultat
input p_dummy from formonly.dummy
if p_dummy = "q" then
exit while
end if
end while
end main
foo.per
(text/plain, 469 B)
database test
screen
{
----------------------------- test av interval input --------------------------
Oppgi et intervall: [f000 ]
Du har oppgitt: [f001 ]
[c]
}
END
TABLES
testtable
ATTRIBUTES
f000=formonly.tst type like testtable.interval_field, required;
f001=FORMONLY.resultat TYPE char(10), noentry;
c=formonly.dummy type char(1);
INSTRUCTIONS
DELIMITERS "[]"
END