25:
26: if P_FILE is null then
27: -- select substr('l'|| substr(to_char(sysdate,'MI'),1,1)
28: -- || lpad(OKL_DEBUG_file_s.nextval,6,'0'),1,8) || '.IEX'
29: --into G_FILE from dual;
30:
31: SELECT DB_NAME || USERENV('SESSIONID') || '.OKL' into G_FILE
32: FROM DUAL;
33:
28: -- || lpad(OKL_DEBUG_file_s.nextval,6,'0'),1,8) || '.IEX'
29: --into G_FILE from dual;
30:
31: SELECT DB_NAME || USERENV('SESSIONID') || '.OKL' into G_FILE
32: FROM DUAL;
33:
34: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'w');
35: else
36: G_FILE :=P_File;