Patch level : 10.0 280
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:
parent
ddd90b1482
commit
b5a4747b9e
@ -924,7 +924,10 @@ void TInvioSispac::sispac_movim()
|
||||
if (gruppo == 10)
|
||||
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;
|
||||
recset.set("CODCONTO", var);
|
||||
recset.set("TIPOREG", treg);
|
||||
|
@ -81,7 +81,6 @@ BEGIN
|
||||
KEY 1
|
||||
GROUP 3
|
||||
FIELD SECOND
|
||||
FLAG "Z"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
Loading…
x
Reference in New Issue
Block a user