1 PACKAGE IEX_WRITEOFFOBJ_PUB AUTHID CURRENT_USER as
2 /* $Header: iexpwros.pls 120.4 2007/10/31 14:55:04 ehuh ship $ */
3 -- Start of Comments
4 -- Package name :IEX_WRITEOFFOBJ_PUB
5 -- Purpose : 1) Procedure to populate OKL_TRX_ADJST_B and OKL_TXL_ADJSTS_LNS_B
6 -- : 2) Procedure to call OKL_WRAPPER OKL_CREATE_ADJ_PVT
7 -- : to create an adjustment
8 -- : 3) Procedure to check approval before creating a writeoff.
9 -- : 4) Procedure to update iex_writeoff_objects after creating
10 -- : the adjustment.
11 --
12 -- NOTE :
13 -- End of Comments
14
15 subtype writeoff_rec_type is IEX_writeoffs_PVT.writeoffs_Rec_Type;
16 subtype writeoff_obj_rec_type is iex_writeoff_objects_pub.writeoff_obj_rec_type;
17 g_miss_writeoff_obj_rec_type writeoff_obj_rec_type ;
18
19 subtype adjv_rec_type is OKL_TRX_AR_ADJSTS_PUB.adjv_rec_type;
20 subtype ajlv_rec_type is OKL_TXL_ADJSTS_LNS_PUB.ajlv_rec_type;
21
22 ------------------------------------------------------------------------------
23 -- Global Variables
24 G_PKG_NAME CONSTANT VARCHAR2(200) := 'IEX_WRITEOFFOBJ_PUB';
25 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
26 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
27 G_DEFAULT_NUM_REC_FETCH CONSTANT NUMBER := 30;
28 G_YES CONSTANT VARCHAR2(1) := 'Y';
29 G_NO CONSTANT VARCHAR2(1) := 'N';
30 ------------------------------------------------------------------------------
31
32 PROCEDURE create_writeoffs(
33 P_Api_Version_Number IN NUMBER
34 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
35 ,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
36 ,p_writeoff_object_rec IN writeoff_obj_rec_type
37 := g_miss_writeoff_obj_rec_type
38 ,p_writeoff_type IN VARCHAR2
39 ,p_object_id IN VARCHAR2
40 ,p_invoice_line_id in number
41 ,x_return_status OUT NOCOPY VARCHAR2
42 ,x_msg_count OUT NOCOPY NUMBER
43 ,x_msg_data OUT NOCOPY VARCHAR2
44 ,x_adjustment_id OUT NOCOPY NUMBER
45 );
46
47 /** this is called from the form to get messages from the stack
48 */
49 PROCEDURE Get_Messages (
50 p_message_count IN NUMBER,
51 x_message OUT NOCOPY VARCHAR2);
52
53 /** this is called from the form to get messages from the stack
54 */
55 PROCEDURE Get_Messages1 (
56 p_message_count IN NUMBER,
57 x_message OUT NOCOPY VARCHAR2);
58
59 /**
60 called from the workflow to approve writeoffs
61 the approval
62 **/
63
64 PROCEDURE approve_writeoffs (itemtype in varchar2,
65 itemkey in varchar2,
66 actid in number,
67 funcmode in varchar2,
68 result out nocopy varchar2);
69
70
71 PROCEDURE reject_writeoffs (itemtype in varchar2,
72 itemkey in varchar2,
73 actid in number,
74 funcmode in varchar2,
75 result out nocopy varchar2);
76
77 PROCEDURE invoke_writeoff_wf(
78 p_WRITEOFF_ID IN NUMBER
79 ,p_writeoff_type IN VARCHAR2
80 ,p_request_id IN NUMBER
81 ,p_object_id IN VARCHAR2
82 ,x_return_status OUT NOCOPY VARCHAR2
83 ,x_msg_count OUT NOCOPY NUMBER
84 ,x_msg_data OUT NOCOPY VARCHAR2 );
85
86 FUNCTION INIT_WRITEOFFOBJ_REC RETURN IEX_WRITEOFFOBJ_PUB.writeoff_obj_rec_type ;
87
88 END IEX_WRITEOFFOBJ_PUB;