[Home] [Help]
PACKAGE: APPS.XDP_MACROS
Source
1 PACKAGE XDP_MACROS AUTHID CURRENT_USER AS
2 /* $Header: XDPMACRS.pls 120.1 2005/06/16 01:41:52 appldev $ */
3
4
5 e_AdapterNotUpException exception;
6 e_CommandTimedoutException exception;
7 e_SessionLostException exception;
8 e_FEFailureException exception;
9 e_NotifyError exception;
10
11 g_NotifyError number := -666;
12 g_CommandTimeout number := -20620;
13 g_SessionLost number := -20610;
14 g_FeFailure number := -20300;
15
16
17 -- New for 11.5.6+
18 pv_OrderID number;
19 pv_LineItemID number;
20 pv_WorkItemInstanceID number;
21 pv_FAInstanceID number;
22 pv_ChannelName varchar2(40);
23 pv_ApplChannelName varchar2(40);
24 pv_ReturnChannelName varchar2(40);
25 pv_ProcName varchar2(80);
26 SFM_SQLCODE number;
27 SFM_SQLERRM varchar2(4000);
28 SFM_int_response_buffer varchar2(32767);
29 pv_ResponseLob CLOB;
30 pv_ResponseLongLob CLOB;
31 pv_AutoRetry number := 0;
32
33 pv_ParamCacheReqd varchar2(1) := 'N';
34
35 pv_WIParamUsed boolean := false;
36 pv_OrderParamUsed boolean := false;
37 pv_LineParamUsed boolean := false;
38 pv_FAParamUsed boolean := false;
39
40 pv_FeName varchar2(80);
41 pv_FeID number;
42 pv_FeType varchar2(80);
43 pv_FeTypeID number;
44 pv_SWGeneric varchar2(80);
45 pv_AdapterType varchar2(80);
46 pv_AdapterImplemented boolean := false;
47
48 pv_AckTimeout number;
49 pv_MesgTimeout number;
50 pv_defMesgTimeout number := 120;
51
52 -- Connect Command/Response
53 TYPE G_CONNECT_CMD IS RECORD
54 (
55 COMMAND VARCHAR2(32767),
56 RESPONSE VARCHAR2(32767));
57
58 -- list of the order parameter
59 TYPE G_CONNECT_CMD_LIST IS TABLE OF G_CONNECT_CMD
60 INDEX BY BINARY_INTEGER;
61
62 g_ConnectCommands G_CONNECT_CMD_LIST;
63
64
65 pv_attrFeCmdTimeout varchar2(80) := 'NE_CMD_TIMEOUT';
66 pv_attrFeRetryCount varchar2(80) := 'NE_CMD_RETRY_COUNT';
67 pv_attrFeCmdRetryWait varchar2(80) := 'NE_CMD_WAIT';
68 pv_attrFeNoActTimeout varchar2(80) := 'NE_NO_ACTIVITY_TIMEOUT';
69 pv_attrFeCmdKeepAlive varchar2(80) := 'NE_DUMMY_CMD';
70
71 pv_attrFeConnRetryCount varchar2(80) := 'NE_CONNECT_RETRY_COUNT';
72 pv_attrFeConnRetryWait varchar2(80) := 'NE_CONNECT_WAIT';
73
74 pv_defFeCmdTimeout number := 120;
75 pv_defFeRetryCount number := 0;
76 pv_defFeCmdRetryWait number := 0;
77 pv_defFeNoActTimeout number := 120;
78 pv_defFeCmdKeepAlive varchar2(80) := ' ';
79
80 pv_defFeConnRetryCount number := 0;
81 pv_defFeConnRetryWait number := 0;
82
83 Procedure SEND_SYNC;
84
85 Procedure SEND(p_Command in varchar2,
86 p_EncryptFlag in varchar2 default 'N',
87 p_Prompt in varchar2 default 'IGNORE');
88
89 --
90 -- For Backward Compatibility...
91
92 Procedure SEND(p_Command in varchar2,
93 p_EncryptFlag in varchar2 default 'N',
94 p_Prompt in varchar2 default 'IGNORE',
95 x_ErrorCode OUT NOCOPY number,
96 x_ErrorString OUT NOCOPY varchar2);
97
98 Procedure SEND(p_Command in varchar2,
99 p_EncryptFlag in varchar2 default 'N',
100 x_ErrorCode OUT NOCOPY number,
101 x_ErrorString OUT NOCOPY varchar2);
102
103 Procedure SEND_HTTP(p_URL in varchar2,
104 p_EncryptFlag in varchar2 default 'N',
105 p_Proxy in varchar2 default null);
106
107 Procedure SEND_HTTP(p_URL in varchar2,
108 p_EncryptFlag in varchar2 default 'N',
109 x_ErrorCode OUT NOCOPY number,
110 x_ErrorString OUT NOCOPY varchar2);
111
112 Function GET_RESPONSE return varchar2;
113
114 Function GET_PARAM_VALUE(p_ParamName in varchar2) return varchar2;
115
116 Function GET_ATTR_VALUE(p_AttrName in varchar2) return varchar2;
117
118 Procedure NOTIFY_ERROR(p_UserMessage in varchar2,
119 p_Overwrite in varchar2);
120
121 Procedure NOTIFY_ERROR(p_UserMessage in varchar2,
122 p_AutomaticRetry in number default 0);
123
124 Function RESPONSE_CONTAINS(p_UserString in varchar2) return boolean;
125
126 -- New for 11.5.6+
127 Function GET_LONG_RESPONSE return CLOB;
128
129 Procedure AUDIT(p_AuditString in varchar2);
130
131 Function AUTO_RETRY_ENABLED return varchar2;
132
133 Procedure SEND_CONNECT( p_Command in varchar2,
134 p_Prompt in varchar2 default 'IGNORE');
135
136 -- For backward compatibility
137 Procedure SEND_CONNECT( p_Command in varchar2,
138 p_Prompt in varchar2 default 'IGNORE',
139 x_ErrorCode OUT NOCOPY number,
140 x_ErrorString OUT NOCOPY varchar2);
141
142 Procedure AppendConnectCommands(p_Command in varchar2,
143 p_Response in varchar2);
144
145 PROCEDURE FETCH_CONNECT_COMMANDS(p_CurrIndex in number,
146 x_TotalCount OUT NOCOPY number,
147 x_Command OUT NOCOPY varchar2,
148 x_Response OUT NOCOPY varchar2);
149
150 Procedure ResetCommandBuffer;
151
152
153 -- Routines for Initialization etc..
154
155 Procedure Initdefault( OrderID in number,
156 LineItemID in number,
157 WIInstanceID in number,
158 FAInstanceID in number);
159
160 Procedure InitFP(OrderID in number,
161 LineItemID in number,
162 WIInstanceID in number,
163 FAInstanceID in number,
164 ChannelName in varchar2,
165 FEName in varchar2,
166 ProcName in varchar2);
167
168 Procedure InitConnection(ChannelName in varchar2,
169 FEName in varchar2);
170
171 Procedure InitDisconnection(ChannelName in varchar2,
172 FEName in varchar2);
173
174 Procedure EndProc(p_return_code in OUT NOCOPY number,
175 p_error_description in OUT NOCOPY varchar2);
176
177 Procedure HandleProcErrors(p_return_code OUT NOCOPY number,
178 p_error_description OUT NOCOPY varchar2);
179
180 end XDP_MACROS;