Changes made for BulkLoad information provided by Gareth on 5th March (new bas_dwg/102M.jpg, csv exports)
New package mip_debug_constants.pks to be used to store compilation constants for debugging purposes (packages to use pl from mip_debug). mip_quotation.pck modified to support exchanges based on being provided with an existing model rather than meter size. Changes to the DATAITEM_ROLES.csv to support this new field, impact on mandatory rules captured by mip_helper_special_cases.pck git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3900 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
@@ -33,18 +33,13 @@ END mip_files;
|
||||
/
|
||||
CREATE OR REPLACE PACKAGE BODY mip_files AS
|
||||
|
||||
PROCEDURE pl(p_in VARCHAR2) IS
|
||||
l_fh utl_file.file_type;
|
||||
PROCEDURE pl(p_in VARCHAR2, p_line NUMBER DEFAULT NULL) IS
|
||||
BEGIN
|
||||
dbms_application_info.set_module('MIP_FILES'
|
||||
,p_in);
|
||||
l_fh := utl_file.fopen(location => 'WEBMIP_BULK_LOAD'
|
||||
,filename => 'MIP_FILES.txt'
|
||||
,open_mode => 'A');
|
||||
utl_file.put_line(l_fh
|
||||
,to_char(SYSDATE
|
||||
,'DD/MM/YYYY HH24:MI:SS') || ',' || p_in);
|
||||
utl_file.fclose(l_fh);
|
||||
NULL;
|
||||
-- $IF $$DEBUGGING OR mip_debug_constants.debugging OR mip_debug_constants.files
|
||||
-- $THEN
|
||||
mip_debug.pl(p_unit => $$PLSQL_UNIT,p_in => p_in, p_line => p_line);
|
||||
-- $END
|
||||
END pl;
|
||||
|
||||
/*
|
||||
|
||||
Reference in New Issue
Block a user