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

Corretto collegamento mastrini/primanota in assenza dell'ultimo esercizio

Browse Source 
Corretto invio a PC del campo TIPODET delle righe IVA 

git-svn-id: svn://10.65.10.50/branches/R_10_00@22620 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2012-04-10 07:40:49 +00:00
parent 445aa52cc7
commit baa69a9539
4 changed files with 35 additions and 12 deletions

13
cg/cg2100.cpp

@ -1810,7 +1810,18 @@ void TPrimanota_application::ini2mask(TConfig& ini, TMask& msk, bool query)
set_not_empty(msk, F_CODCAUS, ini, MOV_CODCAUS);
TString16 val = ini.get(MOV_DATAREG);
if (val.blank())
val = TDate(TODAY).string();
{
const long numreg = ini.get_long(MOV_NUMREG);
if (numreg > 0)
{
TLocalisamfile& mov = _rel->file();
mov.put(MOV_NUMREG, numreg);
if (mov.read() == NOERR)
val = mov.get(MOV_DATAREG); // Serve ad evitare segnalazioni su esercizi non esistenti
}
if (val.blank())
val = TDate(TODAY).string();
}
msk.set(F_DATAREG, val);
}
else

21
cg/cg2100p.uml

@ -13,6 +13,27 @@ BEGIN
PICTURE TOOL_NEWREC
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 1 ""
PICTURE 0
END
BUTTON DLG_INFO 2 2
BEGIN
PROMPT 1 1 "Info"
MESSAGE EXIT,K_F2
PICTURE TOOL_INFO
END
BUTTON DLG_HELP 2 2
BEGIN
PROMPT 2 1 "Help"
MESSAGE EXIT,K_F1
PICTURE TOOL_HELP
END
ENDPAGE

11
cg/cg2103.cpp

@ -16,14 +16,11 @@ TCausale::TCausale(const char* cod, int year)
_iva(iva_errata), _corrisp(false),
_sezione_clifo(' '), _sezione_ritsoc(' '), _sezione_ritfis(' '),
_provvisorio(' ')
{
if (cod && *cod)
read(cod, year);
}
// Legge le righe della causale attualmente selezionata sulla maschera
bool TCausale::read(const char* cod, int year)
{
@ -70,7 +67,6 @@ bool TCausale::read(const char* cod, int year)
return true;
}
TBill& TCausale::bill(int num, TBill& conto) const
{
const TRectype* rec = row(num);
@ -104,7 +100,6 @@ const char* TCausale::descrizione() const
const char* TCausale::codice() const
{ return _rec.get(CAU_CODCAUS); }
bool TCausale::data_doc() const
{ return _rec.get_bool(CAU_DATADOC); }
@ -174,9 +169,7 @@ bool TCausale::link_analitica() const
{ return _rec.get_bool(CAU_MOVIND); }
bool TCausale::ok() const
{
return iva() != iva_errata;
}
{ return iva() != iva_errata; }
char TCausale::sezione(int riga) const
{
@ -215,13 +208,11 @@ char TCausale::sezione_ritfis()
{
if (_sezione_ritfis == ' ')
{
if (_rec.get_int(CAU_TIPOMOV) <= 2)
_sezione_ritfis = sezione(8); // Fatture
else
_sezione_ritfis = sezione(12); // Pagamenti
}
return _sezione_ritfis;
}

2
cg/cg6904.cpp

@ -1054,7 +1054,7 @@ void TInv_cont::invio_righe_IVA()
str.format("%014s", (const char*) imposta.string());
record.overwrite(str,80); //Imposta
str = _triva->get_int(RMI_TIPODET);
str = _triva->get(RMI_TIPODET);
record.overwrite(str,94); //Tipo detraibilita'
int tipocr = _triva->get_int(RMI_TIPOCR);