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

Modifiche varie per corezione errori di contabilita'

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3555 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
ale 1996-09-09 12:51:25 +00:00
parent c5bd965654
commit e2556e6d78
16 changed files with 243 additions and 151 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
cg/cg6700.cpp
View File

@ -1332,7 +1332,7 @@ bool TRic_ListaMov::cerca_tipopag_codpag(TString& codpag, int tipopag)
for (int i = 0; !rpg.eof(); rpg.next(), i++)
{
dep.format("%-4s%d", (const char*) codpag, i);
dep.format("%-s%3d", (const char*) codpag, i);
rpg.zero();
rpg.put("CODTAB", dep);
@ -1548,7 +1548,7 @@ void TRic_ListaMov::descrizione_pagamento(TString& descr,int tipopag,TString& ul
for (int i = 0; !rpg.eof(); rpg.next(), i++)
{
dep.format("%-4s%d", (const char*) codpag, i);
dep.format("%-s%3d", (const char*) codpag, i);
rpg.zero();
rpg.put("CODTAB", dep);
@ -3095,20 +3095,20 @@ void TRic_ListaMov::setta_intestazione()
if (_intestaSC)
{
sep << "Ditta " << get_firm();
sep << " " << ragsoc;
sep.left_just(198);
sep1 << "Ditta " << get_firm();
sep1 << " " << ragsoc;
sep1.left_just(198);
set_header (soh++, (const char*) sep);
set_header (soh++, (const char*) sep1);
sep = "";
sep << "Data @< Pag. @#";
sep1 = "";
sep1 << "Data @< Pag. @#";
sep.right_just(193);
sep.overwrite ("LISTA DI CONTROLLO MOVIMENTI DI SALDACONTO");
set_header (soh++, (const char*)sep);
sep.fill('-');
set_header (soh++, (const char *) sep);
sep1.right_just(193);
sep1.overwrite ("LISTA DI CONTROLLO MOVIMENTI DI SALDACONTO");
set_header (soh++, (const char*)sep1);
sep1.fill('-');
set_header (soh++, (const char *) sep1);
}
else
{

1
cg/cg6800b.uml
View File

@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
BEGIN
PROMPT -15 -1 "~Registra"
MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC
END
BUTTON DLG_CANCEL 10 2

1
cg/cg6800c.uml
View File

@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
BEGIN
PROMPT -15 -1 "~Registra"
MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC
END
BUTTON DLG_CANCEL 10 2

2
cg/cg6801.cpp
View File

@ -34,7 +34,7 @@ bool TDitta_ric::set()
return FALSE;
}
_dittaric = msk->get_int(F_CODDITTA);
_dittaric = msk->get_long(F_CODDITTA);
set_firm(_dittaric);
if (!esegui_controlli())

5
cg/cg6804.cpp
View File

@ -61,6 +61,7 @@ bool TVar_sc::create()
rp.sheet_mask().set_handler(DLG_DELREC, elimina_partita);
_registrato = FALSE;
_aperti = FALSE;
dispatch_e_menu (BAR_ITEM(1));
@ -78,9 +79,12 @@ bool TVar_sc::destroy()
delete _scad;
delete _pagsca;
// delete _tab_reg;
if (_aperti)
{
delete _tpart;
delete _tscad;
delete _tpagsca;
}
return TApplication::destroy();
}
@ -100,6 +104,7 @@ void TVar_sc::apri_temp_file()
_tpart = new TIsamtempfile(LF_PARTITE, tmppart, 0);
_tscad = new TIsamtempfile(LF_SCADENZE, tmpscad, 0);
_tpagsca = new TIsamtempfile(LF_PAGSCA, tmppagsca, 0);
_aperti = TRUE;
}
void TVar_sc::leggi_record_controllo()

2
cg/cg6804.h
View File

@ -28,7 +28,7 @@ class TVar_sc : public TApplication
TTransfer_file _tras_file;
TMask* _msk, *_mask;
bool _registrato;
bool _registrato,_aperti;
TString _control_rec,_trasf,_std,_numpart,_tmcf;
long _dittaric,_sottoc;
int _gruppo,_conto,_anno,_nriga,_tm_caus;

1
cg/cg6804b.uml
View File

@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
BEGIN
PROMPT -13 -1 "~Registra"
MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC
END
BUTTON DLG_CANCEL 10 2

1
cg/cg6804d.uml
View File

@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
BEGIN
PROMPT -13 -1 "~Registra"
MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC
END
BUTTON DLG_CANCEL 10 2

1
cg/cg6804e.uml
View File

@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
BEGIN
PROMPT -13 -1 "~Registra"
MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC
END
BUTTON DLG_CANCEL 10 2

1
cg/cg6804f.uml
View File

@ -4,6 +4,7 @@ BUTTON DLG_OK 8 2
BEGIN
PROMPT -13 -1 "~Conferma"
MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC
END
BUTTON DLG_DELREC 8 2

8
cg/cg6900.cpp
View File

@ -1897,6 +1897,14 @@ int cg6900 (int argc, char* argv[])
delete a;
}
break;
case 'C':
{
TCanc_file_invio* a = new TCanc_file_invio;
a->run(argc, argv,"Eliminazione file invio");
delete a;
}
break;
default:
break;
}

1
cg/cg6900.h
View File

@ -38,6 +38,7 @@
#include "cg6901.h"
#include "cg6903.h"
#include "cg6905.h"
#include "cglib04.h"
class TInv_cont : public TApplication

39
cg/cg6905.cpp Executable file
View File

@ -0,0 +1,39 @@
#include "cg6905.h"
bool TCanc_file_invio::create()
{
TApplication::create();
dispatch_e_menu (BAR_ITEM(1));
return TRUE;
}
bool TCanc_file_invio::destroy()
{
return TApplication::destroy();
}
bool TCanc_file_invio::set()
{
TString marker;
_tras_file.remove_all(FALSE);
marker = firm2dir(0);
marker << "\\marker";
fremove(marker);
message_box("Eliminazione file di lavoro dell' invio terminata");
return FALSE;
}
bool TCanc_file_invio::menu(MENU_TAG m)
{
if (m == BAR_ITEM(1))
return set();
return FALSE;
}

21
cg/cg6905.h Executable file
View File

@ -0,0 +1,21 @@
// Ripristino flag invio PN e IVA
#include <applicat.h>
#include <isam.h>
#include <urldefid.h>
#include "cglib04.h"
class TCanc_file_invio : public TApplication
{
TTransfer_file _tras_file;
public:
virtual bool create();
virtual bool destroy();
virtual bool menu(MENU_TAG m);
bool set();
TCanc_file_invio() {}
};

14
cg/cglib04.cpp
View File

@ -2917,7 +2917,11 @@ void TTransfer_file::new_key(TString& key, int tipo, TString& buffer)
n_key << key.mid(2,6);
n_key << key.mid(8,2);
n_key << buffer.mid(26,2);
n_key << buffer.mid(28,7);
TString app; // Modifica del 06-09-96 relativa all'allineamento
app = buffer.mid(28,7);
app.trim(); // del numero di riferimento partita che per i file
app.format("%-7s", (const char*) app); // temporanei deve essere sempre a sinistra
n_key << app; // indipendentemente da quello che c'e' sul trasfer
n_key << buffer.mid(35,2);
n_key << key.mid(10,3);
@ -3530,6 +3534,14 @@ bool TTransfer_file::fcopytemp_PC(const char* orig, const char* dest)
fclose(o);
}
if (trec == "B1" || trec == "B2" || trec == "B3")
{
TString app = buffer.mid(19,7);
app.trim(); // Modifica del 06-09-96 relativa all'allineamento
app.format("%-7s", (const char*) app); // del numero di riferimento partita che per i file
buffer.overwrite(app,19); // temporanei deve essere sempre a sinistra
} // indipendentemente da quello che c'e' sul trasfer
if (trec == "W1")
write_testata_causali(buffer);