diff --git a/cg/cg2100a.uml b/cg/cg2100a.uml index 8458002a9..da7f8fc08 100755 --- a/cg/cg2100a.uml +++ b/cg/cg2100a.uml @@ -73,6 +73,10 @@ BEGIN DISPLAY "Descrizione@50" DESCR DISPLAY "Tipo" TIPODOC DISPLAY "Registro" REG + DISPLAY "SC" TIPOMOV + DISPLAY "CA" MOVIND + DISPLAY "CE" COLLCESP + DISPLAY "770" M770 OUTPUT F_CODCAUS CODCAUS OUTPUT F_DESCRCAUS DESCR ADD RUN cg0 -4 diff --git a/cg/cg2200.cpp b/cg/cg2200.cpp index 091801679..356759a70 100755 --- a/cg/cg2200.cpp +++ b/cg/cg2200.cpp @@ -5,13 +5,17 @@ #include #include +#include + +#include "../ca/movana.h" +#include "../ca/calib01.h" +#include "../ca/calib02.h" + #include "cg2200.h" #include "cg2101.h" #include "cglib01.h" #include "cglib02.h" -#include - class TProvvisori_msk : public TAutomask { char _provv; // Tipo provvisori da cancellare @@ -235,6 +239,7 @@ public: void inizia_saldi(const TRectype& mov); void aggiungi_saldi(const TRectype& rmov, bool lettura); void aggiorna_saldi(); + void aggiorna_analitica(const long numreg); bool confirm_provv(TCursor& cur, TProgind& pi, TCursor_sheet* sheet= NULL); bool delete_provv(TCursor& cur, TProgind& pi, TCursor_sheet* sheet= NULL); @@ -301,6 +306,20 @@ void TProvvisori_app::aggiorna_saldi() _saldi.registra(); } +void TProvvisori_app::aggiorna_analitica(const long numreg) +{ + //cerca un eventuale movimento analitico collegato al contabile provvisorio in via d'estinzione + TLocalisamfile movana(LF_MOVANA); + movana.setkey(3); + movana.put(MOVANA_NUMREGCG, numreg); + //se trova il movana da accoppare... + if (movana.read() == NOERR) + { + TAnal_mov movana_to_kill(movana.curr()); + movana_to_kill.remove(movana); + } +} + bool TProvvisori_app::confirm_provv(TCursor& cur, TProgind& pi, TCursor_sheet* sheet) { TLocalisamfile& mov = cur.file(LF_MOV); @@ -349,8 +368,8 @@ bool TProvvisori_app::delete_provv(TCursor& cur, TProgind& pi, TCursor_sheet* sh { TLocalisamfile& mov = cur.file(LF_MOV); TLocalisamfile rmov(LF_RMOV); - TLocalisamfile rmoviva(LF_RMOVIVA); - + TLocalisamfile rmoviva(LF_RMOVIVA); + if (sheet && sheet->checked() == 0) sheet = NULL; @@ -403,8 +422,8 @@ bool TProvvisori_app::delete_provv(TCursor& cur, TProgind& pi, TCursor_sheet* sh if (err == NOERR) { aggiorna_saldi(); - pi.addstatus(1); - if (pi.iscancelled()) + aggiorna_analitica(numreg); //elimina anche il movimento analitico collegato + if (!pi.addstatus(1)) return warning_box(TR("Procedura interrotta dall'utente")); } else diff --git a/cg/cg3400a.uml b/cg/cg3400a.uml index dd5403608..86631e71c 100755 --- a/cg/cg3400a.uml +++ b/cg/cg3400a.uml @@ -4,7 +4,7 @@ PAGE "Stampa Libro Giornale" -1 -1 76 14 GROUPBOX DLG_NULL 74 3 BEGIN - PROMPT 1 0 "" + PROMPT 1 0 "" END NUMBER F_CODDITTA 5 @@ -33,7 +33,6 @@ DATE DATA_A BEGIN PROMPT 40 3 "Alla data " HELP "Stampa i movimenti fino alla data specificata" -// VALIDATE DATE_CMP_FUNC >= DATA_DA WARNING "Specificare la data di fine stampa" CHECKTYPE REQUIRED END @@ -60,7 +59,6 @@ BEGIN OUTPUT REG_DESC S0 CHECKTYPE REQUIRED WARNING "Registro assente" -// VALIDATE ZEROFILL_FUNC 3 FLAGS "UZ" END @@ -70,33 +68,9 @@ BEGIN FLAGS "D" END - -/* -GROUPBOX DLG_NULL 30 4 -BEGIN - PROMPT 1 8 "Intervallo" -END - -RADIOBUTTON DLG_NULL 12 -BEGIN - PROMPT 1 8 "" - HELP "Indicare l'intervallo di pagine da stampare" - ITEM "1|Tutto" MESSAGE CLEAR,PAGINA_DA|DISABLE,PAGINA_DA - ITEM "2|Da pagina " MESSAGE ENABLE,PAGINA_DA -END - -NUMBER PAGINA_DA 5 -BEGIN - PROMPT 18 10 "" - HELP "Numero di pagina da cui iniziare la stampa" -END - -*/ - GROUPBOX DLG_NULL 35 4 BEGIN PROMPT 40 8 "Formato pagina" -// PROMPT 1 8 "Formato pagina" END LISTBOX STAMPA_WIDTH 4 @@ -121,31 +95,12 @@ BEGIN MESSAGE FALSE ENABLE,DATA_DA END -/* -STRING F_CODVAL 3 -BEGIN - PROMPT 1 10 "Valuta " - USE %VAL - INPUT CODTAB F_CODVAL - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_CODVAL CODTAB - CHECKTYPE NORMAL -// Per ora non visibile - FLAGS "HU" -END -*/ +ENDPAGE -BUTTON DLG_PRINT 10 2 -BEGIN - PROMPT -12 -1 "~Stampa" - MESSAGE EXIT,K_ENTER -END -BUTTON DLG_QUIT 10 2 -BEGIN - PROMPT -22 -1 "" -END +TOOLBAR "" 0 0 0 2 + +#include "printbar.h" ENDPAGE