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