36 lines
491 B
Plaintext
36 lines
491 B
Plaintext
|
#include "ve6100a.h"
|
||
|
|
|
||
|
|
PAGE "COntabilizzazione" -1 -1 70 15
|
||
|
|
|
||
|
|
STRING F_CODICE_ELAB 8
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 1 "Codice elaborazione differita "
|
||
|
|
FLAG "U"
|
||
|
|
USE %ELD
|
||
|
|
INPUT CODTAB F_CODICE_ELAB
|
||
|
|
DISPLAY "Codice" CODTAB
|
||
|
|
DISPLAY "Descrizione@50" S0
|
||
|
|
OUTPUT F_CODICE_ELAB CODTAB
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
END
|
||
|
|
|
||
|
|
DATE F_DATA_REG
|
||
|
|
BEGIN
|
||
|
|
PROMPT 3 2 "Data registrazione "
|
||
|
|
FLAG "A"
|
||
|
|
END
|
||
|
|
|
||
|
|
BUTTON DLG_OK 10 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT -12 -1 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
BUTTON DLG_CANCEL 10 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT -22 -1 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
ENDMASK
|