root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Aggiunte segnalazioni di errore

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@615 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-11-14 12:05:23 +00:00
parent b38d92678d
commit 00b86d414e
3 changed files with 12 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ba/ba4200b.uml
View File

@ -529,6 +529,7 @@ BEGIN
CHECKTYPE NORMAL
ADD MASK ba4100a
VALIDATE EMPTYCOPY_FUNC FLD_AF1_COMRES
WARNING "Comune assente"
END
STRING FLD_AF2_COMCORR_COMUNI_PROVCOM 5

19
ba/ba4200c.uml
View File

@ -112,14 +112,14 @@ BEGIN
FLAGS "U"
HELP "Codice fiscale della persona giuridica"
VALIDATE CF_FUNC FLD_AG1_STATOPAIV
USE LF_ANAG KEY 3
INPUT TIPOA "G"
INPUT COFI FLD_AG1_COFI
DISPLAY "Codice Fiscale@16" COFI
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Codice" CODANAGR
COPY OUTPUT FLD_CODANAGR
CHECKTYPE REQUIRED
USE LF_ANAG KEY 3
INPUT TIPOA "G"
INPUT COFI FLD_AG1_COFI
DISPLAY "Codice Fiscale@16" COFI
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Codice" CODANAGR
COPY OUTPUT FLD_CODANAGR
CHECKTYPE REQUIRED
KEY 3
END
@ -431,7 +431,7 @@ END
STRING FLD_AG2_COMCORR 4
BEGIN
PROMPT 9 7 ": Codice "
FIELD LF_ANAG->COMCORR
FIELD LF_ANAG->COMCORR
FLAGS "U"
COPY USE FLD_AG2_COMRES
INPUT STATO FLD_AG2_STATOCORR
@ -445,6 +445,7 @@ BEGIN
HELP "Codice del comune a cui mandare la corrispondenza"
CHECKTYPE NORMAL
VALIDATE EMPTYCOPY_FUNC FLD_AG2_COMRES
WARNING "Comune assente"
ADD MASK ba4100a
END

1
ba/ba4300a.uml
View File

@ -90,6 +90,7 @@ BEGIN
OUTPUT FLD_GD1_CODDITTA CODDITTA
OUTPUT FLD_GD1_RAGSOC RAGSOC
HELP "Ragione sociale della ditta"
WARNING "La ragione sociale e' obbligatoria"
CHECKTYPE REQUIRED
FLAGS "G"
MESSAGE COPY,2@