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 1995-04-21 09:04:26 +00:00
parent aa4f1d2951
commit 0cfe28a61f
2 changed files with 82 additions and 82 deletions

View File

@ -240,7 +240,7 @@ OUTPUT F_PROVCF PROVCOM
HELP "Codice del comune del recapito" HELP "Codice del comune del recapito"
CHECKTYPE NORMAL CHECKTYPE NORMAL
WARNING "Comune assente" WARNING "Comune assente"
ADD ba4 -0 ADD RUN ba4 -0
END END
STRING F_DENCOMCF 50 STRING F_DENCOMCF 50
@ -253,7 +253,7 @@ DISPLAY "Stato" STATO
DISPLAY "Codice" COM DISPLAY "Codice" COM
COPY OUTPUT F_COMCF COPY OUTPUT F_COMCF
HELP "Nome del comune del recapito" HELP "Nome del comune del recapito"
ADD ba4 -0 ADD RUN ba4 -0
END END
LIST F_TIPOPERS 1 11 LIST F_TIPOPERS 1 11
@ -540,7 +540,7 @@ OUTPUT F_DENCOMNASC DENCOM
HELP "Codice del comune di nascita del cliente/fornitore" HELP "Codice del comune di nascita del cliente/fornitore"
CHECKTYPE NORMAL CHECKTYPE NORMAL
WARNING "Comune assente" WARNING "Comune assente"
ADD ba4 -0 ADD RUN ba4 -0
END END
STRING F_DENCOMNASC 50 STRING F_DENCOMNASC 50
@ -552,7 +552,7 @@ INPUT DENCOM F_DENCOMNASC
COPY DISPLAY F_DENCOMCF COPY DISPLAY F_DENCOMCF
COPY OUTPUT F_COMNASC COPY OUTPUT F_COMNASC
HELP "Nome del comune di nascita" HELP "Nome del comune di nascita"
ADD ba4 -0 ADD RUN ba4 -0
END END
ENDPAGE ENDPAGE

View File

@ -4,151 +4,151 @@ PAGE "" -1 -1 76 16
STRING F_RAGSOCI 50 STRING F_RAGSOCI 50
BEGIN BEGIN
PROMPT 1 2 "Rag. soc. " PROMPT 1 2 "Rag. soc. "
HELP "Ragione sociale del cliente/fornitore" HELP "Ragione sociale del cliente/fornitore"
GROUP 1 GROUP 1
END END
STRING F_INDIRI 35 STRING F_INDIRI 35
BEGIN BEGIN
PROMPT 1 4 "Indirizzo " PROMPT 1 4 "Indirizzo "
HELP "Indirizzo del cliente/fornitore" HELP "Indirizzo del cliente/fornitore"
GROUP 1 GROUP 1
END END
STRING F_CIVI 10 STRING F_CIVI 10
BEGIN BEGIN
PROMPT 54 4 "N. " PROMPT 54 4 "N. "
HELP "Numero civico del cliente/fornitore" HELP "Numero civico del cliente/fornitore"
GROUP 1 GROUP 1
END END
STRING F_LOCALI 35 STRING F_LOCALI 35
BEGIN BEGIN
PROMPT 1 5 "Localita " PROMPT 1 5 "Localita "
HELP "Localita' di residenza del C/F" HELP "Localita' di residenza del C/F"
GROUP 1 GROUP 1
END END
STRING F_CAPI 5 STRING F_CAPI 5
BEGIN BEGIN
PROMPT 54 5 "CAP " PROMPT 54 5 "CAP "
HELP "Codice di Avviamento Postale del C/F" HELP "Codice di Avviamento Postale del C/F"
GROUP 1 GROUP 1
END END
NUMBER F_STATOI 3 NUMBER F_STATOI 3
BEGIN BEGIN
PROMPT 1 6 "Stato " PROMPT 1 6 "Stato "
FLAGS "RZ" FLAGS "RZ"
USE %STA USE %STA
INPUT CODTAB F_STATOI INPUT CODTAB F_STATOI
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Stato@50" S0 DISPLAY "Stato@50" S0
OUTPUT F_STATOI CODTAB OUTPUT F_STATOI CODTAB
CHECKTYPE NORMAL CHECKTYPE NORMAL
WARNING "Stato assente" WARNING "Stato assente"
HELP "Codice dello stato del cliente/fornitore" HELP "Codice dello stato del cliente/fornitore"
GROUP 1 GROUP 1
END END
STRING F_COMI 4 STRING F_COMI 4
BEGIN BEGIN
PROMPT 18 6 "Comune " PROMPT 18 6 "Comune "
FLAGS "U" FLAGS "U"
USE LF_COMUNI USE LF_COMUNI
INPUT STATO 106 INPUT STATO 106
INPUT COM 107 INPUT COM 107
DISPLAY "Stato" STATO DISPLAY "Stato" STATO
DISPLAY "Codice" COM DISPLAY "Codice" COM
DISPLAY "Comune@50" DENCOM DISPLAY "Comune@50" DENCOM
OUTPUT F_CAPI CAPCOM OUTPUT F_CAPI CAPCOM
OUTPUT F_STATOI STATO OUTPUT F_STATOI STATO
OUTPUT F_COMI COM OUTPUT F_COMI COM
OUTPUT F_DENCOMI DENCOM OUTPUT F_DENCOMI DENCOM
CHECKTYPE NORMAL CHECKTYPE NORMAL
WARNING "Comune assente" WARNING "Comune assente"
ADD ba4 -0 ADD RUN ba4 -0
HELP "Codice del comune del cliente/fornitore" HELP "Codice del comune del cliente/fornitore"
GROUP 1 GROUP 1
END END
STRING F_DENCOMI 40 STRING F_DENCOMI 40
BEGIN BEGIN
PROMPT 33 6 "" PROMPT 33 6 ""
HELP "Nome del comne del ciente/fornitore" HELP "Nome del comne del ciente/fornitore"
USE LF_COMUNI KEY 2 USE LF_COMUNI KEY 2
INPUT DENCOM F_DENCOMI INPUT DENCOM F_DENCOMI
DISPLAY "Comune@50" DENCOM DISPLAY "Comune@50" DENCOM
DISPLAY "Stato" STATO DISPLAY "Stato" STATO
DISPLAY "Codice" COM DISPLAY "Codice" COM
COPY OUTPUT F_COMI COPY OUTPUT F_COMI
CHECKTYPE NORMAL CHECKTYPE NORMAL
ADD ba4 -0 ADD RUN ba4 -0
GROUP 1 GROUP 1
END END
GROUPBOX DLG_NULL 72 4 GROUPBOX DLG_NULL 72 4
BEGIN BEGIN
PROMPT 1 8 "Numeri Telefonici" PROMPT 1 8 "Numeri Telefonici"
END END
STRING F_PTELI 10 STRING F_PTELI 10
BEGIN BEGIN
PROMPT 2 9 "Telefono " PROMPT 2 9 "Telefono "
HELP "Prefisso del numero di telefono" HELP "Prefisso del numero di telefono"
GROUP 1 GROUP 1
END END
STRING F_TELI 30 STRING F_TELI 30
BEGIN BEGIN
PROMPT 40 9 "" PROMPT 40 9 ""
HELP "Numero di telefono del cliente/fornitore" HELP "Numero di telefono del cliente/fornitore"
GROUP 1 GROUP 1
END END
STRING F_PFAXI 10 STRING F_PFAXI 10
BEGIN BEGIN
PROMPT 2 10 "Fax " PROMPT 2 10 "Fax "
HELP "Prefisso del numero di fax" HELP "Prefisso del numero di fax"
GROUP 1 GROUP 1
END END
STRING F_FAXI 30 STRING F_FAXI 30
BEGIN BEGIN
PROMPT 40 10 "" PROMPT 40 10 ""
HELP "Numero di fax del cliente/fornitore" HELP "Numero di fax del cliente/fornitore"
GROUP 1 GROUP 1
END END
BOOLEAN F_IVARIDI BOOLEAN F_IVARIDI
BEGIN BEGIN
PROMPT 2 13 "Riduzione IVA" PROMPT 2 13 "Riduzione IVA"
HELP "Indicare se Š soggetto a riduzione IVA" HELP "Indicare se Š soggetto a riduzione IVA"
GROUP 1 GROUP 1
END END
NUMBER F_CODINDI 3 NUMBER F_CODINDI 3
BEGIN BEGIN
PROMPT 1 1 "Codice " PROMPT 1 1 "Codice "
FLAGS "D" FLAGS "D"
END END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2
BEGIN BEGIN
PROMPT -13 -1 "" PROMPT -13 -1 ""
END END
BUTTON DLG_CANCEL 9 2 BUTTON DLG_CANCEL 9 2
BEGIN BEGIN
PROMPT -23 -1 "" PROMPT -23 -1 ""
END END
BUTTON DLG_NULL 9 2 BUTTON DLG_NULL 9 2
BEGIN BEGIN
PROMPT -33 -1 "A~zzera" PROMPT -33 -1 "A~zzera"
MESSAGE RESET,1@ MESSAGE RESET,1@
MESSAGE EXIT,K_ENTER MESSAGE EXIT,K_ENTER
END END
ENDPAGE ENDPAGE