author | Subhashini Sooriarachchi <subslk@netbeans.org> |
Mon, 12 Aug 2013 11:26:54 +0530 | |
changeset 464 | e10b2e8563fc |
permissions | -rw-r--r-- |
subslk@464 | 1 |
----------------------------------------------------------------------------- |
subslk@464 | 2 |
-- |
subslk@464 | 3 |
-- Logical unit: <<<LU: Put your LU name here>>> |
subslk@464 | 4 |
-- |
subslk@464 | 5 |
-- IFS Developer Studio Template Version 2.5 |
subslk@464 | 6 |
-- |
subslk@464 | 7 |
-- Date Sign History |
subslk@464 | 8 |
-- ------ ------ --------------------------------------------------------- |
subslk@464 | 9 |
----------------------------------------------------------------------------- |
subslk@464 | 10 |
|
subslk@464 | 11 |
DEFINE MODULE = <<<MODULE: Put your module name here>>> |
subslk@464 | 12 |
DEFINE LU = <<<LU: Put your lu name here>>> |
subslk@464 | 13 |
DEFINE PKG = <<<PKG: Put your PACKAGE name here>>> |
subslk@464 | 14 |
|
subslk@464 | 15 |
PROMPT Creating &PKG SPECIFICATION |
subslk@464 | 16 |
|
subslk@464 | 17 |
CREATE OR REPLACE PACKAGE BODY &PKG IS |
subslk@464 | 18 |
|
subslk@464 | 19 |
----------------------------------------------------------------------------- |
subslk@464 | 20 |
-------------------- LU SPECIFIC IMPLEMENTATION METHODS --------------------- |
subslk@464 | 21 |
----------------------------------------------------------------------------- |
subslk@464 | 22 |
|
subslk@464 | 23 |
|
subslk@464 | 24 |
----------------------------------------------------------------------------- |
subslk@464 | 25 |
-------------------- LU SPECIFIC PRIVATE METHODS ---------------------------- |
subslk@464 | 26 |
----------------------------------------------------------------------------- |
subslk@464 | 27 |
|
subslk@464 | 28 |
|
subslk@464 | 29 |
----------------------------------------------------------------------------- |
subslk@464 | 30 |
-------------------- LU SPECIFIC PROTECTED METHODS -------------------------- |
subslk@464 | 31 |
----------------------------------------------------------------------------- |
subslk@464 | 32 |
|
subslk@464 | 33 |
|
subslk@464 | 34 |
----------------------------------------------------------------------------- |
subslk@464 | 35 |
-------------------- LU SPECIFIC PUBLIC METHODS ----------------------------- |
subslk@464 | 36 |
----------------------------------------------------------------------------- |
subslk@464 | 37 |
|
subslk@464 | 38 |
PROCEDURE Delete___ ( |
subslk@464 | 39 |
objid_ IN VARCHAR2, |
subslk@464 | 40 |
remrec_ IN &VIEW%ROWTYPE ) |
subslk@464 | 41 |
|
subslk@464 | 42 |
IS |
subslk@464 | 43 |
key_ VARCHAR2(2000); |
subslk@464 | 44 |
key_ VARCHAR2(2000); |
subslk@464 | 45 |
type_ intface_header_tab.procedure_name%TYPE; |
subslk@464 | 46 |
BEGIN |
subslk@464 | 47 |
temp =: NULL; |
subslk@464 | 48 |
-- |
subslk@464 | 49 |
-- Call to Intface_Util_API.Register_Delete_ removed. |
subslk@464 | 50 |
-- Logic is now handled in Intface_Util_API.Drop_IC_Table_ |
subslk@464 | 51 |
-- |
subslk@464 | 52 |
|
subslk@464 | 53 |
key_ := remrec_.intface_name || '^' || remrec_.column_name || '^'; |
subslk@464 | 54 |
Reference_SYS.Do_Cascade_Delete(lu_name_, key_); |
subslk@464 | 55 |
DELETE |
subslk@464 | 56 |
FROM intface_detail_tab |
subslk@464 | 57 |
WHERE &OBJID = objid_; |
subslk@464 | 58 |
END Delete___; |