| User interface / Record input | |
The INPUT statement supports data entry into the fields of the current form.
INPUT BY NAME { variable | record.* } [,...]
[ WITHOUT DEFAULTS ]
[ ATTRIBUTES (
{ display-attribute
| control-attribute
} [,...] ) ]
[ HELP help-number ]
[ dialog-control-block
[...]
END INPUT ]
INPUT { variable | record.* } [,...]
[ WITHOUT DEFAULTS ]
FROM
field-list
[ ATTRIBUTES (
{ display-attribute
| control-attribute
} [,...] ) ]
[ HELP help-number ]
[ dialog-control-block
[...]
END INPUT ]
{ BEFORE INPUT
| AFTER INPUT
| BEFORE FIELD field-spec [,...]
| AFTER FIELD field-spec [,...]
| ON CHANGE field-spec [,...]
| ON IDLE idle-seconds
| ON ACTION action-name [INFIELD field-spec]
| ON KEY ( key-name [,...] )
}
dialog-statement
[...]
{ statement
| ACCEPT INPUT
| CONTINUE INPUT
| EXIT INPUT
| NEXT FIELD
{ CURRENT
| NEXT
| PREVIOUS
| field-spec
}
}
{ field-name
| table-name.*
| table-name.field-name
| screen-array[line].*
| screen-array[line].field-name
| screen-record.*
| screen-record.field-name
} [,...]
{ field-name
| table-name.field-name
| screen-array.field-name
| screen-record.field-name
}
{ BLACK | BLUE | CYAN | GREEN
| MAGENTA | RED | WHITE | YELLOW
| BOLD | DIM | INVISIBLE | NORMAL
| REVERSE | BLINK | UNDERLINE
}
where control-attribute is:{ ACCEPT [ = boolean ]
| CANCEL [ = boolean ]
| FIELD ORDER FORM
| HELP = help-number
| NAME = "dialog-name"
| UNBUFFERED [ = boolean ]
| WITHOUT DEFAULTS [ = boolean ]
}