salto de linea en archivo plano
Publicado por Elias (10 intervenciones) el 13/03/2007 22:26:59
hola a todos tengo el siguiente problema estoy generando una rchivo plano en la cual el primero registro es un valor fijo y lo lleno de esta manera
li_FileNum = FileOpen("c:\PAGHAB.txt", LineMode!,Write!, LockWrite!, Append!)
fileseek(li_FileNum,0,FromBeginning!)
FileWrite(li_FileNum,ls_reg_ar)
fileseek(li_FileNum,1,FromBeginning!)
FileWrite(li_FileNum,ls_reg_codcliente)
fileseek(li_FileNum,7,FromBeginning!)
FileWrite(li_FileNum,ls_reg_pos_a)
fileseek(li_FileNum,11,FromBeginning!)
FileWrite(li_FileNum,ls_reg_codsucursal)
fileseek(li_FileNum,14,FromBeginning!)
FileWrite(li_FileNum,ls_reg_ctacte)
el problema q tengo es el sgt tengo un tabla con los valores de los abonado
en la cual deberian llenarse apartir de la segunda fila respetando las posiciones de la primera
lo que hago es esto
For ll_contador= 1 to dw_1.rowcount()
ls_codper =dw_1.object.pco_codper[ll_contador]
ls_apepat =dw_1.object.pco_apepat[ll_contador]
ls_apemat =dw_1.object.pco_apemat[ll_contador]
ls_nombre =dw_1.object.pco_nombre[ll_contador]
ls_cuenta =dw_1.object.pco_cuenta[ll_contador]
ld_monto =dw_1.object.pco_monto[ll_contador]
fileseek(li_FileNum,0,FromCurrent! )
FileWrite(li_FileNum,ls_codper)
fileseek(li_FileNum,1,FromCurrent! )
FileWrite(li_FileNum,ls_apepat )
next
el problema es que al llenar los datos en el plano me genera un salto de linea y no se posician donde deberia seguir la posicion.alguien sabe como puedo controlar eso u otra manera de hacer esto.
Gracias A todos
li_FileNum = FileOpen("c:\PAGHAB.txt", LineMode!,Write!, LockWrite!, Append!)
fileseek(li_FileNum,0,FromBeginning!)
FileWrite(li_FileNum,ls_reg_ar)
fileseek(li_FileNum,1,FromBeginning!)
FileWrite(li_FileNum,ls_reg_codcliente)
fileseek(li_FileNum,7,FromBeginning!)
FileWrite(li_FileNum,ls_reg_pos_a)
fileseek(li_FileNum,11,FromBeginning!)
FileWrite(li_FileNum,ls_reg_codsucursal)
fileseek(li_FileNum,14,FromBeginning!)
FileWrite(li_FileNum,ls_reg_ctacte)
el problema q tengo es el sgt tengo un tabla con los valores de los abonado
en la cual deberian llenarse apartir de la segunda fila respetando las posiciones de la primera
lo que hago es esto
For ll_contador= 1 to dw_1.rowcount()
ls_codper =dw_1.object.pco_codper[ll_contador]
ls_apepat =dw_1.object.pco_apepat[ll_contador]
ls_apemat =dw_1.object.pco_apemat[ll_contador]
ls_nombre =dw_1.object.pco_nombre[ll_contador]
ls_cuenta =dw_1.object.pco_cuenta[ll_contador]
ld_monto =dw_1.object.pco_monto[ll_contador]
fileseek(li_FileNum,0,FromCurrent! )
FileWrite(li_FileNum,ls_codper)
fileseek(li_FileNum,1,FromCurrent! )
FileWrite(li_FileNum,ls_apepat )
next
el problema es que al llenar los datos en el plano me genera un salto de linea y no se posician donde deberia seguir la posicion.alguien sabe como puedo controlar eso u otra manera de hacer esto.
Gracias A todos
Valora esta pregunta


0