Correzioni ad errori segnalati dalla gabriella

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

View File

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