1 PACKAGE WIP_UNRELEASE AUTHID CURRENT_USER AS
2 /* $Header: wippunrs.pls 120.2.12020000.1 2012/06/27 21:08:07 appldev ship $ */
3
4 /* UNRELEASE
5 DESCRIPTION:
6 This procedure checks to make sure no charges have been made against the
7 job or schedule, and then updates all operation quantities to 0. Note that
8 the form that calls this procedure should null out the date_released
9 field, as this procedure does not do that.
10 PARAMETERS:
11 No validation is performed on the input parameters.
12 */
13
14 PROCEDURE UNRELEASE
15 (x_org_id IN NUMBER,
16 x_wip_id IN NUMBER,
17 x_rep_id IN NUMBER DEFAULT -1,
18 x_line_id IN NUMBER DEFAULT -1,
19 x_ent_type IN NUMBER);
20
21
22 /* wrapper over procedure UNRelease()
23 This also updates the status of job to UNRelease in the databse at the end
24 */
25 PROCEDURE UNRELEASE_MES_WRAPPER
26 (P_wip_entity_id NUMBER,
27 P_organization_id NUMBER
28 );
29
30 FUNCTION VERIFY_WPB /*Added function for bug 7325661 (FP 6721407)*/
31 ( x_org_id IN NUMBER,
32 x_wip_id IN NUMBER,
33 x_rep_id IN NUMBER DEFAULT NULL
34 ) RETURN NUMBER;
35
36 END WIP_UNRELEASE;