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

Patch level : 10.0 280

Browse Source 
Files correlati     :tc9.exe
Ricompilazione Demo : [ ]
Commento            :

Modificato l'inviao a Sispac


git-svn-id: svn://10.65.10.50/trunk@18692 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2009-04-10 14:09:57 +00:00
parent ddd90b1482
commit b5a4747b9e
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tc/tc9300.cpp
View File

@ -924,7 +924,10 @@ void TInvioSispac::sispac_movim()
if (gruppo == 10) if (gruppo == 10)
gruppo = 0; gruppo = 0;
codice.format("%03ld%03ld%06ld", gruppo, conto, sottoconto); if (input.get(RMV_TIPOC).as_string().full())
codice.format("%01ld%02ld000%06ld", gruppo, conto, sottoconto);
else
codice.format("%01ld%02ld%03ld000000", gruppo, conto, sottoconto);
var = codice; var = codice;
recset.set("CODCONTO", var); recset.set("CODCONTO", var);
recset.set("TIPOREG", treg); recset.set("TIPOREG", treg);

1
tc/tcsciva.uml
View File

@ -81,7 +81,6 @@ BEGIN
KEY 1 KEY 1
GROUP 3 GROUP 3
FIELD SECOND FIELD SECOND
FLAG "Z"
END END
ENDPAGE ENDPAGE