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:
hardya
2008-04-14 17:04:06 +00:00
parent da43803539
commit cae05e68a9
14 changed files with 59 additions and 58 deletions

View File

@@ -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',