Address #483 with changes to DATAITEM_ROLES.csv, DATAITEM_ROLES.xls.
Add conditional compilation for debugging. Use correct NLS language in dads.conf git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@4793 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
@@ -26,8 +26,6 @@ CREATE OR REPLACE PACKAGE mip_virus_check IS
|
||||
%return VARCHAR2 - the actual name of the file
|
||||
*/
|
||||
FUNCTION get_fs_name(p_name IN documents.uri%TYPE) RETURN VARCHAR2;
|
||||
--
|
||||
PROCEDURE pl(p_in VARCHAR2);
|
||||
END mip_virus_check;
|
||||
/
|
||||
CREATE OR REPLACE PACKAGE BODY mip_virus_check IS
|
||||
@@ -35,17 +33,17 @@ CREATE OR REPLACE PACKAGE BODY mip_virus_check IS
|
||||
Updates:
|
||||
MM 25-Feb-2008 added the load file
|
||||
*/
|
||||
PROCEDURE pl(p_in VARCHAR2) IS
|
||||
l_fh utl_file.file_type;
|
||||
PROCEDURE pl(p_in VARCHAR2
|
||||
,p_line IN NUMBER DEFAULT NULL) IS
|
||||
BEGIN
|
||||
dbms_application_info.set_module('mip_virus_check', p_in);
|
||||
l_fh := utl_file.fopen(location => 'WEBMIP_VIRUS',
|
||||
filename => 'WEBMIP_VIRUS.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);
|
||||
END pl;
|
||||
$IF mip_debug_constants.debugging OR mip_debug_constants.friendly_messages
|
||||
$THEN
|
||||
mip_debug.pl(p_unit => $$PLSQL_UNIT
|
||||
,p_line => p_line
|
||||
,p_in => p_in);
|
||||
$END
|
||||
NULL;
|
||||
END pl;
|
||||
|
||||
PROCEDURE write_file(p_name IN wwv_flow_files.NAME%TYPE,
|
||||
p_location IN VARCHAR2 DEFAULT 'WEBMIP_VIRUS',
|
||||
|
||||
Reference in New Issue
Block a user