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

Corretta gestione ritenute in prima nota e cambitai alcune segnalazioni sulle

Browse Source 
mascchere.
Aggiunti azzeramenti nel ripristino stampe.


git-svn-id: svn://10.65.10.50/trunk@1042 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-02-28 10:02:55 +00:00
parent 6b84ea6604
commit 0e94893908
12 changed files with 49 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
cg/cg0500.cpp
View File

@ -882,6 +882,7 @@ void TCaus_app::init_insert_mode(TMask& m)
void TCaus_app::init_modify_mode(TMask& m)
{
init_mask(m);
m.disable(F_OP_FINE_ANNO);
}

1
cg/cg1500.cpp
View File

@ -2252,7 +2252,6 @@ void CG1500_application::postclose_print()
delete _tmp_saldi_att; _tmp_saldi_att = NULL;
}
}
//return NEXT_PAGE;
}
void CG1500_application::set_page(int file, int counter)

14
cg/cg2100.cpp
View File

@ -324,17 +324,25 @@ bool TPrimanota_application::changing_mask(int mode)
if (mode == MODE_QUERY)
{
const bool flag = _mode != MODE_QUERY;
#if XVT_OS == XVT_OS_WIN
if (flag && _iva != nessuna_iva && !_iva_showed)
{
{
WINDOW w = ivas().parent();
#if XVT_OS == 400
xvt_vobj_set_visible(w, TRUE);
xvt_vobj_raise(w);
xvt_app_process_pending_events();
xvt_vobj_set_visible(w, FALSE);
#else
show_window(w, TRUE);
set_front_window(w);
process_events();
show_window(w, FALSE);
#endif
_iva_showed = TRUE;
}
#endif
return flag;
}
_iva = iva_errata;

30
cg/cg2100b.uml
View File

@ -32,7 +32,7 @@ END
NUMBER F_NUMREG 7
BEGIN
PROMPT 57 3 "Operazione n."
PROMPT 56 3 "Operazione n. "
FIELD NUMREG
FLAGS "RD"
KEY 1
@ -40,7 +40,7 @@ END
DATE F_DATAREG
BEGIN
PROMPT 1 3 "Data operazione "
PROMPT 1 3 "Data operazione "
HELP "Data in cui viene effettuata l'operazione"
FIELD DATAREG
END
@ -48,21 +48,21 @@ END
DATE F_DATACOMP
BEGIN
PROMPT 1 4 "Data di competenza "
PROMPT 1 4 "Data di competenza "
HELP "Data di competenza dell'operazione"
FIELD DATACOMP
END
NUMBER F_ANNOES 4
BEGIN
PROMPT 57 4 "Esercizio "
PROMPT 56 4 "Esercizio "
FIELD ANNOES
FLAGS "DRZ"
END
DATE F_DATADOC
BEGIN
PROMPT 1 5 "Data del documento "
PROMPT 1 5 "Data del documento "
HELP "Data del documento generante il movimento"
FIELD DATADOC
WARNING "Specificare una data del documento non superiore a quella dell'operazione"
@ -71,7 +71,7 @@ END
STRING F_NUMDOC 7
BEGIN
PROMPT 57 5 "Documento n. "
PROMPT 56 5 "Documento n. "
HELP "Numero del documento generante il movimento"
FIELD NUMDOC
WARNING "La causale impone di specificare il numero documento"
@ -84,7 +84,7 @@ END
STRING F_DESCAGG 5
BEGIN
PROMPT 1 6 "Descrizione "
PROMPT 1 6 "Descrizione "
HELP "Codice descrizione del movimento di contabilita'"
FLAGS "UZ"
USE %DPN
@ -110,7 +110,7 @@ END
LIST F_PROVVISORIO 1 25
BEGIN
PROMPT 1 7 "Movimento provvisorio "
PROMPT 1 7 "Movimento provvisorio "
HELP "Indicare se si tratta di movimento provvisorio"
FIELD PROVVIS
ITEM " |No (movimento normale)"
@ -118,9 +118,16 @@ BEGIN
ITEM "N|Si (non cancellabile)"
END
STRING F_TIPODOC 2
BEGIN
PROMPT 60 7 "Tipo documento "
FIELD TIPODOC
FLAGS "D"
END
STRING F_CODCAUS 3
BEGIN
PROMPT 1 8 "Causale "
PROMPT 1 8 "Causale "
HELP "Codice della causale generante l'operazione"
FLAGS "UZ"
FIELD CODCAUS
@ -132,20 +139,21 @@ BEGIN
DISPLAY "Registro" REG
OUTPUT F_CODCAUS CODCAUS
OUTPUT F_DESCRCAUS DESCR
OUTPUT F_TIPODOC TIPODOC
CHECKTYPE NORMAL
ADD RUN cg0 -4
END
STRING F_DESCRCAUS 50
BEGIN
PROMPT 23 8 ""
PROMPT 25 8 ""
HELP "Descrizione della causale generante l'operazione"
USE LF_CAUSALI KEY 2
INPUT DESCR F_DESCRCAUS
DISPLAY "Descrizione@50" DESCR
DISPLAY "Codice" CODCAUS
COPY OUTPUT F_CODCAUS
END
END
STRING F_VALUTA 3
BEGIN

2
cg/cg2100c.uml
View File

@ -100,7 +100,7 @@ BEGIN
PROMPT 57 5 "Documento n. "
HELP "Numero del documento che ha generato il movimento"
FIELD LF_MOV->NUMDOC
WARNING "La causale impone di specificare il numero documento"
WARNING "La causale o il saldaconto richiedono il numero documento"
END
STRING F_DESCAGG 5

5
cg/cg2101.cpp
View File

@ -1,6 +1,5 @@
#include <stdlib.h>
#include <xvtmacro.h>
#include <applicat.h>
#include <tabutil.h>
#include <utility.h>
@ -197,8 +196,8 @@ bool TMovimentoPN::controlla_liquidazione(const TDate& data, bool reset) const
if (reset && lim.get_bool("B0"))
{
// Resetta i flag di calcolato sulla liquidazione IVA del mese di registrazione
lim.put("B0", FALSE); // calcolato
lim.put("B1", FALSE); // definitivo
lim.zero("B0"); // calcolato
lim.zero("B1"); // definitivo
lim.rewrite();
}

7
cg/cg2102.cpp
View File

@ -1636,7 +1636,12 @@ void TPrimanota_application::add_cgs_rit(bool fiscali)
set_cgs_row(-1, real2imp(imp, tipo), conto, desc, tipo);
}
else
set_cgs_imp(pos, real2imp(imp, tipo));
{
if (imp.is_zero())
reset_cgs_row(pos);
else
set_cgs_imp(pos, real2imp(imp, tipo));
}
}
// Handler of the F_PROTIVA

2
cg/cg2103.cpp
View File

@ -231,7 +231,7 @@ bool TLibro_giornale::read(int y)
for (int err = reg.read(_isgteq); err == NOERR; err = reg.next())
{
if (strncmp(reg.get("CODTAB"), anno, 4) != 0) break;
if (reg.get("CODTAB").compare(anno, 4) != 0) break;
if (reg.get_int("I0") == libro_giornale)
{
found = TRUE;

8
cg/cg3100.cpp
View File

@ -612,11 +612,11 @@ void TListaMov_application::stampa_errori_rmov()
_nr++;
if (anno != _annoeser || datareg != _datareg)
set_row(_nr++, "@11gUno o piu' campi non sono costanti nella riga dell' operazione");
set_row(_nr++, "@11gAnno esercizio o data di registrazione inconsistente tra testata e righe");
if (sez != 'D' && sez != 'A')
set_row(_nr++, "@11gIndicato tipo movimento Dare/Avere errato");
set_row(_nr++, "@11gIndicato tipo sezione Dare/Avere errato");
if (tc.empty())
set_row(_nr++, "@11gNon presente codice gruppo/conto/sottoconto");
set_row(_nr++, "@11gCodice gruppo/conto/sottoconto non presente");
if (!tc.ok())
set_row(_nr++, "@11gCodice gruppo/conto/sottoconto non corrisponde ad un sottoconto");
@ -626,7 +626,7 @@ void TListaMov_application::stampa_errori_rmov()
g = TRUE;
tc.set(gruppo,conto,0l);
if (!tc.read(pc))
set_row(_nr++, "@11gCodice gruppo/conto/sottoconto non presente in Piano dei Conti");
set_row(_nr++, "@11gCodice gruppo/conto/sottoconto non presente nel Piano dei Conti");
else
{
t = pc.get_char(PCN_TMCF);

4
cg/cg5400.cpp
View File

@ -39,7 +39,7 @@ bool TRipristina_stampa::firm_handler(TMask_field& f, KEY key)
if (firm <= 0)
return f.error_box("Codice ditta errato");
else
if (!prefhndl->exist(firm))
if (!prefix().exist(firm))
return f.error_box("Gli archivi della ditta %ld non sono stati ancora generati", firm);
else
{
@ -251,7 +251,7 @@ bool TRipristina_stampa::menu(MENU_TAG)
int day = giornale ? msk.get_int(F_DAY) : 1;
if (day < 1) day = 1;
if (prefhndl->exist(firm))
if (prefix().exist(firm))
{
TString256 mess("Attenzione ripristino della stampa de");
if (_op == restore_reg)

2
cg/cg5500.cpp
View File

@ -153,7 +153,7 @@ void Visliq_app::build_nomiditte()
{
// check no archivi
fr = "??";
bool good = prefhndl->exist(dt.get_long("CODDITTA"));
bool good = prefix().exist(dt.get_long("CODDITTA"));
if (good)
{

2
cg/cg5600.cpp
View File

@ -92,7 +92,7 @@ void TRipristino_liq::build_nomiditte()
{
// check no archivi
fr = "??";
bool good = prefhndl->exist(dt.get_long("CODDITTA"));
bool good = prefix().exist(dt.get_long("CODDITTA"));
if (good)
{