campo-sirio/ef/ef0300b.uml
guy 56498e8cc7 Patch level : 10.0 978
Files correlati     : ef0.exe ef0300a.msk ef0300b.msk ef0300c.msk
Ricompilazione Demo : [ ]
Commento            :
0001828: 207043 - Eliwork selezione effetti
Il cliente in oggetto mi segnala che la creazione manuale effetti, oltre agli effetti spuntati ne estrae altri a random.


git-svn-id: svn://10.65.10.50/branches/R_10_00@21943 c028cbd2-c16b-5b4b-a496-9718f37d4682
2011-04-13 13:54:17 +00:00

99 lines
1.5 KiB
Plaintext
Executable File

// DEFINIZIONE MASCHERE, PER RIGHE DISTINTA, PER LA GESTIONE DISTINTE
#include "ef0300.h"
PAGE "Righe Distinta" -1 -1 73 14
BOOLEAN F_CHECK
BEGIN
PROMPT 2 1 "Da eliminare "
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
BEGIN
PROMPT 2 4 "Cliente "
FLAGS "D"
END
STRING F_BANCA 50
BEGIN
PROMPT 2 5 "Banca d'appoggio "
FLAGS "D"
END
NUMBER F_NFATT 7
BEGIN
PROMPT 2 6 "Numero Fattura "
FIELD LF_REFFETTI->NFATT
FLAGS "D"
END
DATA F_DATAFATT
BEGIN
PROMPT 2 7 "Data Fattura "
FIELD LF_REFFETTI->DATAFATT
FLAGS "D"
END
NUMBER F_NRATA 3
BEGIN
PROMPT 2 8 "Numero Rata "
FIELD LF_REFFETTI->NRATA
FLAGS "D"
END
STRING F_VALUTA 3
BEGIN
PROMPT 2 9 "Valuta "
FIELD LF_EFFETTI->CODVAL
FLAGS "D"
END
CURRENCY F_IMPORTO 18
BEGIN
PROMPT 2 10 "Importo "
FIELD LF_EFFETTI->IMPORTO
FLAGS "DR"
END
CURRENCY F_IMPORTOVAL 18
BEGIN
PROMPT 2 11 "Importo Valuta "
FIELD LF_EFFETTI->IMPORTOVAL
FLAGS "DR"
DRIVENBY F_VALUTA
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -13 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -23 -1 ""
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -33 -1 ""
MESSAGE "X",F_CHECK
END
ENDPAGE
ENDMASK