Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/branches/R_10_00@21816 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
		
							parent
							
								
									36cb5a9165
								
							
						
					
					
						commit
						04b1b9d4a6
					
				| @ -201,10 +201,10 @@ void TFile2Txt::genera_clienti_txt(const long da_codcli) | |||||||
| 
 | 
 | ||||||
|     clienti.new_rec(""); |     clienti.new_rec(""); | ||||||
| 
 | 
 | ||||||
|     //il codice terminale è il codagente legato al cliente
 |     //il codice terminale è il codagente legato al cliente (codice agente lungo 5, codice terminale lungo 3)
 | ||||||
|     TString8 codage = archivio_clienti.get("CFVEN.CODAG").as_string(); |     const TString8 codage = archivio_clienti.get("CFVEN.CODAG").as_string(); | ||||||
|     codage = codage.right(3); |     const TString4 codterm = codage.right(3); | ||||||
|     clienti.set("CodiceTerminale", codage); |     clienti.set("CodiceTerminale", codterm); | ||||||
| 
 | 
 | ||||||
|     const long codcf = archivio_clienti.get(CLI_CODCF).as_int(); |     const long codcf = archivio_clienti.get(CLI_CODCF).as_int(); | ||||||
|     clienti.set("CodiceCliente", codcf); |     clienti.set("CodiceCliente", codcf); | ||||||
| @ -257,6 +257,26 @@ void TFile2Txt::genera_clienti_txt(const long da_codcli) | |||||||
|     const TString& str_sconto = archivio_clienti.get(CFV_SCONTO).as_string(); |     const TString& str_sconto = archivio_clienti.get(CFV_SCONTO).as_string(); | ||||||
|     clienti.set("ScontoFineFattura", hd_find_sconto(str_sconto)); |     clienti.set("ScontoFineFattura", hd_find_sconto(str_sconto)); | ||||||
| 
 | 
 | ||||||
|  |     //gestione giri
 | ||||||
|  |     //i giri stanno nella tabella di modulo &HGI, con chiave CODTAB=agente-giorno-cliente
 | ||||||
|  |     TString query; | ||||||
|  |     query << "USE &HGI"; | ||||||
|  |     query << "\nSELECT (CODTAB[7,12]=#CODCLI)"; | ||||||
|  |     query << "\nFROM CODTAB=#CODAGE"; | ||||||
|  |     query << "\nTO CODTAB=#CODAGE"; | ||||||
|  |     TISAM_recordset cli_giri_recset(query); | ||||||
|  |     cli_giri_recset.set_var("#CODCLI", codcf); | ||||||
|  |     cli_giri_recset.set_var("#CODAGE", codage); | ||||||
|  | 
 | ||||||
|  |     for (bool ok = cli_giri_recset.move_first(); ok; ok = cli_giri_recset.move_next()) | ||||||
|  |     { | ||||||
|  |       const int giorno = cli_giri_recset.get("CODTAB[6,6]").as_int(); | ||||||
|  |       TString8 nome_campo = "Giro0"; | ||||||
|  |       nome_campo << giorno; | ||||||
|  |       const long ordine = cli_giri_recset.get("I0").as_int(); | ||||||
|  |       clienti.set(nome_campo, ordine); | ||||||
|  |     } | ||||||
|  |   | ||||||
|     TString80 ntel = archivio_clienti.get(CLI_PTEL).as_string(); |     TString80 ntel = archivio_clienti.get(CLI_PTEL).as_string(); | ||||||
|     ntel << archivio_clienti.get(CLI_TEL).as_string(); |     ntel << archivio_clienti.get(CLI_TEL).as_string(); | ||||||
|     clienti.set("NumeroTelefono", ntel); |     clienti.set("NumeroTelefono", ntel); | ||||||
|  | |||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user