campo-sirio/ef/ef0300b.uml
paola 1a6c398836 Finito prototipo programma gestione distinte
git-svn-id: svn://10.65.10.50/trunk@3920 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-11-22 17:17:26 +00:00

93 lines
1.4 KiB
Plaintext
Executable File

#include "ef0300.h"
PAGE "Righe Distinta" -1 -1 76 13
LISTBOX F_CHECK 5
BEGIN
PROMPT 2 1 "Selezionato "
ITEM " |FALSE"
ITEM "X|TRUE"
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
FLAGS "D"
END
NUMBER F_IMPORTOVAL 18 3
BEGIN
PROMPT 2 9 "Importo Val. "
FIELD LF_EFFETTI->IMPORTOVAL
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