DISLBOX |
Dislbox is used to re-select a record automatically following an unauthorised de-selection.
Dislbox abrev
|
Element |
Description |
Restrictions |
|
abrev |
Abbreviation allocated to this pick box |
|
# replaces a selection or de-selection following checks
$SAIPIC
Boxinp [PIC] Using RESU
Case RESU
When GSTAPIC
Repeat
Pick
[PIC]
Case
status
When 7, 44 : Break
When 37 : Gosub SELECTION
When 41 : Gosub DESELECTION
Endcase
Until 1=0
When GSTAPKF : Goto FIN
When GSTAESC, GSTAFIN : Goto FIN
Endcase
Goto SAIPIC
# de-selects if selection impossible following check
$SELECTION
If ...
Dislbox [PIC]
Endif
Return
# selects if de-selection impossible following check
$DESELECTION
If ...
Setlbox [PIC]
Endif
Return
Dislbox is used to re-select a record automatically following an unauthorised de-selection.
The functional routine concerned must be initiated manually since selection or deselection is ignored by the Pick instruction.
|
Error |
Description |
|
|
|
Treebox - Pickbox - Listbox - Pick - Boxact - Fillbox - Currbox - Setlbox
|
|