campo-sirio/ef/ef0900a.uml
alex a86682531f Patch level : xx.54
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Riportata la versione 01.05 patch 354


git-svn-id: svn://10.65.10.50/trunk@8178 c028cbd2-c16b-5b4b-a496-9718f37d4682
1999-05-24 13:34:11 +00:00

76 lines
1.0 KiB
Plaintext
Executable File

#include "ef0900a.h"
TOOLBAR "" 0 19 0 3
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -11 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -11 ""
END
ENDPAGE
PAGE "Parametri effetti" 1 1 60 14
GROUPBOX DLG_NULL 78 7
BEGIN
PROMPT 1 2 "@bContabilizzazione"
END
STRING F_CAUSALE 3
BEGIN
PROMPT 2 3 "Causale incasso "
FIELD CODCAUS
KEY 1
FLAGS "UZ"
USE LF_CAUSALI
INPUT CODCAUS F_CAUSALE
DISPLAY "Cod." CODCAUS
DISPLAY "Descrizione@50" DESCR
DISPLAY "Documento" TIPODOC
DISPLAY "Registro" REG
OUTPUT F_CAUSALE CODCAUS
CHECKTYPE NORMAL
END
STRING F_DESCINC 25
BEGIN
PROMPT 30 3 "Descrizione movimento "
FIELD DESCINC
END
STRING F_CAUSALE_PAG 3
BEGIN
PROMPT 2 5 "Causale pagamento "
FIELD CODCAUSPAG
KEY 1
FLAGS "UZ"
COPY USE F_CAUSALE
INPUT CODCAUS F_CAUSALE_PAG
COPY DISPLAY F_CAUSALE
OUTPUT F_CAUSALE_PAG CODCAUS
CHECKTYPE NORMAL
END
STRING F_DESCPAG 25
BEGIN
PROMPT 30 5 "Descrizione movimento "
FIELD DESCPAG
END
STRING F_CODSIA 5
BEGIN
PROMPT 2 7 "Codice SIA "
FLAGS "Z"
FIELD CODSIA
END
ENDPAGE
ENDMASK