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

Patch level :4.0 738

Browse Source 
Files correlati     :ca2
Ricompilazione Demo : [ ]
Commento            :messo normal e non required il campo causale sul ribaltamento


git-svn-id: svn://10.65.10.50/trunk@15464 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-06-29 10:02:47 +00:00
parent 99e5928033
commit 622f4c17ed
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ca/ca2200.cpp
View File

@ -350,8 +350,8 @@ bool TRib_movanal_app::cappotta_movimento(TAnal_mov& anal_mov)
TRecord_array& input_rows = anal_mov.body(); //record_array con le righe del mov_anal (INPUT) TRecord_array& input_rows = anal_mov.body(); //record_array con le righe del mov_anal (INPUT)
//Per prima cosa prende le righe del movimento su RMOVANA e le ricompatta.. //Per prima cosa prende le righe del movimento su RMOVANA e le ricompatta..
TRecord_array compact_rows = input_rows; //record array con le righe compattate da creare con la TRecord_array compact_rows = input_rows; //record array con le righe compattate da creare con la..
compact_rows.destroy_rows(); //implode_rows() compact_rows.destroy_rows(); //..implode_rows(); intanto le azzera per sicurezza
//Imploditore //Imploditore
implode_rows(input_rows, compact_rows); implode_rows(input_rows, compact_rows);
@ -383,6 +383,7 @@ static bool cappotta_callback(const TRelation& rel, void* pJolly)
TRib_movanal_app& app = *(TRib_movanal_app*)pJolly; TRib_movanal_app& app = *(TRib_movanal_app*)pJolly;
const long numreg = rel.curr().get_long(MOVANA_NUMREG); const long numreg = rel.curr().get_long(MOVANA_NUMREG);
TAnal_mov anal_mov(numreg); TAnal_mov anal_mov(numreg);
//se va tutto bene riscrive l'intero movimento analitico con conseguente ricalcolo saldi
if (app.cappotta_movimento(anal_mov)) if (app.cappotta_movimento(anal_mov))
anal_mov.rewrite(rel.lfile()); anal_mov.rewrite(rel.lfile());

2
ca/ca2200a.uml
View File

@ -92,12 +92,12 @@ STRING F_CODCAUS 3
BEGIN BEGIN
PROMPT 1 0 "Causale " PROMPT 1 0 "Causale "
USE LF_CAUSALI SELECT MOVIND!="" USE LF_CAUSALI SELECT MOVIND!=""
CHECKTYPE REQUIRED
INPUT CODCAUS F_CODCAUS INPUT CODCAUS F_CODCAUS
DISPLAY "Codice" CODCAUS DISPLAY "Codice" CODCAUS
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_CODCAUS CODCAUS OUTPUT F_CODCAUS CODCAUS
OUTPUT F_DESCAUS DESCR OUTPUT F_DESCAUS DESCR
CHECKTYPE NORMAL
ADD RUN cg0 -4 ADD RUN cg0 -4
FLAGS "U" FLAGS "U"
END END