RE:Tengo un buen ejemplo si te interesa escribeme.
Hola
Si me puede enviar un ejemplo se lo agradeceria.
estoy tratando asi cual es el error.
DECLARE
CURSOR C1 IS
SELECT
'04;'||POS_ID_CELDA||';'||TO_CHAR(POS_FECHA,'YYYYMMDD')||';'||POS_COD_BARRAS||';'||
TO_CHAR(NVL(POS_HV_BUENO,0))||';'||TO_CHAR(NVL(POS_HV_ROTO,0))||';'||
TO_CHAR(NVL(POS_HV_FRAGIL,0))||';'||TO_CHAR(NVL(POS_AVES_MUERTAS,0))||';'||
TO_CHAR(POS_SALDO_AVES)||';'||POS_OBSERVACIONES||';'||POS_HORA||';'||POS_USUARIO||';'||
TO_CHAR(POS_FECHA_ACTUALIZA,'YYYYMMDD')||';x;x;x;x;x;x;x;x;x;x;x;x;x;x;x;x;x;x' D1
FROM POSTURAS
WHERE TO_CHAR(POS_FECHA,'YYYYMMDD') BETWEEN TO_CHAR(:B1.FE_INI,'YYYYMMDD') AND TO_CHAR(:B1.FE_FIN,'YYYYMMDD')
order by POS_ID_CELDA;
V_TP_CUENTA VARCHAR2(2);
V_CUENTA VARCHAR2(11);
V_NOM_CLI VARCHAR2(30);
V_HORA VARCHAR2(8);
V_ESTADO VARCHAR(25);
V_SP VARCHAR2(1) = ' ';
V_RAZON VARCHAR2(15);
V_VALOR NUMBER(13,2);
V_FECHA_APL VARCHAR2(10);
OUT_FILE TEXT_IO.FILE_TYPE;
V_ARCHIVO VARCHAR2(150);
begin
V_ARCHIVO := 'C:DATOSSNPD0024.TXT';
OUT_FILE := TEXT_IO.FOPEN(V_ARCHIVO,'W');
DBMS_OUTPUT.PUT_LINE ('Generando Archivo Plano ',no_acknowledge); synchronize;
TEXT_IO.PUT_LINE(OUT_FILE);
TEXT_IO.PUT_LINE(OUT_FILE,'BANCO DE BOGOTA DOMICILIACION POR DISPERSION DE FONDOS FECHA:'||TO_CHAR(SYSDATE,'YYYY/MM/DD')||' PAGINA:1.100');
TEXT_IO.PUT_LINE(OUT_FILE,'SNPD0024'
TEXT_IO.PUT_LINE(OUT_FILE);
TEXT_IO.PUT_LINE(OUT_FILE,'CUENTA ORIGEN '||V_TP_CUENTA||' '||LPAD(V_CUENTA,11,'0')||' NOMBRE CLIENTE ||RPAD(V_NOM_CLI,30' ')||' HORA :'||V_HORA));
TEXT_IO.PUT_LINE(OUT_FILE);
TEXT_IO.PUT_LINE(OUT_FILE,'ESTADO '||RPAD(V_ESTADO,25,' ')||' RAZON '||RPAD(V_RAZON,15' ')||' VALOR ENVIADO ||TO_CHAR(V_VALOR,'99,999,999,999,999.99')||' FECHA A APLICAR'||V_FECHA_APL);
TEXT_IO.PUT_LINE(OUT_FILE);
TEXT_IO.PUT_LINE(OUT_FILE);
TEXT_IO.PUT_LINE(OUT_FILE);
TEXT_IO.PUT_LINE(OUT_FILE,'COD/BANCO NUM.CUENTA TC TR VALOR FACTURA NOMBRE IDENTIDAD ESTADO CAUSAL REC EXTEMP');
TEXT_IO.PUT_LINE(OUT_FILE,RPAD(V_SP,132'='));
FOR I. IN C1 loop
TEXT_IO.PUT_LINE(OUT_FILE,L.D1);
end loop;
message('Generando Satisfactoriamente',no_acknowledge); synchronize;
TEXT_IO.FCLOSE(OUT_FILE);
END;