Corretto errore MI4015
git-svn-id: svn://10.65.10.50/trunk@553 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex
parent
1372832ba2
commit
0003b18eea
11
cg/cg5100a.h
11
cg/cg5100a.h
@ -42,3 +42,14 @@
|
||||
#define FLD_RRCCRI 141
|
||||
|
||||
#define CHK_GESVEN 142
|
||||
#define FLD_DCOCAAP 143
|
||||
#define FLD_DCOCACH 144
|
||||
#define FLD_DRRCCRA 145
|
||||
#define FLD_DRRCCRI 146
|
||||
#define FLD_DCSBICH 147
|
||||
#define FLD_DCSPRPE 148
|
||||
#define FLD_DCSBIAP 149
|
||||
#define FLD_DCSUECP 150
|
||||
#define FLD_DCSPECP 151
|
||||
#define FLD_DCSUECE 152
|
||||
#define FLD_DCSPECE 153
|
||||
|
||||
333
cg/cg5100a.uml
333
cg/cg5100a.uml
@ -126,14 +126,9 @@ ENDPAGE
|
||||
|
||||
PAGE "Impostazione parametri ditta" -1 -1 77 8
|
||||
|
||||
GROUPBOX DLG_NULL 55 12
|
||||
GROUPBOX DLG_NULL 78 12
|
||||
BEGIN
|
||||
PROMPT 2 5 "Codici sottoconto per chiusura automatica dei conti"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 20 12
|
||||
BEGIN
|
||||
PROMPT 57 5 "Ratei/Risconti"
|
||||
PROMPT 1 7 "Codici sottoconto per chiusura automatica dei conti"
|
||||
END
|
||||
|
||||
NUMBER FLD_CODLIC 5
|
||||
@ -151,7 +146,7 @@ END
|
||||
|
||||
STRING FLD_CODLIN 1
|
||||
BEGIN
|
||||
PROMPT 42 2 "Codice lingua "
|
||||
PROMPT 1 3 "Codice lingua "
|
||||
HELP ""
|
||||
USE %LNG
|
||||
DISPLAY "Codice" CODTAB
|
||||
@ -164,44 +159,69 @@ END
|
||||
|
||||
STRING FLD_COCACH 3
|
||||
BEGIN
|
||||
PROMPT 1 3 "Codice causale chiusura "
|
||||
PROMPT 1 4 "Codice causale chiusura "
|
||||
USE LF_CAUSALI SELECT MOVAP="C"
|
||||
INPUT CODCAUS FLD_COCACH
|
||||
DISPLAY "Codice" CODCAUS
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT FLD_COCACH CODCAUS
|
||||
OUTPUT FLD_DCOCACH DESCR
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
FLAGS "U"
|
||||
FIELD CoCaCh
|
||||
END
|
||||
|
||||
STRING FLD_DCOCACH 50 35
|
||||
BEGIN
|
||||
PROMPT 40 4 ""
|
||||
USE LF_CAUSALI KEY 2 SELECT MOVAP="C"
|
||||
INPUT DESCR FLD_DCOCACH
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Codice" CODCAUS
|
||||
COPY OUTPUT FLD_COCACH
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
END
|
||||
|
||||
STRING FLD_COCAAP 3
|
||||
BEGIN
|
||||
PROMPT 42 3 "Codice causale apertura "
|
||||
PROMPT 1 5 "Codice causale apertura "
|
||||
FLAGS "U"
|
||||
USE LF_CAUSALI SELECT MOVAP="A"
|
||||
INPUT CODCAUS FLD_COCAAP
|
||||
COPY DISPLAY FLD_COCACH
|
||||
OUTPUT FLD_COCAAP CODCAUS
|
||||
OUTPUT FLD_DCOCAAP DESCR
|
||||
ADD RUN cg0 -4
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CoCaAp
|
||||
END
|
||||
|
||||
STRING FLD_DCOCAAP 50 35
|
||||
BEGIN
|
||||
PROMPT 40 5 ""
|
||||
USE LF_CAUSALI KEY 2 SELECT MOVAP="A"
|
||||
INPUT DESCR FLD_DCOCAAP
|
||||
COPY DISPLAY FLD_DCOCACH
|
||||
COPY OUTPUT FLD_COCAAP
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 32 6 "Gruppo Conto Sottoconto"
|
||||
PROMPT 26 8 "Gruppo Conto Sottoconto"
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 31 7 "________________________"
|
||||
PROMPT 25 9 "________________________"
|
||||
END
|
||||
|
||||
NUMBER FLD_CSBICHG 3
|
||||
BEGIN
|
||||
PROMPT 3 8 "Bilancio di chiusura "
|
||||
PROMPT 2 10 "Bilancio di chiusura "
|
||||
HELP ""
|
||||
USE LF_PCON SELECT SOTTOCONTO!=""
|
||||
INPUT GRUPPO FLD_CSBICHG
|
||||
@ -214,265 +234,434 @@ BEGIN
|
||||
OUTPUT FLD_CSBICHG GRUPPO
|
||||
OUTPUT FLD_CSBICHC CONTO
|
||||
OUTPUT FLD_CSBICHS SOTTOCONTO
|
||||
CHECKTYPE NORMAL
|
||||
OUTPUT FLD_DCSBICH DESCR
|
||||
FIELD CsBiChG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSBICHC 3
|
||||
BEGIN
|
||||
PROMPT 39 8 ""
|
||||
PROMPT 33 10 ""
|
||||
COPY ALL FLD_CSBICHG
|
||||
CHCKTYPE NORMAL
|
||||
FIELD CsBiChC
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSBICHS 6
|
||||
BEGIN
|
||||
PROMPT 46 8 ""
|
||||
COPY ALL FLD_CSBICHG
|
||||
PROMPT 40 10 ""
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY INPUT FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSBICHG GRUPPO
|
||||
OUTPUT FLD_CSBICHC CONTO
|
||||
OUTPUT FLD_CSBICHS SOTTOCONTO
|
||||
OUTPUT FLD_DCSBICH DESCR
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsBiChS
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPRPEG 3
|
||||
STRING FLD_DCSBICH 50 25
|
||||
BEGIN
|
||||
PROMPT 3 9 "Profitti e perdite "
|
||||
PROMPT 50 10 ""
|
||||
HELP ""
|
||||
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
|
||||
INPUT DESCR FLD_DCSBICH
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
COPY OUTPUT FLD_CSBICHG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
STRING FLD_CSPRPEG 3
|
||||
BEGIN
|
||||
PROMPT 2 11 "Profitti e perdite "
|
||||
HELP ""
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSPRPEG GRUPPO
|
||||
OUTPUT FLD_CSPRPEC CONTO
|
||||
OUTPUT FLD_CSPRPES SOTTOCONTO
|
||||
OUTPUT FLD_DCSPRPE DESCR
|
||||
INPUT GRUPPO FLD_CSPRPEG
|
||||
INPUT CONTO FLD_CSPRPEC
|
||||
INPUT SOTTOCONTO FLD_CSPRPES
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPrPeG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPRPEC 3
|
||||
BEGIN
|
||||
PROMPT 33 11 ""
|
||||
COPY ALL FLD_CSPRPEG
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPrPeC
|
||||
PROMPT 39 9 ""
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPRPES 6
|
||||
BEGIN
|
||||
COPY ALL FLD_CSPRPEG
|
||||
PROMPT 40 11 ""
|
||||
COPY USE FLD_CSPRPEG
|
||||
COPY INPUT FLD_CSPRPEG
|
||||
COPY DISPLAY FLD_CSPRPEG
|
||||
OUTPUT FLD_CSPRPEG GRUPPO
|
||||
OUTPUT FLD_CSPRPEC CONTO
|
||||
OUTPUT FLD_CSPRPES SOTTOCONTO
|
||||
OUTPUT FLD_DCSPRPE DESCR
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPrPeS
|
||||
PROMPT 46 9 ""
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
STRING FLD_DCSPRPE 50 25
|
||||
BEGIN
|
||||
PROMPT 50 11 ""
|
||||
HELP ""
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSPRPE
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
COPY OUTPUT FLD_CSPRPEG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
|
||||
NUMBER FLD_CSBIAPG 3
|
||||
BEGIN
|
||||
PROMPT 3 10 "Bilancio di apertura "
|
||||
PROMPT 2 12 "Bilancio di apertura "
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSBIAPG GRUPPO
|
||||
OUTPUT FLD_CSBIAPC CONTO
|
||||
OUTPUT FLD_CSBIAPS SOTTOCONTO
|
||||
OUTPUT FLD_DCSBIAP DESCR
|
||||
INPUT GRUPPO FLD_CSBIAPG
|
||||
INPUT CONTO FLD_CSBIAPC
|
||||
INPUT SOTTOCONTO FLD_CSBIAPS
|
||||
HELP ""
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsBiApG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSBIAPC 3
|
||||
BEGIN
|
||||
PROMPT 39 10 ""
|
||||
PROMPT 33 12 ""
|
||||
COPY ALL FLD_CSBIAPG
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsBiApC
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSBIAPS 6
|
||||
BEGIN
|
||||
PROMPT 46 10 ""
|
||||
COPY ALL FLD_CSBIAPG
|
||||
PROMPT 40 12 ""
|
||||
COPY USE FLD_CSBIAPG
|
||||
COPY INPUT FLD_CSBIAPG
|
||||
COPY DISPLAY FLD_CSBIAPG
|
||||
OUTPUT FLD_CSBIAPG GRUPPO
|
||||
OUTPUT FLD_CSBIAPC CONTO
|
||||
OUTPUT FLD_CSBIAPS SOTTOCONTO
|
||||
OUTPUT FLD_DCSBIAP DESCR
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsBiApS
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
STRING FLD_DCSBIAP 50 25
|
||||
BEGIN
|
||||
PROMPT 50 12 ""
|
||||
HELP ""
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSBIAP
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
COPY OUTPUT FLD_CSBIAPG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
|
||||
NUMBER FLD_CSUECPG 3
|
||||
BEGIN
|
||||
PROMPT 3 11 "Utile esercizio c/to patrim. "
|
||||
PROMPT 2 13 "Utile esercizio patrim. "
|
||||
HELP ""
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSUECPG GRUPPO
|
||||
OUTPUT FLD_CSUECPC CONTO
|
||||
OUTPUT FLD_CSUECPS SOTTOCONTO
|
||||
OUTPUT FLD_DCSUECP DESCR
|
||||
INPUT GRUPPO FLD_CSUECPG
|
||||
INPUT CONTO FLD_CSUECPC
|
||||
INPUT SOTTOCONTO FLD_CSUECPS
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsUeCpG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
NUMBER FLD_CSUECPC 3
|
||||
BEGIN
|
||||
PROMPT 39 11 ""
|
||||
PROMPT 33 13 ""
|
||||
COPY ALL FLD_CSUECPG
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsUeCpC
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
NUMBER FLD_CSUECPS 6
|
||||
BEGIN
|
||||
PROMPT 46 11 ""
|
||||
COPY ALL FLD_CSUECPG
|
||||
CHECKTYPE NORMAL
|
||||
PROMPT 40 13 ""
|
||||
COPY USE FLD_CSUECPG
|
||||
COPY INPUT FLD_CSUECPG
|
||||
COPY DISPLAY FLD_CSUECPG
|
||||
OUTPUT FLD_CSUECPG GRUPPO
|
||||
OUTPUT FLD_CSUECPC CONTO
|
||||
OUTPUT FLD_CSUECPS SOTTOCONTO
|
||||
OUTPUT FLD_DCSUECP DESCR
|
||||
FIELD CsUeCpS
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
STRING FLD_DCSUECP 50 25
|
||||
BEGIN
|
||||
PROMPT 50 13 ""
|
||||
HELP ""
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSUECP
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
COPY OUTPUT FLD_CSUECPG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPECPG 3
|
||||
BEGIN
|
||||
PROMPT 3 12 "Perdita eserc. c/to patrim. "
|
||||
PROMPT 2 14 "Perdita eserc. patrim. "
|
||||
HELP ""
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSPECPG GRUPPO
|
||||
OUTPUT FLD_CSPECPC CONTO
|
||||
OUTPUT FLD_CSPECPS SOTTOCONTO
|
||||
OUTPUT FLD_DCSPECP DESCR
|
||||
INPUT GRUPPO FLD_CSPECPG
|
||||
INPUT CONTO FLD_CSPECPC
|
||||
INPUT SOTTOCONTO FLD_CSPECPS
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPeCpG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPECPC 3
|
||||
BEGIN
|
||||
PROMPT 39 12 ""
|
||||
PROMPT 33 14 ""
|
||||
COPY ALL FLD_CSPECPG
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPeCpC
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPECPS 6
|
||||
BEGIN
|
||||
PROMPT 46 12 ""
|
||||
COPY ALL FLD_CSPECPG
|
||||
PROMPT 40 14 ""
|
||||
COPY USE FLD_CSPECPG
|
||||
COPY INPUT FLD_CSPECPG
|
||||
COPY DISPLAY FLD_CSPECPG
|
||||
OUTPUT FLD_CSPECPG GRUPPO
|
||||
OUTPUT FLD_CSPECPC CONTO
|
||||
OUTPUT FLD_CSPECPS SOTTOCONTO
|
||||
OUTPUT FLD_DCSPECP DESCR
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPeCpS
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
STRING FLD_DCSPECP 50 25
|
||||
BEGIN
|
||||
PROMPT 50 14 ""
|
||||
HELP ""
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSPECP
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
COPY OUTPUT FLD_CSPECPG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSUECEG 3
|
||||
BEGIN
|
||||
PROMPT 3 13 "Utile esercizio c/to econ. "
|
||||
PROMPT 2 15 "Utile esercizio econ. "
|
||||
HELP ""
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSUECEG GRUPPO
|
||||
OUTPUT FLD_CSUECEC CONTO
|
||||
OUTPUT FLD_CSUECES SOTTOCONTO
|
||||
OUTPUT FLD_DCSUECE DESCR
|
||||
INPUT GRUPPO FLD_CSUECEG
|
||||
INPUT CONTO FLD_CSUECEC
|
||||
INPUT SOTTOCONTO FLD_CSUECES
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsUeCeG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
NUMBER FLD_CSUECEC 3
|
||||
BEGIN
|
||||
PROMPT 39 13 ""
|
||||
PROMPT 33 15 ""
|
||||
COPY ALL FLD_CSUECEG
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsUeCeC
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
NUMBER FLD_CSUECES 6
|
||||
BEGIN
|
||||
PROMPT 46 13 ""
|
||||
COPY ALL FLD_CSUECEG
|
||||
PROMPT 40 15 ""
|
||||
COPY USE FLD_CSUECEG
|
||||
COPY INPUT FLD_CSUECEG
|
||||
COPY DISPLAY FLD_CSUECEG
|
||||
OUTPUT FLD_CSUECEG GRUPPO
|
||||
OUTPUT FLD_CSUECEC CONTO
|
||||
OUTPUT FLD_CSUECES SOTTOCONTO
|
||||
OUTPUT FLD_DCSUECE DESCR
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsUeCeS
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
STRING FLD_DCSUECE 50 25
|
||||
BEGIN
|
||||
PROMPT 50 15 ""
|
||||
HELP ""
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSUECE
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
COPY OUTPUT FLD_CSUECEG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
NUMBER FLD_CSPECEG 3
|
||||
BEGIN
|
||||
PROMPT 3 14 "Perdita eserc. c/to econ. "
|
||||
PROMPT 2 16 "Perdita eserc. econ. "
|
||||
HELP ""
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSPECEG GRUPPO
|
||||
OUTPUT FLD_CSPECEC CONTO
|
||||
OUTPUT FLD_CSPECES SOTTOCONTO
|
||||
OUTPUT FLD_DCSPECE DESCR
|
||||
INPUT GRUPPO FLD_CSPECEG
|
||||
INPUT CONTO FLD_CSPECEC
|
||||
INPUT SOTTOCONTO FLD_CSPECES
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPeCeG
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
NUMBER FLD_CSPECEC 3
|
||||
BEGIN
|
||||
PROMPT 39 14 ""
|
||||
COPY ALL FLD_CSBICHG
|
||||
CHECKTYPE NORMAL
|
||||
PROMPT 33 16 ""
|
||||
COPY ALL FLD_CSPECEG
|
||||
FIELD CsPeCeC
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
NUMBER FLD_CSPECES 6
|
||||
BEGIN
|
||||
PROMPT 46 14 ""
|
||||
COPY ALL FLD_CSBICHG
|
||||
PROMPT 40 16 ""
|
||||
COPY USE FLD_CSPECEG
|
||||
COPY INPUT FLD_CSPECEG
|
||||
COPY DISPLAY FLD_CSPECEG
|
||||
OUTPUT FLD_CSPECEG GRUPPO
|
||||
OUTPUT FLD_CSPECEC CONTO
|
||||
OUTPUT FLD_CSPECES SOTTOCONTO
|
||||
OUTPUT FLD_DCSPECE DESCR
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsPeCeS
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
STRING FLD_DCSPECE 50 25
|
||||
BEGIN
|
||||
PROMPT 50 16 ""
|
||||
HELP ""
|
||||
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
|
||||
INPUT DESCR FLD_DCSPECE
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
COPY OUTPUT FLD_CSPECEG
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -0
|
||||
END
|
||||
|
||||
|
||||
ENDPAGE
|
||||
|
||||
|
||||
PAGE "Impostazione parametri ditta" -1 -1 77 8
|
||||
|
||||
GROUPBOX DLG_NULL 78 10
|
||||
BEGIN
|
||||
PROMPT 1 1 "Ratei/Risconti"
|
||||
END
|
||||
|
||||
|
||||
RADIOBUTTON LST_RRFRAM 16
|
||||
BEGIN
|
||||
PROMPT 57 6 ""
|
||||
PROMPT 3 2 ""
|
||||
ITEM "A|Freq. Annuale"
|
||||
ITEM "M|Freq. Mensile"
|
||||
HELP ""
|
||||
FIELD RrFrAm
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BOOLEAN CHK_RRMECO
|
||||
BEGIN
|
||||
PROMPT 58 10 "Causale ratei"
|
||||
PROMPT 26 3 "Mese Commerciale"
|
||||
HELP ""
|
||||
FIELD RrMeCo
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 58 12 "Causale risconti"
|
||||
END
|
||||
|
||||
|
||||
STRING FLD_RRCCRA 3
|
||||
BEGIN
|
||||
PROMPT 64 11 ""
|
||||
PROMPT 3 6 "Causale ratei "
|
||||
FLAGS "U"
|
||||
USE LF_CAUSALI
|
||||
INPUT CODCAUS FLD_RRCCRA
|
||||
COPY DISPLAY FLD_COCACH
|
||||
OUTPUT FLD_RRCCRA CODCAUS
|
||||
OUTPUT FLD_DRRCCRA DESCR
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
FIELD RrCcRa
|
||||
END
|
||||
|
||||
STRING FLD_DRRCCRA 50 48
|
||||
BEGIN
|
||||
PROMPT 26 6 ""
|
||||
USE LF_CAUSALI KEY 2
|
||||
INPUT DESCR FLD_DRRCCRA
|
||||
COPY DISPLAY FLD_DCOCACH
|
||||
COPY OUTPUT FLD_RRCCRA
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
END
|
||||
|
||||
STRING FLD_RRCCRI 3
|
||||
BEGIN
|
||||
PROMPT 64 13 ""
|
||||
PROMPT 3 8 "Causale risconti "
|
||||
FLAGS "U"
|
||||
COPY USE FLD_RRCCRA
|
||||
INPUT CODCAUS FLD_RRCCRI
|
||||
COPY DISPLAY FLD_COCACH
|
||||
OUTPUT FLD_RRCCRI CODCAUS
|
||||
OUTPUT FLD_DRRCCRI DESCR
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
FIELD RrCcRi
|
||||
END
|
||||
|
||||
BOOLEAN CHK_RRMECO
|
||||
STRING FLD_DRRCCRI 50 48
|
||||
BEGIN
|
||||
PROMPT 58 15 "Mese Commerc."
|
||||
HELP ""
|
||||
FIELD RrMeCo
|
||||
PROMPT 26 8 ""
|
||||
USE LF_CAUSALI KEY 2
|
||||
INPUT DESCR FLD_DRRCCRI
|
||||
COPY DISPLAY FLD_DCOCACH
|
||||
COPY OUTPUT FLD_RRCCRI
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN cg0 -4
|
||||
END
|
||||
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user