Corretti errori 004319 004321
git-svn-id: svn://10.65.10.50/trunk@2068 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
786005529c
commit
82fd1934e3
@ -22,9 +22,10 @@ BEGIN
|
|||||||
KEY 1
|
KEY 1
|
||||||
USE LF_ABPCON KEY 1
|
USE LF_ABPCON KEY 1
|
||||||
INPUT CODCBL F_CODICE
|
INPUT CODCBL F_CODICE
|
||||||
DISPLAY "Codice@10" CODCBL
|
DISPLAY "Codice@11" CODCBL
|
||||||
DISPLAY "Descrizione@80" DESCRIZ
|
DISPLAY "Descrizione@40" DESCRIZ[1,40]
|
||||||
DISPLAY "Ind. bil. " INDBIL
|
DISPLAY "I.B." INDBIL
|
||||||
|
DISPLAY "Codice opp.@11" CODCONTR
|
||||||
OUTPUT F_CODICE CODCBL
|
OUTPUT F_CODICE CODCBL
|
||||||
OUTPUT F_DESCRIZ1 DESCRIZ[1,40]
|
OUTPUT F_DESCRIZ1 DESCRIZ[1,40]
|
||||||
OUTPUT F_DESCRIZ2 DESCRIZ[41,]
|
OUTPUT F_DESCRIZ2 DESCRIZ[41,]
|
||||||
@ -39,9 +40,10 @@ BEGIN
|
|||||||
KEY 2
|
KEY 2
|
||||||
USE LF_ABPCON KEY 2
|
USE LF_ABPCON KEY 2
|
||||||
INPUT DESCRIZ[1,40] F_DESCRIZ1
|
INPUT DESCRIZ[1,40] F_DESCRIZ1
|
||||||
DISPLAY "Descrizione@80" DESCRIZ
|
DISPLAY "Descrizione@40" DESCRIZ[1,40]
|
||||||
DISPLAY "Codice@10R" CODCBL
|
DISPLAY "Codice@11" CODCBL
|
||||||
DISPLAY "Ind. bil. " INDBIL
|
DISPLAY "I.B." INDBIL
|
||||||
|
DISPLAY "Codice opp.@11" CODCONTR
|
||||||
COPY OUTPUT F_CODICE
|
COPY OUTPUT F_CODICE
|
||||||
HELP "Prima parte della descrizione"
|
HELP "Prima parte della descrizione"
|
||||||
WARNING "Manca la descrizione"
|
WARNING "Manca la descrizione"
|
||||||
@ -82,28 +84,38 @@ BEGIN
|
|||||||
PROMPT 2 10 "Conto di sez.bil.opposta "
|
PROMPT 2 10 "Conto di sez.bil.opposta "
|
||||||
HELP "Inserire il conto di sezione di bilancio opposta"
|
HELP "Inserire il conto di sezione di bilancio opposta"
|
||||||
FIELD LF_ABPCON->CODCONTR
|
FIELD LF_ABPCON->CODCONTR
|
||||||
USE LF_ABPCON KEY 1
|
USE LF_ABPCON
|
||||||
INPUT CODCBL F_CODCONTR
|
INPUT CODCBL F_CODCONTR
|
||||||
DISPLAY "Codice@10" CODCBL
|
DISPLAY "Codice@11" CODCBL
|
||||||
DISPLAY "Ind.bil" INDBIL
|
DISPLAY "Descrizione@40" DESCRIZ[1,40]
|
||||||
DISPLAY "Descrizione@80" DESCRIZ
|
DISPLAY "I.B." INDBIL
|
||||||
|
DISPLAY "Codice@11" CODCONTR
|
||||||
OUTPUT F_CODCONTR CODCBL
|
OUTPUT F_CODCONTR CODCBL
|
||||||
OUTPUT F_DESCRCONTR1 DESCRIZ[1,33]
|
OUTPUT F_DESCRCONTR1 DESCRIZ[1,40]
|
||||||
OUTPUT F_DESCRCONTR2 DESCRIZ[34,]
|
OUTPUT F_DESCRCONTR2 DESCRIZ[41,]
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
ADD RUN AB0 -1 #F_CODICE #F_INDBIL
|
ADD RUN AB0 -1 #F_CODICE #F_INDBIL
|
||||||
FLAGS "Z"
|
FLAGS "Z"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_DESCRCONTR1 33
|
STRING F_DESCRCONTR1 40
|
||||||
BEGIN
|
|
||||||
PROMPT 41 10 ""
|
|
||||||
FLAGS "D"
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING F_DESCRCONTR2 47
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 27 11 ""
|
PROMPT 27 11 ""
|
||||||
|
USE LF_ABPCON KEY 2
|
||||||
|
INPUT DESCRIZ F_DESCRCONTR1
|
||||||
|
DISPLAY "Descrizione@40" DESCRIZ[1,40]
|
||||||
|
DISPLAY "Codice@11" CODCBL
|
||||||
|
DISPLAY "I.B." INDBIL
|
||||||
|
DISPLAY "Codice@11" CODCONTR
|
||||||
|
OUTPUT F_CODCONTR CODCBL
|
||||||
|
OUTPUT F_DESCRCONTR1 DESCRIZ[1,40]
|
||||||
|
OUTPUT F_DESCRCONTR2 DESCRIZ[41,]
|
||||||
|
ADD RUN AB0 -1 #F_CODICE #F_INDBIL
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_DESCRCONTR2 40
|
||||||
|
BEGIN
|
||||||
|
PROMPT 27 12 ""
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
END
|
END
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user