CLIENT_TEXT_IO does not export full data

Question

Hi everyone,
I am using CLIENT_TEXT_IO to export data into a text file, but the data is not fully written and terminated but message appears successfully exported (as mentioned in code).
I tried it with TEXT_IO and its working fine for me but on the client side its giving this error:
"File Creation was interrupted. Error 302000: non-Oracle exception"
any suggestions?

Answer 1

DECLARE
in_file CLIENT_TEXT_IO.FILE_TYPE;
linebuf VARCHAR2(4000);
V_ALT NUMBER;
filename VARCHAR2(1000) :='S:\SASData\birth_death\Rawdata\SAS-' || TO_CHAR(SYSDATE, 'DDMMRRRR-HH24MISS') || '.txt';
          CURSOR C IS
          SELECT BNF_CHILD_CPRNO || '@' || BNF_NO || '@' || HC_CODE || '@' ||
          TO_CHAR(BNF_REG_DT, 'DD/MON/RRRR') || '@' ||
          TO_CHAR(BNF_CHILD_DOB, 'DD/MON/RRRR') || '@' ||
          BNF_CHILD_DLVRY_ORDER || '@' || BNF_CHILD_SEX || '@' || HCF_CODE || '@' ||
          DLVRYCOND_ID || '@' || DLVRY_TYPE_ID || '@' || BNF_WT_KG || '@' ||
          BNF_WT_GM || '@' || BNF_GEST_WEEK || '@' || BNF_GEST_DAY || '@' ||
          BLK_CODE || '@' || TO_CHAR(BNF_FATH_DOB, 'DD/MON/RRRR') || '@' ||
          BNF_FATH_COUNCODE || '@' ||
          TO_CHAR(BNF_MOTH_DOB || 'DD/MON/RRRR') || '@' ||
          BNF_MOTH_COUNCODE || '@' || BNF_MRG_DUR_YR || '@' ||
          BNF_MRG_DUR_MM || '@' || BNF_NO_OF_BIRTH || '@' || BNF_PRV_ALIVE || '@' ||
          BNF_PRV_DEAD || '@' || BNF_DLVRY_INTRVL_YR || '@' ||
          BNF_DLVRY_INTRVL_MM || '@' || BNF_POD_COUNCODE || '@' ||
          BNF_MOTH_RELCODE || '@' || BNF_FATH_RELCODE || '@' ||
          BNF_MOTH_CPR || '@' || BNF_FATH_QUALOBTCODE || '@' ||
          BNF_MOTH_QUALOBTCODE || '@' || BNF_STATUS || '@' || BNF_PARA MYDATA
          FROM EBIRTH_USER.T_EBIRTH_BNF T
          WHERE BNF_REG_DT BETWEEN :REG_FDATE AND :REG_TDATE
          AND UPPER(BNF_REC_STATUS) = 'Y';--Consider only Active status Y
BEGIN
P_VALIDATE_RANGE;     --CHECK IF DATA EXISTS
          IF CLIENT_TEXT_IO.Is_Open(in_file) THEN
          CLIENT_TEXT_IO.Fclose(in_file);
          END IF;
in_file := CLIENT_TEXT_IO.FOPEN(filename, 'W');
FOR I IN C LOOP
linebuf := I.MYDATA;
CLIENT_TEXT_IO.PUT_LINE(in_file, linebuf);
synchronize;
END LOOP;
CLIENT_TEXT_IO.FCLOSE(in_file);
SET_ALERT_PROPERTY('AL_CAU_OK',TITLE,'Exporting Status');
filename := replace(filename,'S:\SASData\birth_death\Rawdata\','');
          SET_ALERT_PROPERTY('AL_CAU_OK',ALERT_MESSAGE_TEXT,'File '||filename||' Successfully Created.');
          V_ALT := SHOW_ALERT('AL_CAU_OK');
EXCEPTION
WHEN NO_DATA_FOUND THEN
CLIENT_TEXT_IO.FCLOSE(in_file);
WHEN OTHERS THEN
--MESSAGE(sqlerrm);MESSAGE(sqlerrm);
SET_ALERT_PROPERTY('AL_STOP_OK',TITLE,'Exporting Status');
               SET_ALERT_PROPERTY('AL_STOP_OK',ALERT_MESSAGE_TEXT,'File Creation was interrupted. Error: '||sqlerrm);
               V_ALT := SHOW_ALERT('AL_STOP_OK');
RAISE FORM_TRIGGER_FAILURE;
END;
Edited by: rha2 on Jul 11, 2012 10:26 AM