PACKAGE BODY: APPS.WIP_SF_CUSTOM_API

Source

1 PACKAGE BODY wip_sf_custom_api AS
2 /* $Header: wipsfcab.pls 115.10 2002/12/12 15:59:21 rmahidha ship $ */
3 
4 /* If the event and schedule nodes will be showing the same information
5    (which means that the event nodes will only be showing attributes
6    concerning the schedule), then retrieve the attributes in
7    schedule_custom_api and call this procedure from event_custom_api. */
8 
9 PROCEDURE schedule_custom_api (
10 	scheduleNumber IN VARCHAR2,
11 	orgCode IN VARCHAR2,
12 	lineCode IN VARCHAR2,
13 	opSeqID IN NUMBER,
14 	salesOrderNumber IN VARCHAR2,
15 	assemblyName IN VARCHAR2,
16 	scheduleGroup IN VARCHAR2,
17 	buildSequence IN NUMBER,
18 	completionDate IN DATE,
19 	projectName IN VARCHAR2,
20 	taskName IN VARCHAR2,
21 	x_num_attr OUT NOCOPY NUMBER,
22 	x_labels OUT NOCOPY system.wip_attr_labels,
23 	x_values OUT NOCOPY system.wip_attr_values,
24 	x_colors OUT NOCOPY system.wip_attr_colors) IS
25 BEGIN
26 
27 x_num_attr := 0;
28 x_labels := system.wip_attr_labels();
29 x_values := system.wip_attr_values();
30 x_colors := system.wip_attr_colors();
31 END schedule_custom_api;
32 
33 PROCEDURE event_custom_api (
34 	scheduleNumber IN VARCHAR2,
35 	orgCode IN VARCHAR2,
36 	lineCode IN VARCHAR2,
37 	lineopSeqID IN NUMBER,
38 	opSeqNum IN NUMBER,
39 	opCode IN VARCHAR2,
40 	deptCode IN VARCHAR2,
41 	x_num_attr OUT NOCOPY NUMBER,
42 	x_labels OUT NOCOPY system.wip_attr_labels,
43 	x_values OUT NOCOPY system.wip_attr_values,
44 	x_colors OUT NOCOPY system.wip_attr_colors) IS
45 
46 BEGIN
47 
48 x_num_attr := 0;
49 x_labels := system.wip_attr_labels();
50 x_values := system.wip_attr_values();
51 x_colors := system.wip_attr_colors();
52 END event_custom_api;
53 
54 END wip_sf_custom_api;