Patch level : 4.0
Files correlati : crpa0.exe Ricompilazione Demo : [ ] Commento : Sostituito uso erroneo di CODCCOSTO col corretto CODCONTO git-svn-id: svn://10.65.10.50/trunk@14242 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
a6fba27dfd
commit
d18c00e667
146
crpa/crpa.ini
146
crpa/crpa.ini
@ -1,11 +1,95 @@
|
||||
[Oracle]
|
||||
Username=pmc
|
||||
Password=pmc
|
||||
Username=pmc40
|
||||
Password=pmc40
|
||||
Connect=zen1
|
||||
Run=
|
||||
Run=OK
|
||||
|
||||
[23]
|
||||
TABLE=SMC_PRJDOC_T146
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_MOV
|
||||
UNICARCH=!_UNICMOV
|
||||
DTATRASF=!_DATAORA
|
||||
TIPDOC=:PN
|
||||
DESDOC=!_DESMOV
|
||||
NUMDOC=
|
||||
DTADOC=!_D,DATAREG
|
||||
NUMDOCFIS=NUMDOC
|
||||
DTADOCFIS=!_D,DATADOC
|
||||
DTAPERT=!_D,DATACOMP
|
||||
AZIENDA=!_FIRM
|
||||
TIPANA=TIPOCF
|
||||
CODCF=CODCF
|
||||
CODVAL=!_CODVAL
|
||||
|
||||
[24]
|
||||
TABLE=SMC_PRJDET_T147
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_MOV
|
||||
UNICARCH=!_UNICMOV
|
||||
UNICRIGA=NUMRIG
|
||||
CODART=!_CODART
|
||||
DESART=!_DESRMOV
|
||||
QUANT=1
|
||||
UNMIS=
|
||||
CONSAL=
|
||||
IMPVAL=!_IMPORTORMOV
|
||||
NUMCOMM=CODCMS
|
||||
CODATTCM=
|
||||
ELSPESA=!_ELSPESAMOV
|
||||
CENTCOST=FASCMS
|
||||
DTACONS=
|
||||
RIFRICH=
|
||||
RIFORD=
|
||||
RIFBOL=
|
||||
CODVAL=!_CODVAL
|
||||
STATO_IMP=
|
||||
SEGNO=!_SEZIONERMOV
|
||||
|
||||
[33]
|
||||
TABLE=SMC_PRJDOC_T146
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_DOC
|
||||
UNICARCH=!_UNICDOC
|
||||
DTATRASF=!_DATAORA
|
||||
TIPDOC=!_TIPODOC
|
||||
DESDOC=!_DESDOC
|
||||
NUMDOC=NDOC
|
||||
DTADOC=!_D,DATADOC
|
||||
NUMDOCFIS=NUMDOCRIF
|
||||
DTADOCFIS=!_D,DATADOCRIF
|
||||
DTAPERT=!_D,DATADOC
|
||||
AZIENDA=!_FIRM
|
||||
TIPANA=TIPOCF
|
||||
CODCF=CODCF
|
||||
CODVAL=!_CODVAL
|
||||
|
||||
[34]
|
||||
TABLE=SMC_PRJDET_T147
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_DOC
|
||||
UNICARCH=!_UNICDOC
|
||||
UNICRIGA=#RDOC,NRIGA
|
||||
CODART=CODART
|
||||
QUANT=QTA
|
||||
DESART=!_T,70,DESCR
|
||||
UNMIS=UMQTA
|
||||
CONSAL=
|
||||
IMPVAL=#!_,IMPORTO
|
||||
NUMCOMM=#!_,COMMESSA
|
||||
CODATTCM=
|
||||
ELSPESA=!_ELSPESADOC
|
||||
CENTCOST=#!_,FASE
|
||||
DTACONS=#!_,DATACONS
|
||||
RIFRICH=
|
||||
RIFORD=!_RIFORD
|
||||
RIFBOL=!_RIFBOL
|
||||
CODVAL=!_CODVAL
|
||||
STATO_IMP=
|
||||
SEGNO=
|
||||
|
||||
[107]
|
||||
TABLE=AGA_PRJDOC_T146_P
|
||||
TABLE=SMC_PRJDOC_T146
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_MOV
|
||||
UNICARCH=!_UNICMOV
|
||||
@ -23,7 +107,7 @@ CODCF=23->CODCF
|
||||
CODVAL=!_CODVAL
|
||||
|
||||
[108]
|
||||
TABLE=AGA_PRJDET_T147_P
|
||||
TABLE=SMC_PRJDET_T147
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_MOV
|
||||
UNICARCH=!_UNICMOV
|
||||
@ -46,48 +130,6 @@ CODVAL=!_CODVAL
|
||||
STATO_IMP=
|
||||
SEGNO=SEZIONE
|
||||
|
||||
[33]
|
||||
TABLE=AGA_PRJDOC_T146_P
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_DOC
|
||||
UNICARCH=!_UNICDOC
|
||||
DTATRASF=!_DATAORA
|
||||
TIPDOC=!_TIPODOC
|
||||
DESDOC=!_DESDOC
|
||||
NUMDOC=NDOC
|
||||
DTADOC=!_D,DATADOC
|
||||
NUMDOCFIS=NUMDOCRIF
|
||||
DTADOCFIS=!_D,DATADOCRIF
|
||||
DTAPERT=!_D,DATADOC
|
||||
AZIENDA=!_FIRM
|
||||
TIPANA=TIPOCF
|
||||
CODCF=CODCF
|
||||
CODVAL=!_CODVAL
|
||||
|
||||
[34]
|
||||
TABLE=AGA_PRJDET_T147_P
|
||||
UNICO=
|
||||
ARCH=!_FIRM,_DOC
|
||||
UNICARCH=!_UNICDOC
|
||||
UNICRIGA=#RDOC,NRIGA
|
||||
CODART=CODART
|
||||
QUANT=#!_,QTA
|
||||
DESART=!_T,70,DESCR
|
||||
UNMIS=UMQTA
|
||||
CONSAL=
|
||||
IMPVAL=#!_,IMPORTO
|
||||
NUMCOMM=#!_,COMMESSA
|
||||
CODATTCM=
|
||||
ELSPESA=!_ELSPESADOC
|
||||
CENTCOST=#!_,FASE
|
||||
DTACONS=#!_,DATACONS
|
||||
RIFRICH=
|
||||
RIFORD=!_RIFORD
|
||||
RIFBOL=!_RIFBOL
|
||||
CODVAL=!_CODVAL
|
||||
STATO_IMP=
|
||||
SEGNO=
|
||||
|
||||
[Tipo documento]
|
||||
O=I**
|
||||
B=IM*
|
||||
@ -95,23 +137,27 @@ BO=*M*
|
||||
FB=**F
|
||||
FO=*MF
|
||||
F=IMF
|
||||
FR=*M*
|
||||
FF=**F
|
||||
|
||||
[Codice valuta]
|
||||
EUR=EU
|
||||
|
||||
[Descrizioni]
|
||||
F01=Percentuale,QTAGG1|Giorni,QTAGG2
|
||||
ORFI=Cliente o Fornitore: ,TIPOCF|Codice: ,CODCF
|
||||
SEPARATORE=-
|
||||
|
||||
[Ditte]
|
||||
1=S
|
||||
2=S
|
||||
3=N
|
||||
|
||||
[Cespiti]
|
||||
CodNum=CES
|
||||
CodNum=AMM
|
||||
|
||||
[Gruppi]
|
||||
4=X
|
||||
5=X
|
||||
6=X
|
||||
7=X
|
||||
8=X
|
||||
|
||||
|
||||
@ -554,17 +554,17 @@ void TIni2Sql::validate(const TString& elabfield, TString& str)
|
||||
TToken_string key;
|
||||
if (code == "_ELSPESAMOV") // per righe movimenti
|
||||
{
|
||||
key = _inputfile->get("CODCCOSTO", "108");
|
||||
//key = _inputfile->get("GRUPPO");
|
||||
//key.add(_inputfile->get("CONTO"));
|
||||
//key.add(_inputfile->get("SOTTOCONTO"));
|
||||
key = _inputfile->get("CODCONTO", "108");
|
||||
key.insert("|", 6);
|
||||
key.insert("|", 3);
|
||||
}
|
||||
else // per righe documenti
|
||||
key.format("%d|%d|%ld", _conto.gruppo(), _conto.conto(), _conto.sottoconto());
|
||||
if (!key.empty_items())
|
||||
{
|
||||
key = cache().get(LF_PCON, key, "CODCBL");
|
||||
str = cache().get(LF_ABPCON, key, "DESCRIZ").left(6);
|
||||
str = cache().get(LF_ABPCON, key, "DESCRIZ");
|
||||
str.cut(6);
|
||||
str.upper();
|
||||
}
|
||||
else
|
||||
@ -581,8 +581,10 @@ void TIni2Sql::validate(const TString& elabfield, TString& str)
|
||||
str.format("%s (%s)", (const char*) tmpstr, (const char*) _inputfile->get("PROTIVA"));
|
||||
}
|
||||
else if (code == "_CODART") // campo CODART per movimenti
|
||||
str = _inputfile->get("CODCCOSTO", "108");
|
||||
//str.format("%s-%s-%s", (const char*) _inputfile->get("GRUPPO"), (const char*) _inputfile->get("CONTO"), (const char*) _inputfile->get("SOTTOCONTO"));
|
||||
{
|
||||
str = _inputfile->get("CODCONTO", "108");
|
||||
str.format("%d-%d-%ld", atoi(str.left(3)), atoi(str.mid(3,3)), atol(str.right(6)));
|
||||
}
|
||||
else if (code == "_IMPORTORMOV") // campo importo per righe movimenti
|
||||
{
|
||||
real importo(_inputfile->get("IMPORTO"));
|
||||
@ -866,7 +868,7 @@ void TIni2Sql::write_sqlinsert()
|
||||
bool almenounariga = false;
|
||||
TString insert, colonne, valori;
|
||||
_firm = _inputfile->get_int("Firm", "Transaction");
|
||||
TString16 firm = "";
|
||||
TString16 firm;
|
||||
firm.format("%ld", _firm);
|
||||
if (_configfile->get((const char*)firm, "Ditte")[0] == 'S')
|
||||
{
|
||||
@ -908,12 +910,19 @@ void TIni2Sql::write_sqlinsert()
|
||||
ok = _configfile->get_bool(gruppo, "Gruppi");
|
||||
}
|
||||
if (strpar == "108")
|
||||
{
|
||||
{
|
||||
/* Come NON si deve fare: leggere e poi cancellare
|
||||
TString gruppo(_inputfile->get("CODCONTO"));
|
||||
const int codgruppo = atoi(gruppo.left(3));
|
||||
|
||||
gruppo.format("%ld", codgruppo);
|
||||
ok = _configfile->get_bool(gruppo, "Gruppi");
|
||||
ok = _configfile->get_bool(gruppo, "Gruppi");
|
||||
*/
|
||||
|
||||
// E' meglio lavorare localmente senza TString nello heap o temporanee (left).
|
||||
// In questo modo non ho nessuna TString, left(), atoi, format!
|
||||
TString16 gruppo = _inputfile->get("CODCONTO");
|
||||
gruppo.cut(3); gruppo.ltrim('0');
|
||||
ok = _configfile->get_bool(gruppo, "Gruppi");
|
||||
}
|
||||
// vecchia condizione: se riga documento deve avere codice iva oppure essere tipo riga spesa e avere gruppo 4 o 5 (andare su anamag con codart o )
|
||||
// se riga documento preocedo come la contabilizzazione per cercare il gruppo-conto-sottoconto, che deve essere presente in crpa.ini
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user