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

Patch level : 2.0 470

Browse Source 
Files correlati     : cg0.exe cg2.exe cg3.exe cg3700a.msk
Ricompilazione Demo : [ ]
Commento            :

CM20023
Se apro la ricerca sul tipo costo ricavo della riga Iva e poi dall'help
richiamo le informazioni e do conferma, riaprendo la ricerca sul campo tipo
costo ricavo l'applicazione va in errore.

CM20024
Se i campi delle date sono di compilazione obbligatoria devono avere il
colore giallo.

CM20025
Richiamando gruppo conto appartenete ai costi appare il campo della sola
descrizione del codice iva di compensazione. Ricordo che il campo del codice
e della descrizione per la compensazione devono apparire solo nel caso
in cui venga richiamato un sottoconto di tipo ricavo.

CM20027
I totali attuali in presenza di movimenti provvisori non sono corretti in
quanto non vengono inclusi. I movimenti appartengono tutti all'anno 2002.


git-svn-id: svn://10.65.10.50/trunk@11112 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-05-09 14:18:04 +00:00
parent 490bab53d1
commit 11b36f4bf2
5 changed files with 33 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
cg/cg0100.cpp
View File

@ -207,22 +207,16 @@ void TCausali_app::init_insert_mode(TMask& m)
else
m.hide(-3);
TLocalisamfile& pconti = _rel->lfile();
TString s, s2, s5;
TString8 s3, s4;
int s1 = 0;
pconti.setkey(1) ;
int indbil = 0;
if (sottoc != 0)
{
pconti.zero();
pconti.put(PCN_GRUPPO, gruppo);
pconti.put(PCN_CONTO, conto);
pconti.read();
if (pconti.good())
TToken_string key; key.add(gruppo); key.add(conto);
const TRectype& pconti = cache().get(LF_PCON, key);
if (!pconti.empty())
{
s = pconti.get(PCN_CODCBL);
s1 = pconti.get_int(PCN_SEZIVD);
@ -237,13 +231,13 @@ void TCausali_app::init_insert_mode(TMask& m)
if (!s4.empty())
s4.right_just(2,'0');
TString8 key;
key.format("%1d%1s%s%s", s1, (const char*) s2,(const char*) s3, (const char*) s4);
s5 = cache().get("%IVD", key, "S0"); //
indbil = pconti.get_int(PCN_INDBIL);
}
ivd_enable = (s1 == 0) && s2.empty() && s3.empty() && s4.empty();
m.show(FLD_CM1_IVACOMP, indbil == RICAVI);
m.show(FLD_CM1_DESCIVACOMP, indbil == RICAVI);
}
m.show(FLD_CM1_RICSER, indbil == PASSIVITA || indbil == RICAVI);
if (conto != 0)
@ -270,11 +264,13 @@ void TCausali_app::init_insert_mode(TMask& m)
m.show(FLD_CM1_NUMRIVDH, !ivd_enable);
m.show(FLD_CM1_NUMIVDH, !ivd_enable);
m.show(FLD_CM1_DESCIVDH, !ivd_enable); //
pconti.zero();
pconti.put(PCN_GRUPPO, gruppo);
pconti.read();
if (pconti.good())
if (s.empty()) s = pconti.get(PCN_CODCBL);
if (s.empty())
{
TToken_string key; key.add(gruppo);
const TRectype& pconti = cache().get(LF_PCON, key);
s = pconti.get(PCN_CODCBL);
}
}
if (s.not_empty())
{

8
cg/cg2102.cpp
View File

@ -1819,8 +1819,8 @@ bool TPrimanota_application::iva_sottoconto_handler(TMask_field& f, KEY key)
TString80 cms, fas;
if (zio.default_cdc(cms, fas))
{
m.set(111, cms, TRUE);
m.set(112, fas, TRUE);
m.set(111, cms, 0x2);
m.set(112, fas, 0x2);
}
}
TToken_string k = zio.string();
@ -1854,8 +1854,8 @@ bool TPrimanota_application::cg_sottoconto_handler(TMask_field& f, KEY k)
const TRectype& pc = cache().get(LF_PCON, key);
if (k == K_TAB)
{
m.set(CG_COMMESSA, pc.get(PCN_CODCMS), TRUE);
m.set(CG_FASE, pc.get(PCN_FASCMS), TRUE);
m.set(CG_COMMESSA, pc.get(PCN_CODCMS), 0x2);
m.set(CG_FASE, pc.get(PCN_FASCMS), 0x2);
}
if (k == K_ENTER && cdc.empty() && pc.get_bool(PCN_CMSNEEDED))
{

15
cg/cg3600.cpp
View File

@ -447,6 +447,11 @@ void TBalance::read(const TBill& b, int esercizio, bool ignora_movap, bool provv
TImporto si, sf, pd, pa, prd, pra;
find(b, esercizio, si, pd, pa, sf, prd, pra);
if (provvis)
{
pd += prd;
pa += pra;
}
_saldo_ini = si;
_progr_dare = pd;
_progr_avere = pa;
@ -461,15 +466,15 @@ void TBalance::read(const TBill& b, int esercizio, bool ignora_movap, bool provv
const int precedente = esercizi.pred(esercizio);
if (precedente > 0 && find(b, precedente, si, pd, pa, sf, prd, pra))
{
if (provvis)
{
pd += prd;
pa += pra;
}
_saldo_ini = si;
_saldo_ini += pd;
_saldo_ini += pa;
_saldo_ini += sf;
if (provvis)
{
_saldo_ini += prd;
_saldo_ini += pra;
}
}
}
}

19
cg/cg3700.cpp
View File

@ -5,7 +5,6 @@
// CG3 -6 N ==> Lista fatture intracomunitarie
//
#include <mask.h>
#include <prefix.h>
#include <printapp.h>
#include <recarray.h>
#include <sheet.h>
@ -116,8 +115,7 @@ inline TLista_fatture& app() { return (TLista_fatture&) main_app(); }
int TLista_fatture::tiporeg(const TString& reg)
{
TString16 s; s.format("%4d%-3s",_date_from.year(),(const char*)reg);
TString8 s; s.format("%4d%-3s",_date_from.year(),(const char*)reg);
return atoi(cache().get("REG", s).get("I0"));
}
@ -130,7 +128,7 @@ bool TLista_fatture::filter_func1(const TRelation *r)
if (data < a._date_from || data > a._date_to)
return FALSE;
const TString16 rg = mov.get(MOV_REG);
const TString& rg = mov.get(MOV_REG);
if (rg < a._from_reg || rg > a._to_reg)
return FALSE;
@ -175,20 +173,11 @@ bool TLista_fatture::filter_func2(const TRelation *r)
bool TLista_fatture::date_handler(TMask_field& f, KEY key)
{
if (key == K_ENTER && f.empty())
{
if (f.dlg() == FLD_DATE_FROM)
return f.error_box(TR("La data di inizio e' obbligatoria."));
else
return f.error_box(TR("La data di fine e' obbligatoria."));
}
if ((key == K_TAB && f.focusdirty()) || key == K_ENTER)
{
TMask& m = f.mask();
TDate da(m.get_date(FLD_DATE_FROM));
TDate a(m.get_date(FLD_DATE_TO));
const TDate da(m.get_date(FLD_DATE_FROM));
const TDate a(m.get_date(FLD_DATE_TO));
if (a.ok() && da.ok()) // Solo se sono entrambi compilati
{
if (da > a)

4
cg/cg3700a.uml
View File

@ -5,11 +5,15 @@ PAGE "Lista fatture per IVA indetraibile" -1 -1 68 10
DATE FLD_DATE_FROM
BEGIN
PROMPT 1 2 "Dalla data "
CHECKTYPE REQUIRED
WARNING "La data iniziale e' obbligatoria."
END
DATE FLD_DATE_TO
BEGIN
PROMPT 1 3 "Alla data "
CHECKTYPE REQUIRED
WARNING "La data finale e' obbligatoria."
END
GROUPBOX DLG_NULL 40 5