HI All ,
I am using Oracle 10G.
I have a functionality which will allow user to generate CSV file .
It is working fine . But if the value has 0 before then number then in CSV file that 0 is not coming .
For example if I have a value in forms like 000102 then it is coming only 102 in CSV file , it should come as 000102 .
How can I do that .
below is the code in which I am generating CSV file .
PROCEDURE P_DUTY_RATE_MISS_EXPORT IS
LF$File CLIENT_TEXT_IO.FILE_TYPE;
LC$Name Varchar2(100) ;
LC$Fic Varchar2(100) ;
LN$Lines Pls_integer := 0 ;
LC$Line Varchar2(4000) ;
alert_id ALERT := Find_Alert('IFL_ERROR');
alert_val NUMBER;
alert_text VARCHAR2(80) := 'There are unsaved changes, please save before Exporting. ';
BEGIN
LC$Name := My_file_'||to_char(sysdate,'DDMONYY_hhmiss')||'.csv';
LC$Fic := WEBUTIL_FILE.FILE_SAVE_DIALOG( 'C:\',LC$Name,'','Select a client destination file name' ) ;
IF LC$Fic IS NULL THEN
Return ;
ELSE
IF UPPER(SUBSTR(LC$Fic,-4,4)) <> '.CSV' THEN
LC$Fic := LC$Fic||'.csv';
ELSE
LC$Fic := LC$Fic;
END IF;
:GLOBAL.My_path:= LC$Fic;
GO_BLOCK('MY_BLOCK');
FIRST_RECORD;
LF$File := CLIENT_TEXT_IO.FOPEN(LC$Fic, 'W');
LC$Line := 'col1, col2, col3 col4 , col5, col6, col7, UPD_DATE '||CHR(10);
CLIENT_TEXT_IO.PUTF(LF$File, LC$Line ) ;
LOOP
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL1||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL2||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL3||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL4||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL5||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL6||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.COL7||',');
CLIENT_TEXT_IO.PUTF(LF$File, :MY_BLOCK.UPD_DATE||',');
CLIENT_TEXT_IO.PUTF(LF$File, CHR(10));
EXIT WHEN :SYSTEM.LAST_RECORD = 'TRUE';
NEXT_RECORD;
END LOOP;
CLIENT_TEXT_IO.FCLOSE(LF$File);
FIRST_RECORD;
SYNCHRONIZE;
--client_host('rundll32.exe url.dll,FileProtocolHandler '||:GLOBAL.My_Path);
END IF;
END;