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

Corretta gestione sottoconto di contropartita

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4854 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1997-07-09 15:27:37 +00:00
parent 1c2f8ecd3c
commit efb13d697e
2 changed files with 16 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cg/cg2100.cpp
View File

@ -1404,7 +1404,7 @@ HIDDEN void ini2bill(TConfig& ini, TBill& bil, bool contro)
char tipo = ini.get_char(contro ? "TIPOC" : "TIPO"); char tipo = ini.get_char(contro ? "TIPOC" : "TIPO");
int gruppo = ini.get_int(contro ? "GRUPPOC" : "GRUPPO"); int gruppo = ini.get_int(contro ? "GRUPPOC" : "GRUPPO");
int conto = ini.get_int(contro ? "CONTOC" : "CONTO"); int conto = ini.get_int(contro ? "CONTOC" : "CONTO");
long sottoconto = ini.get_long(contro ? "SOTTOCONTOC" : "SOTTOCONTO"); long sottoconto = ini.get_long(contro ? "SOTTOCONTC" : "SOTTOCONTO");
bil.set(gruppo, conto, sottoconto, tipo); bil.set(gruppo, conto, sottoconto, tipo);
} }

27
cg/cg21cg.uml
View File

@ -60,12 +60,13 @@ END
NUMBER CG_GRUPPO 3 NUMBER CG_GRUPPO 3
BEGIN BEGIN
PROMPT 20 6 "Gruppo " PROMPT 20 6 "Gruppo "
FIELD GRUPPO
END END
NUMBER CG_CONTO 3 NUMBER CG_CONTO 3
BEGIN BEGIN
PROMPT 32 6 "Conto " PROMPT 32 6 "Conto "
FIELD LF_PCON->CONTO FIELD CONTO
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
INPUT GRUPPO 104 INPUT GRUPPO 104
INPUT CONTO 105 INPUT CONTO 105
@ -86,7 +87,7 @@ END
NUMBER CG_SOTTOCONTO 6 NUMBER CG_SOTTOCONTO 6
BEGIN BEGIN
PROMPT 45 6 "Sottoconto " PROMPT 45 6 "Sottoconto "
FIELD LF_PCON->SOTTOCONTO FIELD SOTTOCONTO
USE LF_PCON SELECT SOTTOCONTO!="" USE LF_PCON SELECT SOTTOCONTO!=""
INPUT GRUPPO 104 INPUT GRUPPO 104
INPUT CONTO 105 INPUT CONTO 105
@ -107,7 +108,7 @@ END
NUMBER 206 6 NUMBER 206 6
BEGIN BEGIN
PROMPT 45 6 "Cliente " PROMPT 45 6 "Cliente "
FIELD LF_PCON->SOTTOCONTO FIELD SOTTOCONTO
USE LF_CLIFO USE LF_CLIFO
INPUT TIPOCF "C" INPUT TIPOCF "C"
INPUT CODCF 206 INPUT CODCF 206
@ -126,7 +127,7 @@ END
NUMBER 306 6 NUMBER 306 6
BEGIN BEGIN
PROMPT 45 6 "Fornitore " PROMPT 45 6 "Fornitore "
FIELD LF_PCON->SOTTOCONTO FIELD SOTTOCONTO
USE LF_CLIFO USE LF_CLIFO
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT CODCF 306 INPUT CODCF 306
@ -146,7 +147,7 @@ END
STRING 107 50 STRING 107 50
BEGIN BEGIN
PROMPT 2 7 "Descriz. " PROMPT 2 7 "Descriz. "
FIELD LF_PCON->DESCR FIELD DESCRCONTO
USE LF_PCON KEY 2 USE LF_PCON KEY 2
INPUT DESCR 107 INPUT DESCR 107
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
@ -212,12 +213,13 @@ END
NUMBER 111 3 NUMBER 111 3
BEGIN BEGIN
PROMPT 20 10 "Gruppo " PROMPT 20 10 "Gruppo "
FIELD GRUPPOC
END END
NUMBER 112 3 NUMBER 112 3
BEGIN BEGIN
PROMPT 32 10 "Conto " PROMPT 32 10 "Conto "
FIELD LF_PCON->CONTO FIELD CONTOC
COPY USE 105 COPY USE 105
INPUT GRUPPO 111 INPUT GRUPPO 111
INPUT CONTO 112 INPUT CONTO 112
@ -235,7 +237,7 @@ END
NUMBER 113 6 NUMBER 113 6
BEGIN BEGIN
PROMPT 45 10 "Sottoconto " PROMPT 45 10 "Sottoconto "
FIELD LF_PCON->SOTTOCONTO FIELD SOTTOCONTC
COPY USE 106 COPY USE 106
COPY INPUT 112 COPY INPUT 112
INPUT SOTTOCONTO 113 INPUT SOTTOCONTO 113
@ -250,7 +252,7 @@ END
NUMBER 213 6 NUMBER 213 6
BEGIN BEGIN
PROMPT 45 10 "Cliente " PROMPT 45 10 "Cliente "
FIELD LF_CLIFO->CODCF FIELD SOTTOCONTC
COPY USE 206 COPY USE 206
INPUT TIPOCF "C" INPUT TIPOCF "C"
INPUT CODCF 213 INPUT CODCF 213
@ -264,7 +266,7 @@ END
NUMBER 313 6 NUMBER 313 6
BEGIN BEGIN
PROMPT 45 10 "Fornitore " PROMPT 45 10 "Fornitore "
FIELD LF_CLIFO->CODCF FIELD SOTTOCONTC
COPY USE 306 COPY USE 306
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT CODCF 313 INPUT CODCF 313
@ -278,7 +280,7 @@ END
STRING 114 50 STRING 114 50
BEGIN BEGIN
PROMPT 2 11 "Descriz. " PROMPT 2 11 "Descriz. "
FIELD LF_PCON->DESCR FIELD DESCRCONTOC
COPY USE 107 COPY USE 107
INPUT DESCR 114 INPUT DESCR 114
COPY DISPLAY 107 COPY DISPLAY 107
@ -290,7 +292,7 @@ END
STRING 214 50 STRING 214 50
BEGIN BEGIN
PROMPT 2 11 "Cliente " PROMPT 2 11 "Cliente "
FIELD LF_CLIFO->RAGSOC FIELD DESCRCONTOC
COPY USE 207 COPY USE 207
INPUT TIPOCF "C" INPUT TIPOCF "C"
INPUT RAGSOC 214 INPUT RAGSOC 214
@ -304,7 +306,7 @@ END
STRING 314 50 STRING 314 50
BEGIN BEGIN
PROMPT 2 11 "Fornitore " PROMPT 2 11 "Fornitore "
FIELD LF_CLIFO->RAGSOC FIELD DESCRCONTOC
COPY USE 307 COPY USE 307
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT RAGSOC 314 INPUT RAGSOC 314
@ -344,6 +346,7 @@ BEGIN
ITEM "S|Ritenute sociali" ITEM "S|Ritenute sociali"
ITEM "T|Totale documento" ITEM "T|Totale documento"
FLAGS "D" FLAGS "D"
FIELD ROWTYPE
END END