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

Correzioni ad errori segnalati dalla gabriella

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@346 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-10-11 15:21:42 +00:00
parent fab69434f7
commit 03379dd57f
1 changed files with 12 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
cg/cg3200a.uml
View File

@ -24,22 +24,22 @@ END
TEXT 96
BEGIN
PROMPT 4 10 "Dalla data competenza "
PROMPT 4 10 "Dalla data competenza"
END
TEXT 97
BEGIN
PROMPT 40 10 "Alla data competenza "
PROMPT 40 10 "Alla data competenza "
END
TEXT 98
BEGIN
PROMPT 4 10 "Dalla data operazione "
PROMPT 4 10 "Dalla data operazione "
END
TEXT 99
BEGIN
PROMPT 40 10 "Alla data operazione "
PROMPT 40 10 "Alla data operazione "
END
NUMBER F_ANNO 4
@ -77,8 +77,7 @@ END
NUMBER F_CONTOINI 3
BEGIN
PROMPT 41 5 ""
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
CHECKTYPE NORMAL
USE LF_PCON SELECT SOTTOCONTO=""
INPUT GRUPPO F_GRUPPOINI
INPUT CONTO F_CONTOINI
DISPLAY "Gruppo" GRUPPO
@ -97,7 +96,6 @@ NUMBER F_SOTTOCINI_CONTO 6
BEGIN
PROMPT 48 5 ""
USE LF_PCON SELECT SOTTOCONTO!=""
CHECKTYPE NORMAL
INPUT GRUPPO F_GRUPPOINI
INPUT CONTO F_CONTOINI
INPUT SOTTOCONTO F_SOTTOCINI_CONTO
@ -117,6 +115,7 @@ STRING F_DESCRINI_CONTO 50
BEGIN
PROMPT 4 6 "Descrizione "
USE LF_PCON KEY 2
CHECKTYPE NORMAL
INPUT DESCR F_DESCRINI_CONTO
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
@ -136,7 +135,6 @@ NUMBER F_CONTOFINE 3
BEGIN
PROMPT 41 7 ""
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
CHECKTYPE NORMAL
INPUT GRUPPO F_GRUPPOFINE
INPUT CONTO F_CONTOFINE
DISPLAY "Gruppo" GRUPPO
@ -155,7 +153,6 @@ NUMBER F_SOTTOCFINE_CONTO 6
BEGIN
PROMPT 48 7 ""
USE LF_PCON SELECT SOTTOCONTO!=""
CHECKTYPE NORMAL
INPUT GRUPPO F_GRUPPOFINE
INPUT CONTO F_CONTOFINE
INPUT SOTTOCONTO F_SOTTOCFINE_CONTO
@ -175,12 +172,13 @@ STRING F_DESCRFINE_CONTO 50
BEGIN
PROMPT 4 8 "Descrizione "
USE LF_PCON KEY 2
CHECKTYPE NORMAL
INPUT DESCR F_DESCRINI_CONTO
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCINI_CONTO
COPY OUTPUT F_SOTTOCFINE_CONTO
CHECKTYPE NORMAL
GROUP 1
END
@ -189,7 +187,6 @@ NUMBER F_SOTTOCINI_CLIENTE 6
BEGIN
PROMPT 48 5 ""
USE LF_CLIFO
CHECKTYPE NORMAL
INPUT TIPOCF "C"
INPUT CODCF F_SOTTOCINI_CLIENTE
DISPLAY "Codice" CODCF
@ -208,6 +205,7 @@ BEGIN
PROMPT 4 6 "Ragione sociale C "
FIELD LF_CLIFO->RAGSOC
USE LF_CLIFO KEY 2
CHECKTYPE NORMAL
INPUT TIPOCF "C"
INPUT RAGSOC F_DESCRINI_CLIENTE
DISPLAY "Ragione Sociale Cliente@50" RAGSOC
@ -216,7 +214,6 @@ BEGIN
DISPLAY "Codice" CODCF
COPY OUTPUT F_SOTTOCINI_CLIENTE
MESSAGE COPY,F_DESCRINI_CONTO
CHECKTYPE NORMAL
GROUP 2
END
@ -242,6 +239,7 @@ STRING F_DESCRFINE_CLIENTE 50
BEGIN
PROMPT 4 8 "Ragione sociale C "
FIELD LF_CLIFO->RAGSOC
CHECKTYPE NORMAL
USE LF_CLIFO KEY 2
INPUT TIPOCF "C"
INPUT RAGSOC F_DESCRFINE_CLIENTE
@ -277,6 +275,7 @@ STRING F_DESCRINI_FORN 50
BEGIN
PROMPT 4 6 "Ragione Sociale F "
USE LF_CLIFO KEY 2
CHECKTYPE NORMAL
INPUT TIPOCF "F"
INPUT RAGSOC F_DESCRINI_FORN
DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
@ -311,6 +310,7 @@ STRING F_DESCRFINE_FORN 50
BEGIN
PROMPT 4 8 "Ragione Sociale F "
USE LF_CLIFO KEY 2
CHECKTYPE NORMAL
INPUT TIPOCF "F"
INPUT RAGSOC F_DESCRFINE_FORN
DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
@ -418,10 +418,3 @@ END
ENDPAGE
ENDMASK