CREATE OR REPLACE PACKAGE EFT_NOM.caco_file_io IS -- g_header CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/database/PLSQL/caco_file_io.pck 1 7/01/05 12:54 Gilberta $'; g_revision CONSTANT VARCHAR2(160) := '$Revision: 1 $'; /* * $Header: /Isle Of Grain/database/PLSQL/caco_file_io.pck 1 7/01/05 12:54 Gilberta $ * $Revision: 1 $ * * $History: caco_file_io.pck $ * * ***************** Version 1 ***************** * User: Gilberta Date: 7/01/05 Time: 12:54 * Created in $/Isle Of Grain/database/PLSQL * Initial Version * * ***************** Version 1 ***************** * User: Hardya Date: 26/11/01 Time: 16:41 * Created in $/Database/Common * Common routine for wrapper of utl_file. * */ -- g_file_handle utl_file.file_type; -- PROCEDURE put_line ( p_record IN VARCHAR2 ); PROCEDURE open_file ( p_file_dir IN VARCHAR2 , p_file_name IN VARCHAR2 , p_file_mode IN VARCHAR2 ); PROCEDURE close_file; PROCEDURE get_line (p_file_line OUT VARCHAR2, p_EOF OUT BOOLEAN); -- END caco_file_io; /