Patch level : 2.0 688
Files correlati : cg6.exe Ricompilazione Demo : [ ] Commento : no comment git-svn-id: svn://10.65.10.50/trunk@11771 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
2401c4a5fc
commit
ce1ae20aab
@ -238,7 +238,8 @@ bool TRic_archivi::leggi_marker()
|
|||||||
return error_box(FR("Libreria archivi ditta %ld non presente su disco"), _dittaric);
|
return error_box(FR("Libreria archivi ditta %ld non presente su disco"), _dittaric);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
return error_box(TR("Codici NON PRESENTI in tabella ricezione: caricarli e riprovare"));
|
return error_box(FR("Codici NON PRESENTI in tabella ricezione:\ncaricare %s %ld e riprovare"),
|
||||||
|
(const char*)_nomeid, _dittainv);
|
||||||
}
|
}
|
||||||
|
|
||||||
return TRUE;
|
return TRUE;
|
||||||
@ -249,8 +250,6 @@ bool TRic_archivi::leggi_marker()
|
|||||||
|
|
||||||
bool TRic_archivi::leggi_marker_rep()
|
bool TRic_archivi::leggi_marker_rep()
|
||||||
{
|
{
|
||||||
TString16 tmp;
|
|
||||||
|
|
||||||
if (!_marker.exist())
|
if (!_marker.exist())
|
||||||
{
|
{
|
||||||
if (_disketto)
|
if (_disketto)
|
||||||
@ -287,7 +286,7 @@ bool TRic_archivi::leggi_marker_rep()
|
|||||||
_dittainv = atol(buffer.sub(10,15));
|
_dittainv = atol(buffer.sub(10,15));
|
||||||
_totrectras = atol(buffer.sub(26,32));
|
_totrectras = atol(buffer.sub(26,32));
|
||||||
_numinv = atoi(buffer.sub(15,18));
|
_numinv = atoi(buffer.sub(15,18));
|
||||||
tmp = buffer.sub(18,26);
|
TString16 tmp = buffer.sub(18,26);
|
||||||
_datatras = converti(tmp,TRUE);
|
_datatras = converti(tmp,TRUE);
|
||||||
|
|
||||||
if (_numdisk > 1) //Va fatto solo dal disco 2 in poi
|
if (_numdisk > 1) //Va fatto solo dal disco 2 in poi
|
||||||
|
@ -1950,7 +1950,7 @@ void TTransfer_file::write_tmp_movIVA(TString& record)
|
|||||||
|
|
||||||
if (flag == 2)
|
if (flag == 2)
|
||||||
{
|
{
|
||||||
TString f = converti(field,FALSE);
|
TString80 f = converti(field,FALSE);
|
||||||
dep->put(fname,f);
|
dep->put(fname,f);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -1989,9 +1989,9 @@ int TTransfer_file::trasfer_data_moviva(TIsamtempfile& file, TRectype& dep, int
|
|||||||
{
|
{
|
||||||
if (ln == LF_MOV)
|
if (ln == LF_MOV)
|
||||||
{
|
{
|
||||||
TDate data74ter (dep.get_date(MOV_DATA74TER));
|
TDate data74ter = dep.get_date(MOV_DATA74TER);
|
||||||
TString codval (dep.get (MOV_CODVALI));
|
TString4 codval (dep.get (MOV_CODVALI));
|
||||||
TString ocfpi (dep.get (MOV_OCFPI));
|
TString80 ocfpi (dep.get (MOV_OCFPI));
|
||||||
long codcf = dep.get_long(MOV_CODCF);
|
long codcf = dep.get_long(MOV_CODCF);
|
||||||
real cambioi (dep.get_real(MOV_CAMBIOI));
|
real cambioi (dep.get_real(MOV_CAMBIOI));
|
||||||
real corrlire (dep.get_real(MOV_CORRLIRE));
|
real corrlire (dep.get_real(MOV_CORRLIRE));
|
||||||
@ -2627,14 +2627,15 @@ char TTransfer_file::what_is_this(TString& record,TString& tipo)
|
|||||||
{
|
{
|
||||||
TRic_recfield recf (ttab.curr(), "S0", 0, sizeT);
|
TRic_recfield recf (ttab.curr(), "S0", 0, sizeT);
|
||||||
|
|
||||||
long nreg = atol(record.sub(2,8));
|
const long nreg = atol(record.sub(2,8));
|
||||||
int nriga = atoi(record.sub(8,10));
|
const int nriga = atoi(record.sub(8,10));
|
||||||
int anno = atoi(record.sub(26,28));
|
const int anno = atoi(record.sub(26,28));
|
||||||
TString numpart = record.sub(28,35);
|
const TString8 numpart = record.sub(28,35);
|
||||||
int nrata = atoi(record.sub(35,37));
|
const int nrata = atoi(record.sub(35,37));
|
||||||
int num_rig = atoi(record.sub(10,13));
|
const int num_rig = atoi(record.sub(10,13));
|
||||||
|
|
||||||
TString dep (format("%2s%d%06ld%02d%2d%7s%02d", (const char*)"B1",3,nreg,nriga,anno,(const char*)numpart,nrata));
|
TString80 dep;
|
||||||
|
dep.format("%2s%d%06ld%02d%2d%7s%02d", (const char*)"B1",3,nreg,nriga,anno,(const char*)numpart,nrata);
|
||||||
|
|
||||||
ttab.zero();
|
ttab.zero();
|
||||||
ttab.put("CODTAB", dep);
|
ttab.put("CODTAB", dep);
|
||||||
@ -2661,7 +2662,7 @@ char TTransfer_file::what_is_this(TString& record,TString& tipo)
|
|||||||
if (_esiste_pagsca)
|
if (_esiste_pagsca)
|
||||||
caso = 'r';
|
caso = 'r';
|
||||||
|
|
||||||
TString codval = record.sub(79,82);
|
TString4 codval = record.sub(79,82);
|
||||||
codval.trim();
|
codval.trim();
|
||||||
real impv (record.sub(127,140));
|
real impv (record.sub(127,140));
|
||||||
|
|
||||||
@ -5257,7 +5258,8 @@ const char* converti (TString& data_AS400,bool anno_di_quattro)
|
|||||||
{
|
{
|
||||||
TString& TEMP = get_tmp_string();
|
TString& TEMP = get_tmp_string();
|
||||||
|
|
||||||
if (data_AS400 == "000000" || data_AS400 == "00000000")
|
// if (data_AS400 == "000000" || data_AS400 == "00000000")
|
||||||
|
if (real::is_null(data_AS400))
|
||||||
return TEMP;
|
return TEMP;
|
||||||
|
|
||||||
if (anno_di_quattro)
|
if (anno_di_quattro)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user