105 lines
1.8 KiB
Plaintext
Executable File
105 lines
1.8 KiB
Plaintext
Executable File
// DEFINIZIONE MASCHERA, DELLO SHEET DELLE RIGHE EFFETTO, PER LA GESTIONE EFFETTI
|
|
#include "ef0100.h"
|
|
|
|
PAGE "Righe Effetto" -1 -1 76 16
|
|
|
|
NUMBER F_IMPFATT 20 2
|
|
BEGIN
|
|
PROMPT 2 1 "Importo fattura "
|
|
PICTURE "###.###.###.###,@@"
|
|
END
|
|
|
|
NUMBER F_IMPEFF 14 2
|
|
BEGIN
|
|
PROMPT 2 2 "Importo effett. "
|
|
PICTURE "###.###.###,@@"
|
|
NUM_EXPR #F_IMPFATT>=#F_IMPEFF
|
|
WARNING "L'importo dell'effetto non puo' superare l'importo della fattura"
|
|
END
|
|
|
|
NUMBER F_IMPFATTVAL 20 3
|
|
BEGIN
|
|
PROMPT 2 3 "Imp. fatt. val "
|
|
PICTURE "###.###.###.###,@@@"
|
|
END
|
|
|
|
NUMBER F_IMPEFFVAL 15 3
|
|
BEGIN
|
|
PROMPT 2 4 "Imp. effet. val "
|
|
PICTURE "###.###.###,@@@"
|
|
NUM_EXPR #F_IMPFATTVAL>=#F_IMPEFFVAL
|
|
WARNING "L'importo dell'effetto in valuta non puo' superare l'importo della fattura in valuta"
|
|
END
|
|
|
|
NUMBER F_ANNO 4
|
|
BEGIN
|
|
PROMPT 2 5 "Anno partita "
|
|
END
|
|
|
|
STRING F_NUMPART 7
|
|
BEGIN
|
|
PROMPT 2 6 "Nr. partita "
|
|
FLAG "R"
|
|
END
|
|
|
|
NUMBER F_NUMRIGA 4
|
|
BEGIN
|
|
PROMPT 2 7 "Nr. riga "
|
|
END
|
|
|
|
NUMBER F_NUMRATA 3
|
|
BEGIN
|
|
PROMPT 2 8 "Nr. rata "
|
|
END
|
|
|
|
LIST F_PROVV 13
|
|
BEGIN
|
|
PROMPT 2 9 "Tipo numerazione "
|
|
FIELD LF_REFFETTI->PROVV
|
|
ITEM "D|Definitiva"
|
|
ITEM "P|Provvisoria"
|
|
END
|
|
|
|
STRING F_CODNUM 4
|
|
BEGIN
|
|
PROMPT 2 10 "Codice numeraz. "
|
|
FIELD LF_REFFETTI->CODNUM
|
|
END
|
|
|
|
NUMBER F_ANNODOC 4
|
|
BEGIN
|
|
PROMPT 2 11 "Anno documento "
|
|
FIELD LF_REFFETTI->ANNODOC
|
|
END
|
|
|
|
STRING F_NUMFATT 7
|
|
BEGIN
|
|
PROMPT 2 12 "Nr. fattura "
|
|
FLAG "R"
|
|
END
|
|
|
|
DATA F_DATAFATT
|
|
BEGIN
|
|
PROMPT 2 13 "Data fattura "
|
|
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
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|