1 PACKAGE PJM_PROJTASK_DELETION AUTHID CURRENT_USER AS
2 /* $Header: PJMPTDLS.pls 115.2 99/07/29 16:11:10 porting s $ */
3
4 -- Function name : Checkuse_ProjTask
5 -- Pre-reqs : None.
6 -- Function : Checks if project/task references are currently used
7 -- in manufacturing applications.
8 -- This function should be performed prior to project/task
9 -- deletion from Oracle Projects
10 -- Parameters :
11 -- IN : p_project_id IN NUMBER Optional
12 -- : p_task_id IN NUMBER Optional
13 -- RETURNS :
14 -- Returns -1 if both input Project/Task arguments are null.
15 -- Returns 1 if input Project/Task argument is still referred
16 -- in MFG applications.
17 --
18 -- This function does not check detailed status
19 -- such as closed sales order line, or canceled PO
20 -- line/shipments, etc. Therefore those project/
21 -- task references will prevent deletion in Oracle
22 -- projects, so users should manually
23 -- purge those references in mfg apps in order to
24 -- delete it successfully in Oracle Projects.
25 --
26 -- Returns 0 if input Project/Task argument is not referred.
27 --
28 FUNCTION CheckUse_ProjectTask (p_project_id IN NUMBER,
29 p_task_id IN NUMBER)
30 RETURN NUMBER;
31
32 -- PRAGMA RESTRICT_REFERENCES (CheckUse_ProjectTask, WNDS);
33
34 -- Function name : Checkuse_ProjOrg
35 -- Pre-reqs : None.
36 -- Function : Checks if project references are currently present
37 -- in the given organization
38 -- Parameters :
39 -- IN : p_project_id IN NUMBER Required
40 -- : p_org_id IN NUMBER Required
41 -- RETURNS :
42 -- Returns -1 if either argument is null.
43 -- Returns 1 if input Project argument is still referred
44 -- in input Org
45 --
46 -- This function does not check detailed status
47 -- such as closed sales order line, or canceled PO
48 -- line/shipments, etc.
49 --
50 -- Returns 0 if input Project argument is not referred in
51 -- the given org.
52 --
53 FUNCTION CheckUse_ProjOrg (p_project_id IN NUMBER,
54 p_org_id IN NUMBER)
55 RETURN NUMBER;
56
57 -- PRAGMA RESTRICT_REFERENCES (CheckUse_ProjOrg, WNDS);
58
59 END PJM_PROJTASK_DELETION;