Rinominate applicazioni
git-svn-id: svn://10.65.10.50/trunk@635 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
35da5cc118
commit
e738fe49c0
@ -20,7 +20,7 @@
|
|||||||
#include "cg0201.h"
|
#include "cg0201.h"
|
||||||
|
|
||||||
|
|
||||||
class CG0200_application : public TRelation_application
|
class TClifo_application : public TRelation_application
|
||||||
{
|
{
|
||||||
TMask* _msk;
|
TMask* _msk;
|
||||||
TClifoVI *_rel;
|
TClifoVI *_rel;
|
||||||
@ -64,12 +64,12 @@ protected:
|
|||||||
|
|
||||||
public:
|
public:
|
||||||
virtual TRelation* get_relation() const {return (TRelation*)_rel;}
|
virtual TRelation* get_relation() const {return (TRelation*)_rel;}
|
||||||
CG0200_application(){}
|
TClifo_application(){}
|
||||||
};
|
};
|
||||||
|
|
||||||
inline CG0200_application& app() { return (CG0200_application&)main_app(); }
|
inline TClifo_application& app() { return (TClifo_application&)main_app(); }
|
||||||
|
|
||||||
bool CG0200_application::protected_record(TRectype &rec)
|
bool TClifo_application::protected_record(TRectype &rec)
|
||||||
|
|
||||||
{
|
{
|
||||||
TMask* m = get_mask(MODE_MOD);
|
TMask* m = get_mask(MODE_MOD);
|
||||||
@ -85,7 +85,7 @@ bool CG0200_application::protected_record(TRectype &rec)
|
|||||||
return FALSE;
|
return FALSE;
|
||||||
}
|
}
|
||||||
|
|
||||||
const char* CG0200_application::get_next_key()
|
const char* TClifo_application::get_next_key()
|
||||||
|
|
||||||
{
|
{
|
||||||
TLocalisamfile& clifo = _rel->lfile() ;
|
TLocalisamfile& clifo = _rel->lfile() ;
|
||||||
@ -223,7 +223,7 @@ HIDDEN bool autoexit_handler(TMask_field& f, KEY key)
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG0200_application::tipo_handler(TMask_field& f, KEY key)
|
bool TClifo_application::tipo_handler(TMask_field& f, KEY key)
|
||||||
|
|
||||||
{
|
{
|
||||||
TMask& m = f.mask();
|
TMask& m = f.mask();
|
||||||
@ -234,7 +234,7 @@ bool CG0200_application::tipo_handler(TMask_field& f, KEY key)
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG0200_application::percip_handler(TMask_field& f, KEY key)
|
bool TClifo_application::percip_handler(TMask_field& f, KEY key)
|
||||||
{
|
{
|
||||||
TMask& m = f.mask();
|
TMask& m = f.mask();
|
||||||
|
|
||||||
@ -353,7 +353,7 @@ HIDDEN bool codalleg_handler(TMask_field& f, KEY key)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG0200_application::init_pages(TMask& m)
|
void TClifo_application::init_pages(TMask& m)
|
||||||
{
|
{
|
||||||
TConfig conf(CONFIG_DITTA, "cg");
|
TConfig conf(CONFIG_DITTA, "cg");
|
||||||
_lbcn = conf.get_bool("GsLbCn");
|
_lbcn = conf.get_bool("GsLbCn");
|
||||||
@ -374,7 +374,7 @@ void CG0200_application::init_pages(TMask& m)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG0200_application::init_query_mode(TMask& m)
|
void TClifo_application::init_query_mode(TMask& m)
|
||||||
|
|
||||||
{
|
{
|
||||||
init_pages(m);
|
init_pages(m);
|
||||||
@ -385,7 +385,7 @@ void CG0200_application::init_query_mode(TMask& m)
|
|||||||
m.set(F_TIPOCF, "F");
|
m.set(F_TIPOCF, "F");
|
||||||
}
|
}
|
||||||
|
|
||||||
int CG0200_application::read(TMask& m)
|
int TClifo_application::read(TMask& m)
|
||||||
{
|
{
|
||||||
TToken_string riga(240);
|
TToken_string riga(240);
|
||||||
|
|
||||||
@ -424,32 +424,32 @@ int CG0200_application::read(TMask& m)
|
|||||||
return _rel->status();
|
return _rel->status();
|
||||||
}
|
}
|
||||||
|
|
||||||
int CG0200_application::rewrite(const TMask& m)
|
int TClifo_application::rewrite(const TMask& m)
|
||||||
{
|
{
|
||||||
common_f(m);
|
common_f(m);
|
||||||
return _rel->rewrite(TRUE);
|
return _rel->rewrite(TRUE);
|
||||||
}
|
}
|
||||||
|
|
||||||
int CG0200_application::write(const TMask& m)
|
int TClifo_application::write(const TMask& m)
|
||||||
{
|
{
|
||||||
common_f(m);
|
common_f(m);
|
||||||
return _rel->write(TRUE);
|
return _rel->write(TRUE);
|
||||||
}
|
}
|
||||||
|
|
||||||
TArray_sheet* CG0200_application::field_sheet(const int n) const
|
TArray_sheet* TClifo_application::field_sheet(const int n) const
|
||||||
{
|
{
|
||||||
TEdit_field& f=(TEdit_field&) _msk->field(n);
|
TEdit_field& f=(TEdit_field&) _msk->field(n);
|
||||||
TArray_sheet* S=(TArray_sheet*) f.sheet()->sheet();
|
TArray_sheet* S=(TArray_sheet*) f.sheet()->sheet();
|
||||||
return S;
|
return S;
|
||||||
}
|
}
|
||||||
|
|
||||||
TSheet_field& CG0200_application::indsp_sheet() const
|
TSheet_field& TClifo_application::indsp_sheet() const
|
||||||
{
|
{
|
||||||
TSheet_field& o_sheet=(TSheet_field&) _msk->field(F_SHEET_G_VEN);
|
TSheet_field& o_sheet=(TSheet_field&) _msk->field(F_SHEET_G_VEN);
|
||||||
return o_sheet;
|
return o_sheet;
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG0200_application::reset_sheet()
|
void TClifo_application::reset_sheet()
|
||||||
{
|
{
|
||||||
const TToken_string nulla("|**Nessuno**||||");
|
const TToken_string nulla("|**Nessuno**||||");
|
||||||
|
|
||||||
@ -461,7 +461,7 @@ void CG0200_application::reset_sheet()
|
|||||||
app().field_sheet(F_CODINDEFF)->add(nulla);
|
app().field_sheet(F_CODINDEFF)->add(nulla);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG0200_application::indsp_pack()
|
void TClifo_application::indsp_pack()
|
||||||
{
|
{
|
||||||
TArray& rows = indsp_sheet().rows_array();
|
TArray& rows = indsp_sheet().rows_array();
|
||||||
int nr=rows.items();
|
int nr=rows.items();
|
||||||
@ -475,7 +475,7 @@ void CG0200_application::indsp_pack()
|
|||||||
rows.pack();
|
rows.pack();
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG0200_application::common_f(const TMask& m)
|
void TClifo_application::common_f(const TMask& m)
|
||||||
{
|
{
|
||||||
char tipocf = m.get(F_TIPOCF)[0];
|
char tipocf = m.get(F_TIPOCF)[0];
|
||||||
long codcf = m.get_long(F_CODCF);
|
long codcf = m.get_long(F_CODCF);
|
||||||
@ -509,7 +509,7 @@ void CG0200_application::common_f(const TMask& m)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG0200_application::indsp_handler(TMask_field& f, KEY key)
|
bool TClifo_application::indsp_handler(TMask_field& f, KEY key)
|
||||||
{
|
{
|
||||||
static int first_time=1;
|
static int first_time=1;
|
||||||
|
|
||||||
@ -540,7 +540,7 @@ bool CG0200_application::indsp_handler(TMask_field& f, KEY key)
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG0200_application::indsp_notify(int r, KEY key)
|
bool TClifo_application::indsp_notify(int r, KEY key)
|
||||||
{
|
{
|
||||||
TSheet_field& indsp=app().indsp_sheet();
|
TSheet_field& indsp=app().indsp_sheet();
|
||||||
|
|
||||||
@ -578,7 +578,7 @@ default:
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG0200_application::user_create() // initvar e arrmask
|
bool TClifo_application::user_create() // initvar e arrmask
|
||||||
{
|
{
|
||||||
_rel = new TClifoVI;
|
_rel = new TClifoVI;
|
||||||
|
|
||||||
@ -612,7 +612,7 @@ bool CG0200_application::user_create() // initvar e arrmask
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG0200_application::user_destroy() // releasev e arrmask
|
bool TClifo_application::user_destroy() // releasev e arrmask
|
||||||
{
|
{
|
||||||
delete _msk;
|
delete _msk;
|
||||||
delete _rel;
|
delete _rel;
|
||||||
@ -626,7 +626,7 @@ bool CG0200_application::user_destroy() // releasev e arrmask
|
|||||||
|
|
||||||
int cg0200(int argc, char* argv[])
|
int cg0200(int argc, char* argv[])
|
||||||
{
|
{
|
||||||
CG0200_application a;
|
TClifo_application a;
|
||||||
|
|
||||||
a.run(argc, argv, "Clienti/Fornitori");
|
a.run(argc, argv, "Clienti/Fornitori");
|
||||||
return 0;
|
return 0;
|
||||||
|
@ -17,6 +17,7 @@ END
|
|||||||
NUMBER F_ANNO 4
|
NUMBER F_ANNO 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Anno "
|
PROMPT 2 1 "Anno "
|
||||||
|
HELP "Anno di cui si vogliono visualizzare i saldi"
|
||||||
FIELD LF_ALLEG->ANNO
|
FIELD LF_ALLEG->ANNO
|
||||||
FLAGS "PRZA"
|
FLAGS "PRZA"
|
||||||
KEY 1
|
KEY 1
|
||||||
@ -45,6 +46,7 @@ END
|
|||||||
NUMBER F_CODDITTA 5
|
NUMBER F_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Ditta "
|
PROMPT 2 2 "Ditta "
|
||||||
|
HELP "Ditta di cui si vogliono visualizzare i saldi"
|
||||||
FLAGS "RPDG"
|
FLAGS "RPDG"
|
||||||
USE LF_NDITTE
|
USE LF_NDITTE
|
||||||
INPUT CODDITTA F_CODDITTA
|
INPUT CODDITTA F_CODDITTA
|
||||||
@ -63,6 +65,7 @@ END
|
|||||||
STRING F_CODATT 5
|
STRING F_CODATT 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Cod.attivita' "
|
PROMPT 2 3 "Cod.attivita' "
|
||||||
|
HELP "Codice dell'attivita' della ditta"
|
||||||
FIELD LF_ALLEG->CODATT
|
FIELD LF_ALLEG->CODATT
|
||||||
FLAGS "PRZ"
|
FLAGS "PRZ"
|
||||||
KEY 1
|
KEY 1
|
||||||
@ -108,7 +111,7 @@ BEGIN
|
|||||||
PROMPT 2 4 "Tipo "
|
PROMPT 2 4 "Tipo "
|
||||||
FIELD LF_ALLEG->TIPOCF
|
FIELD LF_ALLEG->TIPOCF
|
||||||
KEY 1
|
KEY 1
|
||||||
HELP "Indicare se cliente oppure se fornitore"
|
HELP "Indicare se cliente, fornitore oppure bolletta doganale"
|
||||||
ITEM "C|Clienti"
|
ITEM "C|Clienti"
|
||||||
MESSAGE "Op. non imp. ed esenti ",99
|
MESSAGE "Op. non imp. ed esenti ",99
|
||||||
MESSAGE "Operazioni non imponibili (mod 101) ",F_PROMPT
|
MESSAGE "Operazioni non imponibili (mod 101) ",F_PROMPT
|
||||||
@ -130,7 +133,7 @@ BEGIN
|
|||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
KEY 1
|
KEY 1
|
||||||
COPY ALL F_ANNO
|
COPY ALL F_ANNO
|
||||||
HELP "Indicare il codice relativo al cliente o fornitore"
|
HELP "Codice relativo al cliente o fornitore"
|
||||||
ADD RUN cg0 -1
|
ADD RUN cg0 -1
|
||||||
WARNING "Registrazione assente"
|
WARNING "Registrazione assente"
|
||||||
GROUP 1
|
GROUP 1
|
||||||
@ -154,7 +157,7 @@ BEGIN
|
|||||||
OUTPUT F_RAGSOC RAGSOC
|
OUTPUT F_RAGSOC RAGSOC
|
||||||
OUTPUT F_COFI COFI
|
OUTPUT F_COFI COFI
|
||||||
OUTPUT F_PAIV PAIV
|
OUTPUT F_PAIV PAIV
|
||||||
HELP "Indicare il codice relativo al cliente o fornitore"
|
HELP "Codice relativo al cliente o fornitore"
|
||||||
ADD RUN cg0 -1
|
ADD RUN cg0 -1
|
||||||
WARNING "Cliente assente"
|
WARNING "Cliente assente"
|
||||||
GROUP 2
|
GROUP 2
|
||||||
@ -164,6 +167,7 @@ END
|
|||||||
BOOLEAN F_IMMESSO
|
BOOLEAN F_IMMESSO
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 64 4 "Immesso"
|
PROMPT 64 4 "Immesso"
|
||||||
|
HELP "Indicare se il saldo e' stato immesso da utente"
|
||||||
FIELD LF_ALLEG->IMMESSO
|
FIELD LF_ALLEG->IMMESSO
|
||||||
KEY 1
|
KEY 1
|
||||||
END
|
END
|
||||||
@ -180,7 +184,7 @@ BEGIN
|
|||||||
DISPLAY "Tipo" TIPOCF
|
DISPLAY "Tipo" TIPOCF
|
||||||
DISPLAY "Codice" CODCF
|
DISPLAY "Codice" CODCF
|
||||||
COPY OUTPUT F_CODCFH
|
COPY OUTPUT F_CODCFH
|
||||||
HELP "Indicare se si tratta di una persona fisica o di una societa'"
|
HELP "Ragione sociale del cliente o fornitore"
|
||||||
WARNING "Ragione sociale assente"
|
WARNING "Ragione sociale assente"
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -196,7 +200,7 @@ BEGIN
|
|||||||
DISPLAY "Codice" CODCF
|
DISPLAY "Codice" CODCF
|
||||||
DISPLAY "Ragione sociale@50" RAGSOC
|
DISPLAY "Ragione sociale@50" RAGSOC
|
||||||
COPY OUTPUT F_CODCFH
|
COPY OUTPUT F_CODCFH
|
||||||
HELP "Indicare il codice fiscale"
|
HELP "Codice fiscale del cliente o fornitore"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
WARNING "Codice fiscale assente"
|
WARNING "Codice fiscale assente"
|
||||||
END
|
END
|
||||||
@ -214,7 +218,7 @@ BEGIN
|
|||||||
DISPLAY "Ragione sociale@50" RAGSOC
|
DISPLAY "Ragione sociale@50" RAGSOC
|
||||||
DISPLAY "Codice fiscale " COFI
|
DISPLAY "Codice fiscale " COFI
|
||||||
COPY OUTPUT F_CODCFH
|
COPY OUTPUT F_CODCFH
|
||||||
HELP "Inserire la partita IVA"
|
HELP "Partita IVA del cliente o fornitore"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
WARNING "Partita IVA assente"
|
WARNING "Partita IVA assente"
|
||||||
END
|
END
|
||||||
@ -242,6 +246,7 @@ END
|
|||||||
NUMBER F_IMPESC 15
|
NUMBER F_IMPESC 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 25 9 ""
|
PROMPT 25 9 ""
|
||||||
|
HELP "Totale operazioni imponibili anno corrente"
|
||||||
FIELD LF_ALLEG->IMPESC
|
FIELD LF_ALLEG->IMPESC
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
@ -251,6 +256,7 @@ END
|
|||||||
NUMBER F_IMPESP 15
|
NUMBER F_IMPESP 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 42 9 ""
|
PROMPT 42 9 ""
|
||||||
|
HELP "Totale operazioni imponibili anno corrente"
|
||||||
FIELD LF_ALLEG->IMPESP
|
FIELD LF_ALLEG->IMPESP
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
@ -273,6 +279,7 @@ END
|
|||||||
NUMBER F_IVAESC 15
|
NUMBER F_IVAESC 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 25 10 ""
|
PROMPT 25 10 ""
|
||||||
|
HELP "Totale imposte addebitate dell'anno corrente"
|
||||||
FIELD LF_ALLEG->IVAESC
|
FIELD LF_ALLEG->IVAESC
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
@ -282,6 +289,7 @@ END
|
|||||||
NUMBER F_IVAESP 15
|
NUMBER F_IVAESP 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 42 10 ""
|
PROMPT 42 10 ""
|
||||||
|
HELP "Totale imposte addebitate dell'anno precedente"
|
||||||
FIELD LF_ALLEG->IVAESP
|
FIELD LF_ALLEG->IVAESP
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
@ -307,7 +315,7 @@ BEGIN
|
|||||||
FIELD LF_ALLEG->NIESC
|
FIELD LF_ALLEG->NIESC
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
HELP "Operazioni non imponibili ed esenti dell'anno corrente"
|
HELP "Totale operazioni non imponibili ed esenti dell'anno corrente"
|
||||||
MESSAGE K_TAB,F_TOTALE3|K_TAB,F_TOTALE5
|
MESSAGE K_TAB,F_TOTALE3|K_TAB,F_TOTALE5
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -317,7 +325,7 @@ BEGIN
|
|||||||
FIELD LF_ALLEG->NIESP
|
FIELD LF_ALLEG->NIESP
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
HELP "Operazioni non imponibili ed esenti dell'anno precedente"
|
HELP "Totale operazioni non imponibili ed esenti dell'anno precedente"
|
||||||
MESSAGE K_TAB,F_TOTALE3|K_TAB,F_TOTALE6
|
MESSAGE K_TAB,F_TOTALE3|K_TAB,F_TOTALE6
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -342,7 +350,7 @@ BEGIN
|
|||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
GROUP 6
|
GROUP 6
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
HELP "Operazioni non imponibili (Art. 8 2^c) dell'anno corrente"
|
HELP "Totale operazioni non imponibili (Art. 8 2^c) dell'anno corrente"
|
||||||
MESSAGE K_TAB,F_TOTALE4|K_TAB,F_TOTALE5
|
MESSAGE K_TAB,F_TOTALE4|K_TAB,F_TOTALE5
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -353,7 +361,7 @@ BEGIN
|
|||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
GROUP 6
|
GROUP 6
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
HELP "Operazioni non imponibili (Art. 8 2^c) dell'anno precedente"
|
HELP "Totale operazioni non imponibili (Art. 8 2^c) dell'anno precedente"
|
||||||
MESSAGE K_TAB,F_TOTALE4|K_TAB,F_TOTALE6
|
MESSAGE K_TAB,F_TOTALE4|K_TAB,F_TOTALE6
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -396,6 +404,7 @@ END
|
|||||||
NUMBER F_NDOCESC 4
|
NUMBER F_NDOCESC 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 25 15 ""
|
PROMPT 25 15 ""
|
||||||
|
HELP "Numero di fatture ricevute nell'anno in corso dal fornitore"
|
||||||
FIELD LF_ALLEG->NDOCESC
|
FIELD LF_ALLEG->NDOCESC
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
GROUP 6
|
GROUP 6
|
||||||
@ -405,6 +414,7 @@ END
|
|||||||
NUMBER F_NDOCESP 4
|
NUMBER F_NDOCESP 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 42 15 ""
|
PROMPT 42 15 ""
|
||||||
|
HELP "Numero di fatture ricevute nell'anno precedente dal fornitore"
|
||||||
FIELD LF_ALLEG->NDOCESP
|
FIELD LF_ALLEG->NDOCESP
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
GROUP 6
|
GROUP 6
|
||||||
@ -430,7 +440,7 @@ BEGIN
|
|||||||
FIELD LF_ALLEG->PROG101102
|
FIELD LF_ALLEG->PROG101102
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
HELP "Indicare le operazioni non imponibili Art. 8 1^c, Artt. 8 bis, 9 e 72"
|
HELP "Totale operazioni non imponibili Art. 8 1^c, Artt. 8 bis, 9 e 72"
|
||||||
END
|
END
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
@ -2,18 +2,17 @@
|
|||||||
|
|
||||||
#include <mask.h>
|
#include <mask.h>
|
||||||
#include <printapp.h>
|
#include <printapp.h>
|
||||||
#include <scanner.h>
|
|
||||||
#include <relation.h>
|
#include <relation.h>
|
||||||
#include <tabutil.h>
|
#include <tabutil.h>
|
||||||
#include <utility.h>
|
#include <utility.h>
|
||||||
#include <lffiles.h>
|
|
||||||
#include <nditte.h>
|
#include <nditte.h>
|
||||||
#include <comuni.h>
|
#include <comuni.h>
|
||||||
#include <anagr.h>
|
#include <anagr.h>
|
||||||
#include <causali.h>
|
#include <causali.h>
|
||||||
#include <rcausali.h>
|
#include <rcausali.h>
|
||||||
#include <conto.h>
|
|
||||||
|
|
||||||
|
#include "conto.h"
|
||||||
#include "cg1.h"
|
#include "cg1.h"
|
||||||
#include "cg1700.h"
|
#include "cg1700.h"
|
||||||
|
|
||||||
|
@ -4,17 +4,32 @@
|
|||||||
// fv 21-1-94
|
// fv 21-1-94
|
||||||
// ------------------------------------------------------------
|
// ------------------------------------------------------------
|
||||||
|
|
||||||
|
#include <defmask.h>
|
||||||
|
#include <progind.h>
|
||||||
|
#include <sheet.h>
|
||||||
|
|
||||||
#include "cg4300.h"
|
#include "cg4300.h"
|
||||||
#include "cg4300a.h"
|
#include "cg4300a.h"
|
||||||
|
|
||||||
#include <mov.h>
|
#include <mov.h>
|
||||||
#include <mailbox.h>
|
#include <mailbox.h>
|
||||||
|
|
||||||
real CG4300_App::CENTO(100.0);
|
real TLiquidazione_app::CENTO(100.0);
|
||||||
|
|
||||||
inline CG4300_App& app()
|
inline TLiquidazione_app& app()
|
||||||
{ return (CG4300_App&)main_app(); }
|
{ return (TLiquidazione_app&)main_app(); }
|
||||||
|
|
||||||
bool CG4300_App::user_create()
|
TLiquidazione_app::TLiquidazione_app()
|
||||||
|
: _ditte(NULL), _selected(10000), _year(4), _nomiditte(100)
|
||||||
|
{
|
||||||
|
_isprint = TRUE; _recalc = needed;
|
||||||
|
_isplafond = FALSE; _isfinal = FALSE;
|
||||||
|
_isvent = _isagricolo = _isbenzinaro = _isviaggio = FALSE;
|
||||||
|
_row = 1; _what = all; _comp_acconto = FALSE;
|
||||||
|
_isriepilogo = FALSE; _calcall = FALSE;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TLiquidazione_app::user_create()
|
||||||
{
|
{
|
||||||
// vediamo se c'e' il messaggio per calcolare in batch
|
// vediamo se c'e' il messaggio per calcolare in batch
|
||||||
TMailbox m;
|
TMailbox m;
|
||||||
@ -187,7 +202,7 @@ bool CG4300_App::user_create()
|
|||||||
return is_interactive;
|
return is_interactive;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::user_destroy()
|
bool TLiquidazione_app::user_destroy()
|
||||||
{
|
{
|
||||||
delete _ditte;
|
delete _ditte;
|
||||||
|
|
||||||
@ -231,7 +246,7 @@ bool CG4300_App::user_destroy()
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::set_print(int n)
|
bool TLiquidazione_app::set_print(int n)
|
||||||
{
|
{
|
||||||
_descr_arr.destroy();
|
_descr_arr.destroy();
|
||||||
|
|
||||||
@ -304,7 +319,7 @@ bool CG4300_App::set_print(int n)
|
|||||||
return FALSE;
|
return FALSE;
|
||||||
}
|
}
|
||||||
|
|
||||||
long CG4300_App::select_firm_range(long from, long to, wht freq)
|
long TLiquidazione_app::select_firm_range(long from, long to, wht freq)
|
||||||
{
|
{
|
||||||
if (to == 0) to = 99999L;
|
if (to == 0) to = 99999L;
|
||||||
|
|
||||||
@ -323,7 +338,7 @@ long CG4300_App::select_firm_range(long from, long to, wht freq)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
bool CG4300_App::to_ditta_handler(TMask_field& f, KEY key)
|
bool TLiquidazione_app::to_ditta_handler(TMask_field& f, KEY key)
|
||||||
{
|
{
|
||||||
if (key == K_TAB && f.focusdirty() || key == K_ENTER)
|
if (key == K_TAB && f.focusdirty() || key == K_ENTER)
|
||||||
{
|
{
|
||||||
@ -343,7 +358,7 @@ bool CG4300_App::to_ditta_handler(TMask_field& f, KEY key)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
bool CG4300_App::set_liquidazione()
|
bool TLiquidazione_app::set_liquidazione()
|
||||||
{
|
{
|
||||||
TMask m("cg4300a.msk");
|
TMask m("cg4300a.msk");
|
||||||
m.set_handler(CG43_FLD_DTO, to_ditta_handler);
|
m.set_handler(CG43_FLD_DTO, to_ditta_handler);
|
||||||
@ -445,7 +460,7 @@ bool CG4300_App::set_liquidazione()
|
|||||||
|
|
||||||
int cg4300(int argc, char* argv[])
|
int cg4300(int argc, char* argv[])
|
||||||
{
|
{
|
||||||
CG4300_App main_app;
|
TLiquidazione_app main_app;
|
||||||
main_app.run(argc, argv, "Liquidazione IVA");
|
main_app.run(argc, argv, "Liquidazione IVA");
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
33
cg/cg4300.h
33
cg/cg4300.h
@ -1,16 +1,17 @@
|
|||||||
// of course this is -*-C++-*-
|
// of course this is -*-C++-*-
|
||||||
// Questa e' la famosa palla della liquidazione IVA
|
// Questa e' la famosa palla della liquidazione IVA
|
||||||
|
|
||||||
#include <printapp.h>
|
#ifndef __MASK_H
|
||||||
#include <isam.h>
|
|
||||||
#include <lffiles.h>
|
|
||||||
#include <urldefid.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <utility.h>
|
|
||||||
#include <sheet.h>
|
|
||||||
#include <progind.h>
|
|
||||||
#include <tabutil.h>
|
|
||||||
#include <mask.h>
|
#include <mask.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifndef __PRINTAPP_H
|
||||||
|
#include <printapp.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifndef __TABUTIL_H
|
||||||
|
#include <tabutil.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
// ------------------------------------------------------------------
|
// ------------------------------------------------------------------
|
||||||
// Parametri modificabili
|
// Parametri modificabili
|
||||||
@ -148,7 +149,7 @@ public:
|
|||||||
// Application
|
// Application
|
||||||
// ------------------------------------------------------------------------
|
// ------------------------------------------------------------------------
|
||||||
|
|
||||||
class CG4300_App : public TPrinter_application
|
class TLiquidazione_app : public TPrint_application
|
||||||
{
|
{
|
||||||
TArray_sheet* _ditte;
|
TArray_sheet* _ditte;
|
||||||
wht _what;
|
wht _what;
|
||||||
@ -376,16 +377,8 @@ public:
|
|||||||
void set_acchead_p(_DescrItem& d);
|
void set_acchead_p(_DescrItem& d);
|
||||||
|
|
||||||
// cippiuppiu'
|
// cippiuppiu'
|
||||||
CG4300_App() : TPrintapp(), _ditte(NULL), _selected(10000), _year(4),
|
TLiquidazione_app();
|
||||||
_nomiditte(100)
|
virtual ~TLiquidazione_app() {}
|
||||||
{
|
|
||||||
_isprint = TRUE; _recalc = needed;
|
|
||||||
_isplafond = FALSE; _isfinal = FALSE;
|
|
||||||
_isvent = _isagricolo = _isbenzinaro = _isviaggio = FALSE;
|
|
||||||
_row = 1; _what = all; _comp_acconto = FALSE;
|
|
||||||
_isriepilogo = FALSE; _calcall = FALSE;
|
|
||||||
}
|
|
||||||
virtual ~CG4300_App() {}
|
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
||||||
|
@ -4,13 +4,13 @@
|
|||||||
// fv 21-1-94
|
// fv 21-1-94
|
||||||
// ------------------------------------------------------------
|
// ------------------------------------------------------------
|
||||||
|
|
||||||
#include "cg4300.h"
|
#include <progind.h>
|
||||||
|
|
||||||
char buf[256];
|
#include "cg4300.h"
|
||||||
|
|
||||||
// -------------------- QUI comincia l'avventura --------------------------
|
// -------------------- QUI comincia l'avventura --------------------------
|
||||||
|
|
||||||
bool CG4300_App::recalc_all()
|
bool TLiquidazione_app::recalc_all()
|
||||||
{
|
{
|
||||||
long l;
|
long l;
|
||||||
|
|
||||||
@ -74,7 +74,7 @@ bool CG4300_App::recalc_all()
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::update_firm(int month, bool recalc)
|
bool TLiquidazione_app::update_firm(int month, bool recalc)
|
||||||
{
|
{
|
||||||
// Se recalc e' TRUE considera la necessita' di ricalcolare e le
|
// Se recalc e' TRUE considera la necessita' di ricalcolare e le
|
||||||
// opzioni utente. Se FALSE se ne impipa dell'utente e ricalcola
|
// opzioni utente. Se FALSE se ne impipa dell'utente e ricalcola
|
||||||
@ -105,6 +105,7 @@ bool CG4300_App::update_firm(int month, bool recalc)
|
|||||||
_nditte->save_status();
|
_nditte->save_status();
|
||||||
if (_nditte->is_first_match(LF_ATTIV))
|
if (_nditte->is_first_match(LF_ATTIV))
|
||||||
{
|
{
|
||||||
|
char buf[256];
|
||||||
do
|
do
|
||||||
{
|
{
|
||||||
TString16 codatt = _nditte->curr(LF_ATTIV).get("CODATT");
|
TString16 codatt = _nditte->curr(LF_ATTIV).get("CODATT");
|
||||||
@ -214,7 +215,7 @@ bool CG4300_App::update_firm(int month, bool recalc)
|
|||||||
return ok || calc;
|
return ok || calc;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::update_att(int month, const char* codatt, bool recalc)
|
bool TLiquidazione_app::update_att(int month, const char* codatt, bool recalc)
|
||||||
// viene passato un codice attivita' con codatt+tipoatt
|
// viene passato un codice attivita' con codatt+tipoatt
|
||||||
// vedi update_firm per il burdel dei calc e recalc
|
// vedi update_firm per il burdel dei calc e recalc
|
||||||
|
|
||||||
@ -241,7 +242,7 @@ bool CG4300_App::update_att(int month, const char* codatt, bool recalc)
|
|||||||
return ok || calc;
|
return ok || calc;
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::zero_att(int month, const char* codatt)
|
void TLiquidazione_app::zero_att(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
for (_pim->first(); !_pim->eof(); _pim->next())
|
for (_pim->first(); !_pim->eof(); _pim->next())
|
||||||
{
|
{
|
||||||
@ -259,7 +260,7 @@ void CG4300_App::zero_att(int month, const char* codatt)
|
|||||||
zero_plafond(month,codatt);
|
zero_plafond(month,codatt);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::recalc_att(int month, const char* codatt)
|
void TLiquidazione_app::recalc_att(int month, const char* codatt)
|
||||||
// il codatt passato e' codice att + tipo att ( IN {1|2} )
|
// il codatt passato e' codice att + tipo att ( IN {1|2} )
|
||||||
{
|
{
|
||||||
real totintra = 0.0;
|
real totintra = 0.0;
|
||||||
@ -666,7 +667,7 @@ void CG4300_App::recalc_att(int month, const char* codatt)
|
|||||||
_lim->rewrite();
|
_lim->rewrite();
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::write_liq(int month, const char* codatts)
|
void TLiquidazione_app::write_liq(int month, const char* codatts)
|
||||||
// Calcolo liq. mensili e progr. liq. annuali
|
// Calcolo liq. mensili e progr. liq. annuali
|
||||||
{
|
{
|
||||||
TToken_string atts(codatts);
|
TToken_string atts(codatts);
|
||||||
@ -738,7 +739,7 @@ void CG4300_App::write_liq(int month, const char* codatts)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::recalc_annual(const char* att)
|
void TLiquidazione_app::recalc_annual(const char* att)
|
||||||
{
|
{
|
||||||
// calcolo volume d'affari e altro
|
// calcolo volume d'affari e altro
|
||||||
real es_b1 = 0.0;
|
real es_b1 = 0.0;
|
||||||
@ -832,7 +833,7 @@ void CG4300_App::recalc_annual(const char* att)
|
|||||||
_pla->rewrite();
|
_pla->rewrite();
|
||||||
}
|
}
|
||||||
|
|
||||||
_DescrItem* CG4300_App::recalc_rimborso(int month, const char* codatts)
|
_DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts)
|
||||||
{
|
{
|
||||||
bool rimborsami = FALSE;
|
bool rimborsami = FALSE;
|
||||||
_DescrItem* d = NULL;
|
_DescrItem* d = NULL;
|
||||||
|
@ -5,13 +5,15 @@
|
|||||||
// --------------------------------------------------------------
|
// --------------------------------------------------------------
|
||||||
|
|
||||||
#include <config.h>
|
#include <config.h>
|
||||||
|
#include <utility.h>
|
||||||
|
|
||||||
#include "cg4300.h"
|
#include "cg4300.h"
|
||||||
|
|
||||||
bool CG4300_App::is_trim(int x)
|
bool TLiquidazione_app::is_trim(int x)
|
||||||
// TRUE se il mese passato e' un trimestre
|
// TRUE se il mese passato e' un trimestre
|
||||||
{ return x == 3 || x == 6 || x == 9 || x == 12; }
|
{ return x == 3 || x == 6 || x == 9 || x == 12; }
|
||||||
|
|
||||||
bool CG4300_App::is_month_ok(int x, int month)
|
bool TLiquidazione_app::is_month_ok(int x, int month)
|
||||||
// TRUE se il mese passato e' compatibile con il regime
|
// TRUE se il mese passato e' compatibile con il regime
|
||||||
// di liquidazione e (opz) non e' maggiore di quello scelto
|
// di liquidazione e (opz) non e' maggiore di quello scelto
|
||||||
{
|
{
|
||||||
@ -21,13 +23,13 @@ bool CG4300_App::is_month_ok(int x, int month)
|
|||||||
( x <= month && is_trim(x));
|
( x <= month && is_trim(x));
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::is_first_month(int m)
|
bool TLiquidazione_app::is_first_month(int m)
|
||||||
{
|
{
|
||||||
return _freqviva == "M" ?
|
return _freqviva == "M" ?
|
||||||
m == 1 : m == 3;
|
m == 1 : m == 3;
|
||||||
}
|
}
|
||||||
|
|
||||||
int CG4300_App::previous_month(int m)
|
int TLiquidazione_app::previous_month(int m)
|
||||||
{
|
{
|
||||||
if (m == 13) m = 12;
|
if (m == 13) m = 12;
|
||||||
if (_freqviva == "M")
|
if (_freqviva == "M")
|
||||||
@ -35,7 +37,7 @@ int CG4300_App::previous_month(int m)
|
|||||||
else return m == 3 ? 3 : m - 3;
|
else return m == 3 ? 3 : m - 3;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::check_month(int m, int m2)
|
bool TLiquidazione_app::check_month(int m, int m2)
|
||||||
// se si sta ricalcolando una liquidazione
|
// se si sta ricalcolando una liquidazione
|
||||||
// annuale di check, ritorna TRUE per tutti i
|
// annuale di check, ritorna TRUE per tutti i
|
||||||
// mesi, altrimenti solo per quello in corso
|
// mesi, altrimenti solo per quello in corso
|
||||||
@ -44,7 +46,7 @@ bool CG4300_App::check_month(int m, int m2)
|
|||||||
return (_isannual || _isriepilogo) ? m < 13 : m == m2;
|
return (_isannual || _isriepilogo) ? m < 13 : m == m2;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::is_date_ok(TDate& d, int month)
|
bool TLiquidazione_app::is_date_ok(TDate& d, int month)
|
||||||
// TRUE se la data passata va considerata nel
|
// TRUE se la data passata va considerata nel
|
||||||
// ricalcolo dei progressivi per il mese e anno
|
// ricalcolo dei progressivi per il mese e anno
|
||||||
// selezionati
|
// selezionati
|
||||||
@ -58,7 +60,7 @@ bool CG4300_App::is_date_ok(TDate& d, int month)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::add_ventilation(real iva, real howmuch, const char* codiva)
|
void TLiquidazione_app::add_ventilation(real iva, real howmuch, const char* codiva)
|
||||||
{
|
{
|
||||||
_VentItem* vi = NULL;
|
_VentItem* vi = NULL;
|
||||||
for (int i = 0; i < _vent_arr.items(); i++)
|
for (int i = 0; i < _vent_arr.items(); i++)
|
||||||
@ -76,7 +78,7 @@ void CG4300_App::add_ventilation(real iva, real howmuch, const char* codiva)
|
|||||||
vi->_totale += howmuch;
|
vi->_totale += howmuch;
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::add_vendite(int month, const char* codreg, real& r)
|
void TLiquidazione_app::add_vendite(int month, const char* codreg, real& r)
|
||||||
{
|
{
|
||||||
_VendItem* vi = NULL;
|
_VendItem* vi = NULL;
|
||||||
|
|
||||||
@ -95,7 +97,7 @@ void CG4300_App::add_vendite(int month, const char* codreg, real& r)
|
|||||||
vi->_totale += r;
|
vi->_totale += r;
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::add_corrisp(int month, const char* codreg, real& r,
|
void TLiquidazione_app::add_corrisp(int month, const char* codreg, real& r,
|
||||||
real& p, const char * codiva)
|
real& p, const char * codiva)
|
||||||
{
|
{
|
||||||
_CorrItem* ci = NULL;
|
_CorrItem* ci = NULL;
|
||||||
@ -120,7 +122,7 @@ void CG4300_App::add_corrisp(int month, const char* codreg, real& r,
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
bool CG4300_App::look_pim(int month, const char* codatt, const char* codreg,
|
bool TLiquidazione_app::look_pim(int month, const char* codatt, const char* codreg,
|
||||||
const char* tipocr, const char* codiva,
|
const char* tipocr, const char* codiva,
|
||||||
bool create)
|
bool create)
|
||||||
// ritorna il PIM corrispondente alla chiave passata; se
|
// ritorna il PIM corrispondente alla chiave passata; se
|
||||||
@ -149,7 +151,7 @@ bool CG4300_App::look_pim(int month, const char* codatt, const char* codreg,
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_plm(int m, const char* a, bool create)
|
bool TLiquidazione_app::look_plm(int m, const char* a, bool create)
|
||||||
{
|
{
|
||||||
bool ok = FALSE;
|
bool ok = FALSE;
|
||||||
|
|
||||||
@ -171,7 +173,7 @@ bool CG4300_App::look_plm(int m, const char* a, bool create)
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_ptm(int m, const char* a, bool create)
|
bool TLiquidazione_app::look_ptm(int m, const char* a, bool create)
|
||||||
{
|
{
|
||||||
bool ok = FALSE;
|
bool ok = FALSE;
|
||||||
|
|
||||||
@ -193,7 +195,7 @@ bool CG4300_App::look_ptm(int m, const char* a, bool create)
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_lim(int m, bool create)
|
bool TLiquidazione_app::look_lim(int m, bool create)
|
||||||
{
|
{
|
||||||
bool ok = FALSE;
|
bool ok = FALSE;
|
||||||
|
|
||||||
@ -214,7 +216,7 @@ bool CG4300_App::look_lim(int m, bool create)
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_pla(const char* a, bool create)
|
bool TLiquidazione_app::look_pla(const char* a, bool create)
|
||||||
{
|
{
|
||||||
bool ok = FALSE;
|
bool ok = FALSE;
|
||||||
_pla_r->zero();
|
_pla_r->zero();
|
||||||
@ -258,7 +260,7 @@ bool CG4300_App::look_pla(const char* a, bool create)
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_reg(const char* reg)
|
bool TLiquidazione_app::look_reg(const char* reg)
|
||||||
{
|
{
|
||||||
_reg_r->zero();
|
_reg_r->zero();
|
||||||
TString s(12); s << _year; s << format("%-3s",reg);
|
TString s(12); s << _year; s << format("%-3s",reg);
|
||||||
@ -267,7 +269,7 @@ bool CG4300_App::look_reg(const char* reg)
|
|||||||
return _reg->good();
|
return _reg->good();
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_iva(const char* cod)
|
bool TLiquidazione_app::look_iva(const char* cod)
|
||||||
{
|
{
|
||||||
_iva->zero();
|
_iva->zero();
|
||||||
_iva->put("CODTAB",cod);
|
_iva->put("CODTAB",cod);
|
||||||
@ -275,7 +277,7 @@ bool CG4300_App::look_iva(const char* cod)
|
|||||||
return _iva->good();
|
return _iva->good();
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_ppa(int month, const char* codatt, int type, bool create)
|
bool TLiquidazione_app::look_ppa(int month, const char* codatt, int type, bool create)
|
||||||
{
|
{
|
||||||
_ppa->zero();
|
_ppa->zero();
|
||||||
(*_ppa_year) = _year;
|
(*_ppa_year) = _year;
|
||||||
@ -296,7 +298,7 @@ bool CG4300_App::look_ppa(int month, const char* codatt, int type, bool create)
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_del(int month, int type, bool create)
|
bool TLiquidazione_app::look_del(int month, int type, bool create)
|
||||||
{
|
{
|
||||||
TString ditta = _nditte->curr().get("CODDITTA");
|
TString ditta = _nditte->curr().get("CODDITTA");
|
||||||
_del->zero();
|
_del->zero();
|
||||||
@ -318,7 +320,7 @@ bool CG4300_App::look_del(int month, int type, bool create)
|
|||||||
return ok;
|
return ok;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::look_lia(bool create, int year)
|
bool TLiquidazione_app::look_lia(bool create, int year)
|
||||||
{
|
{
|
||||||
if (year == 0) year = atoi(_year);
|
if (year == 0) year = atoi(_year);
|
||||||
TString16 y; y << year;
|
TString16 y; y << year;
|
||||||
@ -338,7 +340,7 @@ bool CG4300_App::look_lia(bool create, int year)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
real CG4300_App::credito_prec(int month)
|
real TLiquidazione_app::credito_prec(int month)
|
||||||
// ritorna l'appropriato credito precedente al mese in corso
|
// ritorna l'appropriato credito precedente al mese in corso
|
||||||
// lascia PLM posizionata sul mese passato
|
// lascia PLM posizionata sul mese passato
|
||||||
{
|
{
|
||||||
@ -393,7 +395,7 @@ real CG4300_App::credito_prec(int month)
|
|||||||
return c;
|
return c;
|
||||||
}
|
}
|
||||||
|
|
||||||
real CG4300_App::credito_costo_prec(int month, const char* codatt)
|
real TLiquidazione_app::credito_costo_prec(int month, const char* codatt)
|
||||||
// ritorna l'appropriato credito di costo precedente al mese in corso
|
// ritorna l'appropriato credito di costo precedente al mese in corso
|
||||||
// (travel agency only)
|
// (travel agency only)
|
||||||
{
|
{
|
||||||
@ -423,7 +425,7 @@ real CG4300_App::credito_costo_prec(int month, const char* codatt)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
real CG4300_App::aliquota_agvia()
|
real TLiquidazione_app::aliquota_agvia()
|
||||||
{
|
{
|
||||||
TConfig cnf(CONFIG_STUDIO);
|
TConfig cnf(CONFIG_STUDIO);
|
||||||
look_iva(cnf.get("CodAgv"));
|
look_iva(cnf.get("CodAgv"));
|
||||||
@ -432,7 +434,7 @@ real CG4300_App::aliquota_agvia()
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
real CG4300_App::interesse_trimestrale(int month)
|
real TLiquidazione_app::interesse_trimestrale(int month)
|
||||||
{
|
{
|
||||||
month /= 3; month--;
|
month /= 3; month--;
|
||||||
TConfig cnf(CONFIG_STUDIO);
|
TConfig cnf(CONFIG_STUDIO);
|
||||||
|
@ -6,7 +6,7 @@
|
|||||||
|
|
||||||
#include "cg4300.h"
|
#include "cg4300.h"
|
||||||
|
|
||||||
void CG4300_App::add_plafond(int month, const char* codatt, int type,
|
void TLiquidazione_app::add_plafond(int month, const char* codatt, int type,
|
||||||
real& howmuch, bool intra)
|
real& howmuch, bool intra)
|
||||||
{
|
{
|
||||||
look_ppa(month,codatt,type);
|
look_ppa(month,codatt,type);
|
||||||
@ -31,7 +31,7 @@ void CG4300_App::add_plafond(int month, const char* codatt, int type,
|
|||||||
_ppa->rewrite();
|
_ppa->rewrite();
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::zero_plafond (int month, const char* codatt)
|
void TLiquidazione_app::zero_plafond (int month, const char* codatt)
|
||||||
{
|
{
|
||||||
for (int jj = 1; jj <= 3; jj++) // three types of plafond
|
for (int jj = 1; jj <= 3; jj++) // three types of plafond
|
||||||
{
|
{
|
||||||
@ -66,7 +66,7 @@ void CG4300_App::zero_plafond (int month, const char* codatt)
|
|||||||
} // for tipo esenzione plafond
|
} // for tipo esenzione plafond
|
||||||
}
|
}
|
||||||
// ricalcolo dei corrispettivi
|
// ricalcolo dei corrispettivi
|
||||||
void CG4300_App::recalc_corrispettivi(int month, const char* codatt)
|
void TLiquidazione_app::recalc_corrispettivi(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
if (_corr_arr.items() == 0) return;
|
if (_corr_arr.items() == 0) return;
|
||||||
// ricalcola (solo per il mese in corso!) operando sull'array
|
// ricalcola (solo per il mese in corso!) operando sull'array
|
||||||
@ -102,7 +102,7 @@ void CG4300_App::recalc_corrispettivi(int month, const char* codatt)
|
|||||||
}
|
}
|
||||||
|
|
||||||
// ricalcolo della malefica ventilazione
|
// ricalcolo della malefica ventilazione
|
||||||
void CG4300_App::recalc_ventilation(int month, const char* codatt)
|
void TLiquidazione_app::recalc_ventilation(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
if (_vend_arr.items() == 0) return;
|
if (_vend_arr.items() == 0) return;
|
||||||
|
|
||||||
|
@ -4,6 +4,8 @@
|
|||||||
// fv 21-1-94
|
// fv 21-1-94
|
||||||
// ------------------------------------------------------------
|
// ------------------------------------------------------------
|
||||||
|
|
||||||
|
#include <utility.h>
|
||||||
|
|
||||||
#include "cg4300.h"
|
#include "cg4300.h"
|
||||||
|
|
||||||
// flags per annuale
|
// flags per annuale
|
||||||
@ -25,7 +27,7 @@ static char sep[] =
|
|||||||
"------------------------------------------------------------------"
|
"------------------------------------------------------------------"
|
||||||
"------------------------------------------------------------------";
|
"------------------------------------------------------------------";
|
||||||
|
|
||||||
void CG4300_App::set_page(int file, int cnt)
|
void TLiquidazione_app::set_page(int file, int cnt)
|
||||||
{
|
{
|
||||||
_DescrItem& d = (_DescrItem&)_descr_arr[cnt];
|
_DescrItem& d = (_DescrItem&)_descr_arr[cnt];
|
||||||
|
|
||||||
@ -49,14 +51,14 @@ void CG4300_App::set_page(int file, int cnt)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
print_action CG4300_App::postprocess_page(int file, int cnt)
|
print_action TLiquidazione_app::postprocess_page(int file, int cnt)
|
||||||
{
|
{
|
||||||
if (_descr_arr.items() == 0 || cnt == _descr_arr.items()-1)
|
if (_descr_arr.items() == 0 || cnt == _descr_arr.items()-1)
|
||||||
return NEXT_PAGE;
|
return NEXT_PAGE;
|
||||||
return REPEAT_PAGE;
|
return REPEAT_PAGE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::preprocess_page(int file, int cnt)
|
bool TLiquidazione_app::preprocess_page(int file, int cnt)
|
||||||
{
|
{
|
||||||
return _descr_arr.items() != 0;
|
return _descr_arr.items() != 0;
|
||||||
}
|
}
|
||||||
@ -65,7 +67,7 @@ bool CG4300_App::preprocess_page(int file, int cnt)
|
|||||||
// Print description
|
// Print description
|
||||||
// ----------------------------------------------------------------
|
// ----------------------------------------------------------------
|
||||||
|
|
||||||
void CG4300_App::describe_att(int month, const char* codatt)
|
void TLiquidazione_app::describe_att(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
TToken_string atts(codatt);
|
TToken_string atts(codatt);
|
||||||
|
|
||||||
@ -86,7 +88,7 @@ void CG4300_App::describe_att(int month, const char* codatt)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::describe_name(int month, TToken_string& codatts)
|
void TLiquidazione_app::describe_name(int month, TToken_string& codatts)
|
||||||
{
|
{
|
||||||
_DescrItem* d = new _DescrItem(CHG_PARMS);
|
_DescrItem* d = new _DescrItem(CHG_PARMS);
|
||||||
|
|
||||||
@ -105,7 +107,7 @@ void CG4300_App::describe_name(int month, TToken_string& codatts)
|
|||||||
_descr_arr.add(d);
|
_descr_arr.add(d);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::describe_firm(int month)
|
void TLiquidazione_app::describe_firm(int month)
|
||||||
{
|
{
|
||||||
if (!_isprint) return;
|
if (!_isprint) return;
|
||||||
|
|
||||||
@ -119,7 +121,7 @@ void CG4300_App::describe_firm(int month)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::describe_plafond(int month, const char* codatt)
|
void TLiquidazione_app::describe_plafond(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
if (month == 13) month = 12;
|
if (month == 13) month = 12;
|
||||||
// prepara la descrizione del riepilogo da stampare e lo accoda
|
// prepara la descrizione del riepilogo da stampare e lo accoda
|
||||||
@ -151,7 +153,7 @@ void CG4300_App::describe_plafond(int month, const char* codatt)
|
|||||||
_descr_arr.add(d);
|
_descr_arr.add(d);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::describe_ventilation(int month, const char* codatt)
|
void TLiquidazione_app::describe_ventilation(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
if (_isriepilogo || _isannual) month = 12;
|
if (_isriepilogo || _isannual) month = 12;
|
||||||
|
|
||||||
@ -231,7 +233,7 @@ void CG4300_App::describe_ventilation(int month, const char* codatt)
|
|||||||
_descr_arr.add(d);
|
_descr_arr.add(d);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::describe_agricolo(int month, const char* codatt)
|
void TLiquidazione_app::describe_agricolo(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
if (month != 13)
|
if (month != 13)
|
||||||
if (!(look_plm(month, codatt) && look_ptm(month,codatt)))
|
if (!(look_plm(month, codatt) && look_ptm(month,codatt)))
|
||||||
@ -261,7 +263,7 @@ void CG4300_App::describe_agricolo(int month, const char* codatt)
|
|||||||
_descr_arr.add(d);
|
_descr_arr.add(d);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::describe_viaggio(int month, const char* codatt)
|
void TLiquidazione_app::describe_viaggio(int month, const char* codatt)
|
||||||
{
|
{
|
||||||
if (month != 13)
|
if (month != 13)
|
||||||
if (!(look_plm(month, codatt) && look_lim(month)))
|
if (!(look_plm(month, codatt) && look_lim(month)))
|
||||||
@ -297,7 +299,7 @@ void CG4300_App::describe_viaggio(int month, const char* codatt)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::describe_pims(int month, const char* codatt)
|
void TLiquidazione_app::describe_pims(int month, const char* codatt)
|
||||||
// le si passa una tokenstring (o un codatt) e lei, da brava, calcola
|
// le si passa una tokenstring (o un codatt) e lei, da brava, calcola
|
||||||
// cumulando per tutte le attivita' nominatele
|
// cumulando per tutte le attivita' nominatele
|
||||||
// ogni riga riguarda un codiva ma tutti i registri
|
// ogni riga riguarda un codiva ma tutti i registri
|
||||||
@ -488,7 +490,7 @@ void CG4300_App::describe_pims(int month, const char* codatt)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::describe_liq(int month, const char* codatts,
|
void TLiquidazione_app::describe_liq(int month, const char* codatts,
|
||||||
_DescrItem* di)
|
_DescrItem* di)
|
||||||
{
|
{
|
||||||
if (!_isprint) return;
|
if (!_isprint) return;
|
||||||
@ -567,7 +569,7 @@ void CG4300_App::describe_liq(int month, const char* codatts,
|
|||||||
_descr_arr.add(d);
|
_descr_arr.add(d);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::describe_consistence(const char* codatt)
|
void TLiquidazione_app::describe_consistence(const char* codatt)
|
||||||
{
|
{
|
||||||
// controlla eventuali condizioni di conflitto con le normative
|
// controlla eventuali condizioni di conflitto con le normative
|
||||||
// per la ditta e crea i messaggi appropriati
|
// per la ditta e crea i messaggi appropriati
|
||||||
@ -601,7 +603,7 @@ void CG4300_App::describe_consistence(const char* codatt)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::describe_error(const char* err, const char* codatt)
|
void TLiquidazione_app::describe_error(const char* err, const char* codatt)
|
||||||
{
|
{
|
||||||
_errors.add(new _ErrItem(err,codatt,_nditte->curr().get("CODDITTA")));
|
_errors.add(new _ErrItem(err,codatt,_nditte->curr().get("CODDITTA")));
|
||||||
}
|
}
|
||||||
@ -610,7 +612,7 @@ void CG4300_App::describe_error(const char* err, const char* codatt)
|
|||||||
// Setrows
|
// Setrows
|
||||||
// ----------------------------------------------------------------
|
// ----------------------------------------------------------------
|
||||||
|
|
||||||
void CG4300_App::set_firm(_DescrItem& d)
|
void TLiquidazione_app::set_firm(_DescrItem& d)
|
||||||
{
|
{
|
||||||
TString tim_title(80);
|
TString tim_title(80);
|
||||||
tim_title << "Liquidazione IVA";
|
tim_title << "Liquidazione IVA";
|
||||||
@ -649,7 +651,7 @@ void CG4300_App::set_firm(_DescrItem& d)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::set_att(_DescrItem& d)
|
void TLiquidazione_app::set_att(_DescrItem& d)
|
||||||
{
|
{
|
||||||
// set header
|
// set header
|
||||||
TString tim_title(78);
|
TString tim_title(78);
|
||||||
@ -710,7 +712,7 @@ void CG4300_App::set_att(_DescrItem& d)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::set_plafond(_DescrItem& d)
|
void TLiquidazione_app::set_plafond(_DescrItem& d)
|
||||||
{
|
{
|
||||||
real r1 = d._r0 + d._r1 + d._r2;
|
real r1 = d._r0 + d._r1 + d._r2;
|
||||||
real r2 = d._r3 + d._r4 + d._r5;
|
real r2 = d._r3 + d._r4 + d._r5;
|
||||||
@ -746,7 +748,7 @@ void CG4300_App::set_plafond(_DescrItem& d)
|
|||||||
set_auto_ff();
|
set_auto_ff();
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_pim(_DescrItem& d)
|
void TLiquidazione_app::set_pim(_DescrItem& d)
|
||||||
{
|
{
|
||||||
look_iva(d._s1);
|
look_iva(d._s1);
|
||||||
d._s2 = _iva->get("S0");
|
d._s2 = _iva->get("S0");
|
||||||
@ -770,7 +772,7 @@ void CG4300_App::set_pim(_DescrItem& d)
|
|||||||
&(d._r5));
|
&(d._r5));
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_plm(_DescrItem& d)
|
void TLiquidazione_app::set_plm(_DescrItem& d)
|
||||||
{
|
{
|
||||||
set_row(1,""); set_row(2,"");
|
set_row(1,""); set_row(2,"");
|
||||||
set_row(3,"Totale@25g%r@41g%r@58g%r@74g%r@91g%r@107g%r",
|
set_row(3,"Totale@25g%r@41g%r@58g%r@74g%r@91g%r@107g%r",
|
||||||
@ -824,7 +826,7 @@ void CG4300_App::set_plm(_DescrItem& d)
|
|||||||
&tot2);
|
&tot2);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_ptm(_DescrItem& d)
|
void TLiquidazione_app::set_ptm(_DescrItem& d)
|
||||||
{
|
{
|
||||||
if (d._r0.is_zero() && // acq. ammortizz.
|
if (d._r0.is_zero() && // acq. ammortizz.
|
||||||
d._r1.is_zero() && // IVA acq. ammort.
|
d._r1.is_zero() && // IVA acq. ammort.
|
||||||
@ -896,7 +898,7 @@ void CG4300_App::set_ptm(_DescrItem& d)
|
|||||||
set_auto_ff(TRUE);
|
set_auto_ff(TRUE);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_grand(_DescrItem& d)
|
void TLiquidazione_app::set_grand(_DescrItem& d)
|
||||||
{
|
{
|
||||||
set_row(1,""); set_row(2,""); set_row(3,""); set_row(4,"");
|
set_row(1,""); set_row(2,""); set_row(3,""); set_row(4,"");
|
||||||
set_row(5,"@11g@bCALCOLO LIQUIDAZIONE D'IMPOSTA@r");
|
set_row(5,"@11g@bCALCOLO LIQUIDAZIONE D'IMPOSTA@r");
|
||||||
@ -1037,7 +1039,7 @@ void CG4300_App::set_grand(_DescrItem& d)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::set_annual(_DescrItem& d)
|
void TLiquidazione_app::set_annual(_DescrItem& d)
|
||||||
{
|
{
|
||||||
// chiamata internamente a set_pims
|
// chiamata internamente a set_pims
|
||||||
int row = get_maxrow()+1;
|
int row = get_maxrow()+1;
|
||||||
@ -1063,7 +1065,7 @@ void CG4300_App::set_annual(_DescrItem& d)
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void CG4300_App::set_ventila(_DescrItem& d)
|
void TLiquidazione_app::set_ventila(_DescrItem& d)
|
||||||
{
|
{
|
||||||
if (d._arr.items() == 0 || d._r0.is_zero())
|
if (d._arr.items() == 0 || d._r0.is_zero())
|
||||||
return;
|
return;
|
||||||
@ -1105,7 +1107,7 @@ void CG4300_App::set_ventila(_DescrItem& d)
|
|||||||
set_auto_ff(TRUE);
|
set_auto_ff(TRUE);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_regagr(_DescrItem& d)
|
void TLiquidazione_app::set_regagr(_DescrItem& d)
|
||||||
{
|
{
|
||||||
set_print_zero(TRUE);
|
set_print_zero(TRUE);
|
||||||
|
|
||||||
@ -1128,7 +1130,7 @@ void CG4300_App::set_regagr(_DescrItem& d)
|
|||||||
set_print_zero(FALSE);
|
set_print_zero(FALSE);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_viaggio(_DescrItem& d)
|
void TLiquidazione_app::set_viaggio(_DescrItem& d)
|
||||||
{
|
{
|
||||||
// the longest & stronzest
|
// the longest & stronzest
|
||||||
|
|
||||||
@ -1292,7 +1294,7 @@ void CG4300_App::set_viaggio(_DescrItem& d)
|
|||||||
set_auto_ff(TRUE);
|
set_auto_ff(TRUE);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_acconto_p(_DescrItem& d)
|
void TLiquidazione_app::set_acconto_p(_DescrItem& d)
|
||||||
{
|
{
|
||||||
set_print_zero(TRUE);
|
set_print_zero(TRUE);
|
||||||
|
|
||||||
@ -1338,7 +1340,7 @@ void CG4300_App::set_acconto_p(_DescrItem& d)
|
|||||||
set_print_zero(FALSE);
|
set_print_zero(FALSE);
|
||||||
}
|
}
|
||||||
|
|
||||||
void CG4300_App::set_acchead_p(_DescrItem& d)
|
void TLiquidazione_app::set_acchead_p(_DescrItem& d)
|
||||||
{
|
{
|
||||||
reset_header();
|
reset_header();
|
||||||
set_header(1,"Gestione IVA@109gData @<@125gPag. @#");
|
set_header(1,"Gestione IVA@109gData @<@125gPag. @#");
|
||||||
|
@ -1,14 +1,16 @@
|
|||||||
// cg4306: liquidazione IVA
|
// cg4306: liquidazione IVA
|
||||||
// funzionalita' accessorie (calcolo acconto, estrazione deleghe)
|
// funzionalita' accessorie (calcolo acconto, estrazione deleghe)
|
||||||
|
|
||||||
|
#include <defmask.h>
|
||||||
|
#include <progind.h>
|
||||||
|
#include <sheet.h>
|
||||||
|
|
||||||
#include "cg4300.h"
|
#include "cg4300.h"
|
||||||
#include "cg4300b.h"
|
#include "cg4300b.h"
|
||||||
#include "cg4300c.h"
|
#include "cg4300c.h"
|
||||||
|
|
||||||
static char buf[256];
|
|
||||||
|
|
||||||
// -------------------------------------------------- estrazione deleghe
|
// -------------------------------------------------- estrazione deleghe
|
||||||
bool CG4300_App::set_deleghe()
|
bool TLiquidazione_app::set_deleghe()
|
||||||
{
|
{
|
||||||
TMask m("cg4300b.msk");
|
TMask m("cg4300b.msk");
|
||||||
int k = 0;
|
int k = 0;
|
||||||
@ -72,8 +74,10 @@ bool CG4300_App::set_deleghe()
|
|||||||
return k == K_ENTER;
|
return k == K_ENTER;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::extract_deleghe()
|
bool TLiquidazione_app::extract_deleghe()
|
||||||
{
|
{
|
||||||
|
char buf[256];
|
||||||
|
|
||||||
long firm = TApplication::get_firm();
|
long firm = TApplication::get_firm();
|
||||||
_prind = new TProgind(_n_ditte,
|
_prind = new TProgind(_n_ditte,
|
||||||
" Estrazione deleghe "
|
" Estrazione deleghe "
|
||||||
@ -113,7 +117,7 @@ bool CG4300_App::extract_deleghe()
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::extract_delega(int month)
|
bool TLiquidazione_app::extract_delega(int month)
|
||||||
{
|
{
|
||||||
if (_isriepilogo && !_isannual)
|
if (_isriepilogo && !_isannual)
|
||||||
return FALSE;
|
return FALSE;
|
||||||
@ -145,7 +149,7 @@ bool CG4300_App::extract_delega(int month)
|
|||||||
}
|
}
|
||||||
|
|
||||||
// -------------------------------------------- calcolo acconto dicembre
|
// -------------------------------------------- calcolo acconto dicembre
|
||||||
bool CG4300_App::set_acconto()
|
bool TLiquidazione_app::set_acconto()
|
||||||
{
|
{
|
||||||
TMask m("cg4300c.msk");
|
TMask m("cg4300c.msk");
|
||||||
m.set(CHK_CGC_PRINT,"X");
|
m.set(CHK_CGC_PRINT,"X");
|
||||||
@ -207,8 +211,10 @@ bool CG4300_App::set_acconto()
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
bool CG4300_App::recalc_acconti()
|
bool TLiquidazione_app::recalc_acconti()
|
||||||
{
|
{
|
||||||
|
char buf[256];
|
||||||
|
|
||||||
long l; bool onemade = FALSE;
|
long l; bool onemade = FALSE;
|
||||||
|
|
||||||
long firm = TApplication::get_firm();
|
long firm = TApplication::get_firm();
|
||||||
@ -246,7 +252,7 @@ bool CG4300_App::recalc_acconti()
|
|||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool CG4300_App::recalc_acconto()
|
bool TLiquidazione_app::recalc_acconto()
|
||||||
{
|
{
|
||||||
real basecalcolo, acconto;
|
real basecalcolo, acconto;
|
||||||
bool isdifferita = FALSE;
|
bool isdifferita = FALSE;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user