Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : personalizzazione dinamica git-svn-id: svn://10.65.10.50/trunk@20325 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
608dedf728
commit
bccbb6c7e7
@ -147,7 +147,7 @@ class TDistribuzione_f24 : public TSkeleton_application
|
|||||||
virtual bool check_autorization() const {return false;}
|
virtual bool check_autorization() const {return false;}
|
||||||
|
|
||||||
protected:
|
protected:
|
||||||
virtual const char * extra_modules() const {return "cg";}
|
virtual const char * extra_modules() const {return "rs";}
|
||||||
virtual bool create();
|
virtual bool create();
|
||||||
|
|
||||||
void elabora();
|
void elabora();
|
||||||
@ -266,8 +266,8 @@ void TDistribuzione_f24::elabora()
|
|||||||
|
|
||||||
bool TDistribuzione_f24::create()
|
bool TDistribuzione_f24::create()
|
||||||
{
|
{
|
||||||
//se non ha la CG non può proseguire
|
//se non ha il modulo RS non può proseguire
|
||||||
if (!has_module(CGAUT))
|
if (!has_module(RSAUT))
|
||||||
return error_box(TR("Modulo non autorizzato"));
|
return error_box(TR("Modulo non autorizzato"));
|
||||||
|
|
||||||
return TSkeleton_application::create();
|
return TSkeleton_application::create();
|
||||||
|
@ -216,6 +216,7 @@ bool TImporta_movana::transfer(const TFilename& file)
|
|||||||
const char sep_field = _msk->get(F_SEP_FIELD)[0]; //separatore dei campi
|
const char sep_field = _msk->get(F_SEP_FIELD)[0]; //separatore dei campi
|
||||||
const char sep_dec = _msk->get(F_SEP_DEC)[0]; //separatore decimali
|
const char sep_dec = _msk->get(F_SEP_DEC)[0]; //separatore decimali
|
||||||
//parametri del movana
|
//parametri del movana
|
||||||
|
const long numreg = _msk->get_long(F_NUMREGCA);
|
||||||
const int annoes = _msk->get_int(F_ANNOES);
|
const int annoes = _msk->get_int(F_ANNOES);
|
||||||
const TDate datareg = _msk->get_date(F_DATAREG);
|
const TDate datareg = _msk->get_date(F_DATAREG);
|
||||||
const TDate datacomp = _msk->get_date(F_DATACOMP);
|
const TDate datacomp = _msk->get_date(F_DATACOMP);
|
||||||
@ -241,6 +242,14 @@ bool TImporta_movana::transfer(const TFilename& file)
|
|||||||
//-------
|
//-------
|
||||||
//movimento analitico che sarà generato
|
//movimento analitico che sarà generato
|
||||||
TAnal_mov movana;
|
TAnal_mov movana;
|
||||||
|
//il movana esisteva giŕ o č nuovo?
|
||||||
|
const int err = movana.read(numreg);
|
||||||
|
//se esisteva giŕ deve accoppare tutte le righe visto che le sostituirŕ
|
||||||
|
if (err == NOERR)
|
||||||
|
movana.destroy_rows(LF_RMOVANA);
|
||||||
|
else
|
||||||
|
movana.put(MOVANA_NUMREG, numreg);
|
||||||
|
|
||||||
movana.put(MOVANA_DATAREG, datareg);
|
movana.put(MOVANA_DATAREG, datareg);
|
||||||
movana.put(MOVANA_DATACOMP, datacomp);
|
movana.put(MOVANA_DATACOMP, datacomp);
|
||||||
movana.put(MOVANA_DATAFCOMP, datafcomp);
|
movana.put(MOVANA_DATAFCOMP, datafcomp);
|
||||||
@ -353,7 +362,7 @@ bool TImporta_movana::transfer(const TFilename& file)
|
|||||||
const real totimp = totale.valore();
|
const real totimp = totale.valore();
|
||||||
|
|
||||||
//controllo sul totmov in caso di riscrittura
|
//controllo sul totmov in caso di riscrittura
|
||||||
if (ori_totimp != totimp || ori_totsez != totsez)
|
if (ori_totimp != totimp || (ori_totimp == ZERO && ori_totsez != totsez))
|
||||||
{
|
{
|
||||||
TString str_totimp;
|
TString str_totimp;
|
||||||
str_totimp << totimp;
|
str_totimp << totimp;
|
||||||
|
@ -146,9 +146,11 @@ BEGIN
|
|||||||
PROMPT 2 15 "Totale movimento "
|
PROMPT 2 15 "Totale movimento "
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_TOTMOV_SEZ 1
|
LIST F_TOTMOV_SEZ 1 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 15 ""
|
PROMPT 40 15 ""
|
||||||
|
ITEM "D|Dare"
|
||||||
|
ITEM "A|Avere"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_PROFILE 50
|
STRING DLG_PROFILE 50
|
||||||
@ -218,6 +220,16 @@ BEGIN
|
|||||||
PROMPT 1 11 " e con le righe importate."
|
PROMPT 1 11 " e con le righe importate."
|
||||||
END
|
END
|
||||||
|
|
||||||
|
TEXT -1
|
||||||
|
BEGIN
|
||||||
|
PROMPT 1 12 "@bTracciato record file da importare"
|
||||||
|
END
|
||||||
|
|
||||||
|
TEXT -1
|
||||||
|
BEGIN
|
||||||
|
PROMPT 1 13 "COMMESSA ; SEDE ; IMPORTO ; SEZIONE ; GRUPPO ; CONTO ; SOTTOCONTO"
|
||||||
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
Loading…
x
Reference in New Issue
Block a user