94 lines
1.4 KiB
Plaintext
Executable File
94 lines
1.4 KiB
Plaintext
Executable File
// DEFINIZIONE MASCHERE, PER RIGHE DISTINTA, PER LA GESTIONE DISTINTE
|
|
#include "ef0300.h"
|
|
|
|
PAGE "Righe Distinta" -1 -1 63 13
|
|
|
|
BOOLEAN F_CHECK
|
|
BEGIN
|
|
PROMPT 2 1 "Selezionato "
|
|
END
|
|
|
|
NUMBER F_NRIBA 7
|
|
BEGIN
|
|
PROMPT 2 2 "Numero RiBa "
|
|
FIELD LF_EFFETTI->NPROGTR
|
|
FLAGS "D"
|
|
END
|
|
|
|
DATA F_SCAD
|
|
BEGIN
|
|
PROMPT 2 3 "Scadenza "
|
|
FIELD LF_EFFETTI->DATASCAD
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_CLIENTE 50 40
|
|
BEGIN
|
|
PROMPT 2 4 "Cliente "
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_NFATT 7
|
|
BEGIN
|
|
PROMPT 2 5 "Numero Fatt. "
|
|
FIELD LF_REFFETTI->NFATT
|
|
FLAGS "D"
|
|
END
|
|
|
|
DATA F_DATAFATT
|
|
BEGIN
|
|
PROMPT 2 6 "Data Fattura "
|
|
FIELD LF_REFFETTI->DATAFATT
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMBER F_NRATA 3
|
|
BEGIN
|
|
PROMPT 2 7 "Numero Rata "
|
|
FIELD LF_REFFETTI->NRATA
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_VALUTA 3
|
|
BEGIN
|
|
PROMPT 2 8 "Valuta "
|
|
FIELD LF_EFFETTI->CODVAL
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMBER F_IMPORTO 18 2
|
|
BEGIN
|
|
PROMPT 2 9 "Importo "
|
|
FIELD LF_EFFETTI->IMPORTO
|
|
PICTURE "###.###.###.###,@@"
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMBER F_IMPORTOVAL 18 3
|
|
BEGIN
|
|
PROMPT 2 10 "Importo Val. "
|
|
FIELD LF_EFFETTI->IMPORTOVAL
|
|
PICTURE "###.###.###.###,@@@"
|
|
FLAGS "D"
|
|
END
|
|
|
|
BUTTON DLG_OK 9 2
|
|
BEGIN
|
|
PROMPT -13 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 9 2
|
|
BEGIN
|
|
PROMPT -23 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_DELREC 9 2
|
|
BEGIN
|
|
PROMPT -33 -1 "Elimina"
|
|
MESSAGE EXIT, K_DEL
|
|
FLAGS "H"
|
|
END
|
|
|
|
ENDPAGE
|
|
ENDMASK
|