PACKAGE: APPS.PO_CHORD_WF1

Source

1 PACKAGE PO_CHORD_WF1 as
2 /* $Header: POXWCO1S.pls 120.1 2006/03/08 14:38:23 dreddy noship $ */
3 
4 /* These two record types define all data exchange
5  * between WF system and PL/SQL procedures
6  * t_header_control_type: determined by database values
7  * t_header_parameters_type  :values stored in WF system
8  */
9 
10 /* For controlled information tracking percentage change,
11  * <X>_change is defined
12  */
13  	TYPE t_header_control_type IS RECORD (
14 	/* change control data */
15 	/* TABLE: po_headers vs po_headers_archive */
16 	agent_id			VARCHAR2(1),
17 	vendor_site_id			VARCHAR2(1),
18 	vendor_contact_id		VARCHAR2(1),
19 	ship_to_location_id		VARCHAR2(1),
20 	bill_to_location_id 		VARCHAR2(1),
21 	terms_id			VARCHAR2(1),
22 	ship_via_lookup_code		VARCHAR2(1),
23 	fob_lookup_code			VARCHAR2(1),
24 	freight_terms_lookup_code	VARCHAR2(1),
25 	blanket_total_amount		VARCHAR2(1), --%chg, not set
26 	note_to_vendor			VARCHAR2(1),
27 	confirming_order_flag		VARCHAR2(1),
28 	acceptance_required_flag 	VARCHAR2(1),
29 	acceptance_due_date 		VARCHAR2(1),
30 	amount_limit			VARCHAR2(1), --%chg, not set
31 	start_date			VARCHAR2(1),
32 	end_date			VARCHAR2(1),
33 	cancel_flag			VARCHAR2(1),
34 	blanket_total_change		NUMBER,
35 	amount_limit_change		NUMBER,
36 	po_total_change			NUMBER,
37 	/* TABLE: po_acceptances */
38 	po_acknowledged			VARCHAR2(1),
39 	po_accepted			VARCHAR2(1)
40 	);
41 
42 	TYPE t_header_parameters_type IS RECORD (
43 	po_header_id			NUMBER,
44 	type_lookup_code		VARCHAR(25)
45 	);
46 
47 
48 	PROCEDURE chord_hd(itemtype IN VARCHAR2,
49 			   itemkey  IN VARCHAR2,
50 			   actid    IN NUMBER,
51 			   FUNCMODE IN VARCHAR2,
52 			   RESULT   OUT NOCOPY VARCHAR2);
53 
54         PROCEDURE check_header_change(
55 		   itemtype 		IN	VARCHAR2,
56 		   itemkey 		IN	VARCHAR2,
57 		   x_header_parameters 	IN 	t_header_parameters_type,
58 		   x_header_control 	IN OUT NOCOPY 	t_header_control_type);
59 
60 	FUNCTION  po_total_change(
61 		   x_po_header_id 	IN 	NUMBER)
62 		   RETURN NUMBER;
63 
64 	PROCEDURE set_wf_header_control(
65 		   itemtype		IN VARCHAR2,
66 		   itemkey		IN VARCHAR2,
67 		   x_header_control 	IN t_header_control_type);
68 
69 	PROCEDURE get_wf_header_control(
70 		   itemtype	 IN VARCHAR2,
71 		   itemkey 	 IN VARCHAR2,
72 		   x_header_control IN OUT NOCOPY t_header_control_type);
73 
74 	PROCEDURE get_wf_header_parameters(
75 		   itemtype	 IN VARCHAR2,
76 		   itemkey 	 IN VARCHAR2,
77 		   x_header_parameters IN OUT NOCOPY t_header_parameters_type);
78 
79 	PROCEDURE debug_header_control(
80 		   itemtype		IN VARCHAR2,
81 		   itemkey		IN VARCHAR2,
82 		   x_header_control IN t_header_control_type);
83 
84 END PO_CHORD_WF1;