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

Aggiunto programma di stampa tabella IV direttiva

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@463 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1994-10-26 11:53:54 +00:00
parent 3a5c94cc13
commit d8789177e7
3 changed files with 1878 additions and 1848 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ba/ba3800.cpp
View File

@ -238,7 +238,7 @@ void BA3800_application::crea_sort_piano_conti()
for (pconti.first(); !pconti.eof(); pconti.next()) for (pconti.first(); !pconti.eof(); pconti.next())
{ {
// _prog->addstatus(1); // _prog->addstatus(1);
g = pconti.get_int (PCN_GRUPPO); g = pconti.get_int (PCN_GRUPPO);
c = pconti.get_int (PCN_CONTO); c = pconti.get_int (PCN_CONTO);
s = pconti.get_long(PCN_SOTTOCONTO); s = pconti.get_long(PCN_SOTTOCONTO);
@ -1112,7 +1112,7 @@ bool BA3800_application::preprocess_studio(int counter)
{ {
TString16 codtab; TString16 codtab;
// _classe_da_stampare = format ("%1c%1c%8s%2d",bil->sez,bil->let,(const char*) bil->numr,bil->num); // _classe_da_stampare = format ("%1c%1c%8s%2d",bil->sez,bil->let,(const char*) bil->numr,bil->num);
codtab = _tabivd->get("CODTAB"); codtab = _tabivd->get("CODTAB");
_sez_da_stamp = *(codtab.mid(0,1)); _sez_da_stamp = *(codtab.mid(0,1));
@ -1305,21 +1305,21 @@ void BA3800_application::setta_righe_studio(const char * titolo)
set_row(_i,"@0g%c", _let_da_stamp); set_row(_i,"@0g%c", _let_da_stamp);
*_descr = (const char*) descr_let; *_descr = (const char*) descr_let;
setta_righe_descr(_descr,lettera,lettera2); setta_righe_descr(_descr,lettera,lettera2);
// set_row(_i++,"@1g)@3g%s", (const char*) descr_let); // set_row(_i++,"@1g)@3g%s", (const char*) descr_let);
} }
if (numrom != "") if (numrom != "")
{ {
set_row(_i,"@3g%8s", (const char*) numrom); set_row(_i,"@3g%8s", (const char*) numrom);
*_descr = (const char*) descr_numr; *_descr = (const char*) descr_numr;
setta_righe_descr(_descr,numr,numr2); setta_righe_descr(_descr,numr,numr2);
// set_row(_i++,"@12g-@14g%s", (const char*) descr_numr); // set_row(_i++,"@12g-@14g%s", (const char*) descr_numr);
} }
if (numero != 0) if (numero != 0)
{ {
set_row(_i,"@13g%s", (const char*) _num_da_stamp); set_row(_i,"@13g%s", (const char*) _num_da_stamp);
*_descr = (const char*) descr_num; *_descr = (const char*) descr_num;
setta_righe_descr(_descr,num,num2); setta_righe_descr(_descr,num,num2);
// set_row(_i++,"@15g)@18g%s", (const char*) descr_num); // set_row(_i++,"@15g)@18g%s", (const char*) descr_num);
} }
} }
} }
@ -1418,7 +1418,7 @@ void BA3800_application::setta_righe_ditta(const char* titolo)
numeror = atoi(bil->numr); numeror = atoi(bil->numr);
numrom = itor(numeror); numrom = itor(numeror);
numero = atoi(bil->num); numero = atoi(bil->num);
// num = bil->num; // num = bil->num;
gruppo = atoi(bil->gruppo); gruppo = atoi(bil->gruppo);
conto = atoi(bil->conto); conto = atoi(bil->conto);
sottoc = atoi(bil->sottoc); sottoc = atoi(bil->sottoc);

5
ba/ba3800.h Executable file
View File

@ -0,0 +1,5 @@
// Campi maschera Stampa Tabella IV Direttiva CEE
#define TAB_IVD "%IVD"
#define F_DATASTAMPA 101

25
ba/ba3800a.uml Executable file
View File

@ -0,0 +1,25 @@
#include "ba3800.h"
PAGE "Stampa Tabella IV Direttiva CEE" -1 -1 40 5
DATE F_DATASTAMPA
BEGIN
PROMPT 5 1 "Data di stampa "
FLAGS "A"
END
BUTTON DLG_PRINT 10 2
BEGIN
PROMPT -12 -1 "~Stampa"
MESSAGE EXIT,K_ENTER
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK