eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.CLN_UTILS dependencies on CLN_DEBUG_PUB

Line 35: --l_debug_mode :=cln_debug_pub.Set_Debug_Mode('FILE');

31: l_msg_data VARCHAR2(255);
32: l_debug_mode VARCHAR2(255);
33: BEGIN
34: -- Sets the debug mode to be FILE
35: --l_debug_mode :=cln_debug_pub.Set_Debug_Mode('FILE');
36: IF (l_Debug_Level <= 2) THEN
37: cln_debug_pub.Add('----- Entering CLN_GET_TRADING_PARTNER API -------- ',2);
38: END IF;
39: x_return_id := -1;

Line 37: cln_debug_pub.Add('----- Entering CLN_GET_TRADING_PARTNER API -------- ',2);

33: BEGIN
34: -- Sets the debug mode to be FILE
35: --l_debug_mode :=cln_debug_pub.Set_Debug_Mode('FILE');
36: IF (l_Debug_Level <= 2) THEN
37: cln_debug_pub.Add('----- Entering CLN_GET_TRADING_PARTNER API -------- ',2);
38: END IF;
39: x_return_id := -1;
40: -- getting the Trading Partner ID
41: IF (l_Debug_Level <= 1) THEN

Line 42: cln_debug_pub.Add('Before SQL Query : Getting Party ID',1);

38: END IF;
39: x_return_id := -1;
40: -- getting the Trading Partner ID
41: IF (l_Debug_Level <= 1) THEN
42: cln_debug_pub.Add('Before SQL Query : Getting Party ID',1);
43: END IF;
44: SELECT party_id INTO x_return_id
45: FROM ECX_TP_HEADERS
46: WHERE tp_header_id = p_ecx_tp_id;

Line 48: cln_debug_pub.Add('After SQL Query : Getting Party ID',1);

44: SELECT party_id INTO x_return_id
45: FROM ECX_TP_HEADERS
46: WHERE tp_header_id = p_ecx_tp_id;
47: IF (l_Debug_Level <= 1) THEN
48: cln_debug_pub.Add('After SQL Query : Getting Party ID',1);
49: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
50: END IF;
51: -- Exception Handling
52: EXCEPTION

Line 49: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);

45: FROM ECX_TP_HEADERS
46: WHERE tp_header_id = p_ecx_tp_id;
47: IF (l_Debug_Level <= 1) THEN
48: cln_debug_pub.Add('After SQL Query : Getting Party ID',1);
49: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
50: END IF;
51: -- Exception Handling
52: EXCEPTION
53: WHEN FND_API.G_EXC_ERROR THEN

Line 58: cln_debug_pub.Add(l_msg_data,4);

54: l_error_code :=SQLCODE;
55: l_error_msg :=SQLERRM;
56: l_msg_data :=l_error_code||' : '||l_error_msg;
57: IF (l_Debug_Level <= 1) THEN
58: cln_debug_pub.Add(l_msg_data,4);
59: END IF;
60: IF (l_Debug_Level <= 2) THEN
61: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
62: END IF;

Line 61: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);

57: IF (l_Debug_Level <= 1) THEN
58: cln_debug_pub.Add(l_msg_data,4);
59: END IF;
60: IF (l_Debug_Level <= 2) THEN
61: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
62: END IF;
63: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
64: l_error_code :=SQLCODE;
65: l_error_msg :=SQLERRM;

Line 68: cln_debug_pub.Add(l_msg_data,6);

64: l_error_code :=SQLCODE;
65: l_error_msg :=SQLERRM;
66: l_msg_data :=l_error_code||' : '||l_error_msg;
67: IF (l_Debug_Level <= 5) THEN
68: cln_debug_pub.Add(l_msg_data,6);
69: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
70: END IF;
71: WHEN NO_DATA_FOUND THEN
72: l_msg_data :='Invalid Party Id in GET_TRADING_PARTNER';

Line 69: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);

65: l_error_msg :=SQLERRM;
66: l_msg_data :=l_error_code||' : '||l_error_msg;
67: IF (l_Debug_Level <= 5) THEN
68: cln_debug_pub.Add(l_msg_data,6);
69: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
70: END IF;
71: WHEN NO_DATA_FOUND THEN
72: l_msg_data :='Invalid Party Id in GET_TRADING_PARTNER';
73: IF (l_Debug_Level <= 5) THEN

Line 74: cln_debug_pub.Add(l_msg_data,6);

70: END IF;
71: WHEN NO_DATA_FOUND THEN
72: l_msg_data :='Invalid Party Id in GET_TRADING_PARTNER';
73: IF (l_Debug_Level <= 5) THEN
74: cln_debug_pub.Add(l_msg_data,6);
75: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
76: END IF;
77: WHEN OTHERS THEN
78: l_error_code :=SQLCODE;

Line 75: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);

71: WHEN NO_DATA_FOUND THEN
72: l_msg_data :='Invalid Party Id in GET_TRADING_PARTNER';
73: IF (l_Debug_Level <= 5) THEN
74: cln_debug_pub.Add(l_msg_data,6);
75: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
76: END IF;
77: WHEN OTHERS THEN
78: l_error_code :=SQLCODE;
79: l_error_msg :=SQLERRM;

Line 82: cln_debug_pub.Add(l_msg_data,6);

78: l_error_code :=SQLCODE;
79: l_error_msg :=SQLERRM;
80: l_msg_data :=l_error_code||' : '||l_error_msg;
81: IF (l_Debug_Level <= 5) THEN
82: cln_debug_pub.Add(l_msg_data,6);
83: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
84: END IF;
85: END GET_TRADING_PARTNER;
86:

Line 83: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);

79: l_error_msg :=SQLERRM;
80: l_msg_data :=l_error_code||' : '||l_error_msg;
81: IF (l_Debug_Level <= 5) THEN
82: cln_debug_pub.Add(l_msg_data,6);
83: cln_debug_pub.Add('------- Exiting CLN_GET_TRADING_PARTNER API ------ ',2);
84: END IF;
85: END GET_TRADING_PARTNER;
86:
87: PROCEDURE IsDeliveryRequired (p_itemtype IN VARCHAR2,

Line 113: cln_debug_pub.Add('Entering the procedure CLNUTILS.IsDeliveryRequired', 2);

109:
110: BEGIN
111:
112: IF (l_Debug_Level <= 2) THEN
113: cln_debug_pub.Add('Entering the procedure CLNUTILS.IsDeliveryRequired', 2);
114: END IF;
115:
116: -- get the workflow activity attributes.
117:

Line 120: cln_debug_pub.Add('Transaction type:'|| l_transaction_type , 1);

116: -- get the workflow activity attributes.
117:
118: l_transaction_type:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_TRANSACTION_TYPE');
119: IF (l_Debug_Level <= 1) THEN
120: cln_debug_pub.Add('Transaction type:'|| l_transaction_type , 1);
121: END IF;
122:
123: l_transaction_subtype:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_TRANSACTION_SUBTYPE');
124: IF (l_Debug_Level <= 1) THEN

Line 125: cln_debug_pub.Add('Transaction Subtype:'|| l_transaction_subtype , 1);

121: END IF;
122:
123: l_transaction_subtype:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_TRANSACTION_SUBTYPE');
124: IF (l_Debug_Level <= 1) THEN
125: cln_debug_pub.Add('Transaction Subtype:'|| l_transaction_subtype , 1);
126: END IF;
127:
128: l_party_id:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_PARTY_ID');
129: IF (l_Debug_Level <= 1) THEN

Line 130: cln_debug_pub.Add('Party ID:'|| l_party_id , 1);

126: END IF;
127:
128: l_party_id:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_PARTY_ID');
129: IF (l_Debug_Level <= 1) THEN
130: cln_debug_pub.Add('Party ID:'|| l_party_id , 1);
131: END IF;
132:
133: l_party_site_id:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_PARTY_SITE_ID');
134: IF (l_Debug_Level <= 1) THEN

Line 135: cln_debug_pub.Add('Party Site ID:'|| l_party_site_id , 1);

131: END IF;
132:
133: l_party_site_id:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_PARTY_SITE_ID');
134: IF (l_Debug_Level <= 1) THEN
135: cln_debug_pub.Add('Party Site ID:'|| l_party_site_id , 1);
136: END IF;
137:
138: l_party_type:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_PARTY_TYPE');
139: IF (l_Debug_Level <= 1) THEN

Line 140: cln_debug_pub.Add('Party Type:'|| l_party_type , 1);

136: END IF;
137:
138: l_party_type:=wf_engine.GetActivityAttrText(p_itemtype,p_itemkey,p_actid,'ECX_PARTY_TYPE');
139: IF (l_Debug_Level <= 1) THEN
140: cln_debug_pub.Add('Party Type:'|| l_party_type , 1);
141: END IF;
142:
143: -- call the 'ecx_document.isDeliveryRequired' API which validates the Trading Partner setup.
144:

Line 160: cln_debug_pub.Add('Exception in CLNUTILS.IsDeliveryRequired' || ':' || l_error_code || ':' || l_errmsg,5);

156: l_error_code := SQLCODE;
157: l_errmsg := SQLERRM;
158:
159: IF (l_Debug_Level <= 5) THEN
160: cln_debug_pub.Add('Exception in CLNUTILS.IsDeliveryRequired' || ':' || l_error_code || ':' || l_errmsg,5);
161: END IF;
162: END;
163:
164: -- If the variable 'l_result' is 'TRUE' then , there exists a setup for this transaction's Trading

Line 168: cln_debug_pub.Add('Result out:'|| l_errmsg , 1);

164: -- If the variable 'l_result' is 'TRUE' then , there exists a setup for this transaction's Trading
165: -- Partner. Else there is no valid Trading Partner setup exists for this Transaction.
166:
167: IF (l_Debug_Level <= 1) THEN
168: cln_debug_pub.Add('Result out:'|| l_errmsg , 1);
169: END IF;
170:
171: IF (l_result = TRUE) THEN
172: x_resultout:='Y';

Line 174: cln_debug_pub.Add('Trading Partner Setup found' , 1);

170:
171: IF (l_result = TRUE) THEN
172: x_resultout:='Y';
173: IF (l_Debug_Level <= 1) THEN
174: cln_debug_pub.Add('Trading Partner Setup found' , 1);
175: END IF;
176: ELSE
177: x_resultout:='N';
178: IF (l_Debug_Level <= 1) THEN

Line 179: cln_debug_pub.Add('Trading Partner Setup NOT found' , 1);

175: END IF;
176: ELSE
177: x_resultout:='N';
178: IF (l_Debug_Level <= 1) THEN
179: cln_debug_pub.Add('Trading Partner Setup NOT found' , 1);
180: END IF;
181: END IF;
182:
183: IF (l_Debug_Level <= 2) THEN

Line 184: cln_debug_pub.Add('Exititng the procedure CLN_UTILS.IsDeliveryRequired', 2);

180: END IF;
181: END IF;
182:
183: IF (l_Debug_Level <= 2) THEN
184: cln_debug_pub.Add('Exititng the procedure CLN_UTILS.IsDeliveryRequired', 2);
185: END IF;
186:
187: END IsDeliveryRequired;
188: