Corretta ADD ba4 -0 in ADD RUN ba4 -0
git-svn-id: svn://10.65.10.50/trunk@1287 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
aa4f1d2951
commit
0cfe28a61f
@ -240,7 +240,7 @@ OUTPUT F_PROVCF PROVCOM
|
||||
HELP "Codice del comune del recapito"
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
ADD ba4 -0
|
||||
ADD RUN ba4 -0
|
||||
END
|
||||
|
||||
STRING F_DENCOMCF 50
|
||||
@ -253,7 +253,7 @@ DISPLAY "Stato" STATO
|
||||
DISPLAY "Codice" COM
|
||||
COPY OUTPUT F_COMCF
|
||||
HELP "Nome del comune del recapito"
|
||||
ADD ba4 -0
|
||||
ADD RUN ba4 -0
|
||||
END
|
||||
|
||||
LIST F_TIPOPERS 1 11
|
||||
@ -478,7 +478,7 @@ OUTPUT F_RAGSOC1 RAGSOC
|
||||
HELP "Codice anagrafico percepiente per la compilazione Mod. 770"
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Percipiente assente"
|
||||
ADD RUN ba4 -1
|
||||
ADD RUN ba4 -1
|
||||
END
|
||||
|
||||
STRING F_RAGSOC1 50
|
||||
@ -540,7 +540,7 @@ OUTPUT F_DENCOMNASC DENCOM
|
||||
HELP "Codice del comune di nascita del cliente/fornitore"
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
ADD ba4 -0
|
||||
ADD RUN ba4 -0
|
||||
END
|
||||
|
||||
STRING F_DENCOMNASC 50
|
||||
@ -552,7 +552,7 @@ INPUT DENCOM F_DENCOMNASC
|
||||
COPY DISPLAY F_DENCOMCF
|
||||
COPY OUTPUT F_COMNASC
|
||||
HELP "Nome del comune di nascita"
|
||||
ADD ba4 -0
|
||||
ADD RUN ba4 -0
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
154
cg/cg0200b.uml
154
cg/cg0200b.uml
@ -4,151 +4,151 @@ PAGE "" -1 -1 76 16
|
||||
|
||||
STRING F_RAGSOCI 50
|
||||
BEGIN
|
||||
PROMPT 1 2 "Rag. soc. "
|
||||
HELP "Ragione sociale del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 1 2 "Rag. soc. "
|
||||
HELP "Ragione sociale del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_INDIRI 35
|
||||
BEGIN
|
||||
PROMPT 1 4 "Indirizzo "
|
||||
HELP "Indirizzo del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 1 4 "Indirizzo "
|
||||
HELP "Indirizzo del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_CIVI 10
|
||||
BEGIN
|
||||
PROMPT 54 4 "N. "
|
||||
HELP "Numero civico del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 54 4 "N. "
|
||||
HELP "Numero civico del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_LOCALI 35
|
||||
BEGIN
|
||||
PROMPT 1 5 "Localita "
|
||||
HELP "Localita' di residenza del C/F"
|
||||
GROUP 1
|
||||
PROMPT 1 5 "Localita "
|
||||
HELP "Localita' di residenza del C/F"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_CAPI 5
|
||||
BEGIN
|
||||
PROMPT 54 5 "CAP "
|
||||
HELP "Codice di Avviamento Postale del C/F"
|
||||
GROUP 1
|
||||
PROMPT 54 5 "CAP "
|
||||
HELP "Codice di Avviamento Postale del C/F"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
NUMBER F_STATOI 3
|
||||
BEGIN
|
||||
PROMPT 1 6 "Stato "
|
||||
FLAGS "RZ"
|
||||
USE %STA
|
||||
INPUT CODTAB F_STATOI
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Stato@50" S0
|
||||
OUTPUT F_STATOI CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Stato assente"
|
||||
HELP "Codice dello stato del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 1 6 "Stato "
|
||||
FLAGS "RZ"
|
||||
USE %STA
|
||||
INPUT CODTAB F_STATOI
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Stato@50" S0
|
||||
OUTPUT F_STATOI CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Stato assente"
|
||||
HELP "Codice dello stato del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_COMI 4
|
||||
BEGIN
|
||||
PROMPT 18 6 "Comune "
|
||||
FLAGS "U"
|
||||
USE LF_COMUNI
|
||||
INPUT STATO 106
|
||||
INPUT COM 107
|
||||
DISPLAY "Stato" STATO
|
||||
DISPLAY "Codice" COM
|
||||
DISPLAY "Comune@50" DENCOM
|
||||
OUTPUT F_CAPI CAPCOM
|
||||
OUTPUT F_STATOI STATO
|
||||
OUTPUT F_COMI COM
|
||||
OUTPUT F_DENCOMI DENCOM
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
ADD ba4 -0
|
||||
HELP "Codice del comune del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 18 6 "Comune "
|
||||
FLAGS "U"
|
||||
USE LF_COMUNI
|
||||
INPUT STATO 106
|
||||
INPUT COM 107
|
||||
DISPLAY "Stato" STATO
|
||||
DISPLAY "Codice" COM
|
||||
DISPLAY "Comune@50" DENCOM
|
||||
OUTPUT F_CAPI CAPCOM
|
||||
OUTPUT F_STATOI STATO
|
||||
OUTPUT F_COMI COM
|
||||
OUTPUT F_DENCOMI DENCOM
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
ADD RUN ba4 -0
|
||||
HELP "Codice del comune del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_DENCOMI 40
|
||||
BEGIN
|
||||
PROMPT 33 6 ""
|
||||
HELP "Nome del comne del ciente/fornitore"
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_DENCOMI
|
||||
DISPLAY "Comune@50" DENCOM
|
||||
DISPLAY "Stato" STATO
|
||||
DISPLAY "Codice" COM
|
||||
COPY OUTPUT F_COMI
|
||||
CHECKTYPE NORMAL
|
||||
ADD ba4 -0
|
||||
GROUP 1
|
||||
PROMPT 33 6 ""
|
||||
HELP "Nome del comne del ciente/fornitore"
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_DENCOMI
|
||||
DISPLAY "Comune@50" DENCOM
|
||||
DISPLAY "Stato" STATO
|
||||
DISPLAY "Codice" COM
|
||||
COPY OUTPUT F_COMI
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN ba4 -0
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 72 4
|
||||
BEGIN
|
||||
PROMPT 1 8 "Numeri Telefonici"
|
||||
PROMPT 1 8 "Numeri Telefonici"
|
||||
END
|
||||
|
||||
STRING F_PTELI 10
|
||||
BEGIN
|
||||
PROMPT 2 9 "Telefono "
|
||||
HELP "Prefisso del numero di telefono"
|
||||
GROUP 1
|
||||
PROMPT 2 9 "Telefono "
|
||||
HELP "Prefisso del numero di telefono"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_TELI 30
|
||||
BEGIN
|
||||
PROMPT 40 9 ""
|
||||
HELP "Numero di telefono del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 40 9 ""
|
||||
HELP "Numero di telefono del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_PFAXI 10
|
||||
BEGIN
|
||||
PROMPT 2 10 "Fax "
|
||||
HELP "Prefisso del numero di fax"
|
||||
GROUP 1
|
||||
PROMPT 2 10 "Fax "
|
||||
HELP "Prefisso del numero di fax"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FAXI 30
|
||||
BEGIN
|
||||
PROMPT 40 10 ""
|
||||
HELP "Numero di fax del cliente/fornitore"
|
||||
GROUP 1
|
||||
PROMPT 40 10 ""
|
||||
HELP "Numero di fax del cliente/fornitore"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
BOOLEAN F_IVARIDI
|
||||
BEGIN
|
||||
PROMPT 2 13 "Riduzione IVA"
|
||||
HELP "Indicare se Š soggetto a riduzione IVA"
|
||||
GROUP 1
|
||||
PROMPT 2 13 "Riduzione IVA"
|
||||
HELP "Indicare se Š soggetto a riduzione IVA"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
NUMBER F_CODINDI 3
|
||||
BEGIN
|
||||
PROMPT 1 1 "Codice "
|
||||
FLAGS "D"
|
||||
PROMPT 1 1 "Codice "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -13 -1 ""
|
||||
PROMPT -13 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 9 2
|
||||
BEGIN
|
||||
PROMPT -23 -1 ""
|
||||
PROMPT -23 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_NULL 9 2
|
||||
BEGIN
|
||||
PROMPT -33 -1 "A~zzera"
|
||||
MESSAGE RESET,1@
|
||||
MESSAGE EXIT,K_ENTER
|
||||
PROMPT -33 -1 "A~zzera"
|
||||
MESSAGE RESET,1@
|
||||
MESSAGE EXIT,K_ENTER
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user