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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Scadenze di don.: possibilita' di registrare la data di stampa nella data convc. del soggetto (chiesto da PR)


git-svn-id: svn://10.65.10.50/trunk@7868 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1999-02-26 15:30:09 +00:00
parent 81379ea6aa
commit c686d6793a
3 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
at/at4100.cpp
View File

@ -62,7 +62,7 @@ class TStampaScadenze : public TPrintapp
TDate _data_stampa; TDate _data_stampa;
TDate _dataini, _datafin, _dataultid; TDate _dataini, _datafin, _dataultid;
int _intminconv; int _intminconv;
bool _usomodo, _usasez; bool _usomodo, _usasez, _registra;
TString16 _giorni, _punto; TString16 _giorni, _punto;
TString16 _procdon, _modo, _ab01, _ab02, _ab03, _rh; TString16 _procdon, _modo, _ab01, _ab02, _ab03, _rh;
ts _tipostampa; ts _tipostampa;
@ -470,6 +470,7 @@ bool TStampaScadenze::filter_func_scadenze(const TRelation* rel)
bool TStampaScadenze::preprocess_page(int file, int counter) bool TStampaScadenze::preprocess_page(int file, int counter)
{ {
TRectype& recsog = current_cursor()->curr();
if (_tipostampa==elenco || _tipostampa==completo || _tipostampa==personale) if (_tipostampa==elenco || _tipostampa==completo || _tipostampa==personale)
{ {
TRectype& recsog = current_cursor()->curr(); TRectype& recsog = current_cursor()->curr();
@ -516,6 +517,12 @@ bool TStampaScadenze::preprocess_page(int file, int counter)
_contatore++; _contatore++;
_totfinestampa++; _totfinestampa++;
} }
if (_registra)
{
recsog.put(SOG_DATACONV, _data_stampa);
recsog.put(SOG_NUMCONV, 0);
current_cursor()->file().rewrite();
}
if (_tipostampa==etichette) if (_tipostampa==etichette)
if (printer().rows_left() < _form_eti->get_body().height()) if (printer().rows_left() < _form_eti->get_body().height())
printer().formfeed(); printer().formfeed();
@ -626,6 +633,7 @@ bool TStampaScadenze::set_print(int m)
_ab03 = _msk->get(F_AB03); _ab03 = _msk->get(F_AB03);
_rh = _msk->get(F_RHANTID); _rh = _msk->get(F_RHANTID);
_punto = _msk->get(F_PUNTO); _punto = _msk->get(F_PUNTO);
_registra = _msk->get_bool(F_REGISTRA);
_giorni = "NNNNNNN"; _giorni = "NNNNNNN";
if (_msk->get_bool(F_GPD_LUN)) if (_msk->get_bool(F_GPD_LUN))
_giorni[0] = 'X'; _giorni[0] = 'X';

1
at/at4100a.h
View File

@ -44,6 +44,7 @@
#define F_INTMINCONV 319 #define F_INTMINCONV 319
#define F_PUNTO 320 #define F_PUNTO 320
#define F_D_PUNTO 321 #define F_D_PUNTO 321
#define F_REGISTRA 322
#define F_ELENCO 401 #define F_ELENCO 401
#define F_COMPLETO 402 #define F_COMPLETO 402

17
at/at4100a.uml
View File

@ -415,7 +415,7 @@ BEGIN
OUTPUT F_D_PUNTO S0 OUTPUT F_D_PUNTO S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
WARNING "Codice non presente" WARNING "Codice non presente"
HELP "Punto di prelievo per la convocazione" HELP "Punto di prelievo"
END END
STRING F_D_PUNTO 50 STRING F_D_PUNTO 50
@ -424,5 +424,20 @@ BEGIN
FLAGS "D" FLAGS "D"
END END
TEXT DLG_NULL
BEGIN
PROMPT 2 18 "Stampa solo chi fatto l'ultima donazione nel punto scelto o,"
END
TEXT DLG_NULL
BEGIN
PROMPT 2 19 "se non ha donazioni, ha come preferenza quel punto prelievo"
END
BOOLEAN F_REGISTRA
BEGIN
PROMPT 2 20 "Registra la data di stampa nel campo data convocazione del soggetto"
END
ENDPAGE ENDPAGE
ENDMASK ENDMASK