andy/mip
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Some new document procedures for setting the status of docs in MIP.

Browse Source 
git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3679 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
mullenm
2008-02-22 14:48:58 +00:00
parent 9739b6ad3a
commit e21a767030
1 changed files with 90 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

90
Modules/mip_documents.pck Normal file
View File

@@ -0,0 +1,90 @@
CREATE OR REPLACE PACKAGE mip_documents IS
-- Author : MULLENMD
-- Created : 14/02/2008 13:36:30
-- Purpose : Operations for managing docs in the MIP system
PROCEDURE set_doc_scanning(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL);
PROCEDURE set_doc_available(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL);
PROCEDURE set_doc_remove_av(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL);
PROCEDURE set_doc_remove_user(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL);
PROCEDURE set_doc_remove_size(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL);
END mip_documents;
/
CREATE OR REPLACE PACKAGE BODY mip_documents IS
--
PROCEDURE add_document_event(p_docu_id IN documents.id%TYPE,
p_event_date DATE DEFAULT SYSDATE,
p_description document_events.description%TYPE DEFAULT NULL,
p_dost_code document_status_types.code%TYPE) IS
BEGIN
INSERT INTO document_events
(docu_id, dost_code, event_date, description, id)
VALUES
(p_docu_id,
p_dost_code,
p_event_date,
p_description,
docu_seq.NEXTVAL);
COMMIT;
END add_document_event;
--
--
PROCEDURE set_doc_scanning(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL) IS
BEGIN
add_document_event(p_docu_id => p_docu_id,
p_dost_code => 'SCANNING',
p_description => p_description);
END set_doc_scanning;
--
--
PROCEDURE set_doc_available(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL) IS
BEGIN
add_document_event(p_docu_id => p_docu_id,
p_dost_code => 'AVAILABLE',
p_description => p_description);
END set_doc_available;
--
--
PROCEDURE set_doc_remove_av(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL) IS
BEGIN
add_document_event(p_docu_id => p_docu_id,
p_dost_code => 'REMOVED MALICIOUS',
p_description => p_description);
END set_doc_remove_av;
--
--
PROCEDURE set_doc_remove_user(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL) IS
BEGIN
add_document_event(p_docu_id => p_docu_id,
p_dost_code => 'REMOVED USER',
p_description => p_description);
END set_doc_remove_user;
--
--
PROCEDURE set_doc_remove_size(p_docu_id IN documents.id%TYPE,
p_description document_events.description%TYPE DEFAULT NULL) IS
BEGIN
add_document_event(p_docu_id => p_docu_id,
p_dost_code => 'REMOVED SIZE',
p_description => p_description);
END set_doc_remove_size;
--
END mip_documents;
/