DBA Data[Home] [Help]

APPS.ECX_TRADING_PARTNER_PVT dependencies on ECX_TRADING_PARTNER_PVT

Line 1: PACKAGE BODY ECX_Trading_Partner_PVT AS

1: PACKAGE BODY ECX_Trading_Partner_PVT AS
2: -- $Header: ECXTPXFB.pls 120.6.12010000.2 2008/08/22 19:21:32 cpeixoto ship $
3:
4: /** Returns the trading partners Details as defined in the partner Setup **/
5: procedure get_tp_info

Line 93: ecx_debug.setErrorInfo(2,30, SQLERRM || '- ECX_TRADING_PARTNER_PVT.GET_TP_INFO');

89: end if;
90:
91: exception
92: when others then
93: ecx_debug.setErrorInfo(2,30, SQLERRM || '- ECX_TRADING_PARTNER_PVT.GET_TP_INFO');
94: retcode := 2;
95: retmsg := SQLERRM;
96: end get_tp_info;
97:

Line 114: if ( p_info_type = ECX_Trading_Partner_PVT.G_CUSTOMER)

110: l_result NUMBER;
111: l_Select VARCHAR2(2000);
112: BEGIN
113:
114: if ( p_info_type = ECX_Trading_Partner_PVT.G_CUSTOMER)
115: then
116: l_Select := ' select haa.cust_acct_site_id,' ||
117: ' haa.org_id' ||
118: ' from hz_cust_acct_sites_all haa' ||

Line 121: elsif (p_info_type = ECX_Trading_Partner_PVT.G_SUPPLIER)

117: ' haa.org_id' ||
118: ' from hz_cust_acct_sites_all haa' ||
119: ' where haa.ece_tp_location_code = :location_code_ext ';
120:
121: elsif (p_info_type = ECX_Trading_Partner_PVT.G_SUPPLIER)
122: then
123: l_Select := ' select pvs.vendor_site_id,' ||
124: ' pvs.org_id' ||
125: ' from po_vendor_sites_all pvs' ||

Line 128: elsif (p_info_type = ECX_Trading_Partner_PVT.G_BANK)

124: ' pvs.org_id' ||
125: ' from po_vendor_sites_all pvs' ||
126: ' where pvs.ece_tp_location_code = :location_code_ext ';
127:
128: elsif (p_info_type = ECX_Trading_Partner_PVT.G_BANK)
129: then
130: l_Select := ' select cbb.branch_party_id, null' ||
131: ' from ce_bank_branches_v cbb, hz_contact_points hcp' ||
132: ' where cbb.branch_party_id=hcp.owner_table_id and

Line 137: elsif (p_info_type = ECX_Trading_Partner_PVT.G_LOCATION)

133: hcp.owner_table_name = ''HZ_PARTIES'' and
134: hcp.contact_point_type = ''EDI'' and
135: hcp.edi_ece_tp_location_code = :location_code_ext ';
136:
137: elsif (p_info_type = ECX_Trading_Partner_PVT.G_LOCATION)
138: then
139: l_Select := ' select location_id, null' ||
140: ' from hr_locations_all' ||
141: ' where ece_tp_location_code = :location_code_ext ';

Line 179: SQLERRM ||' - ECX_TRADING_PARTNER_PVT.Get_TP_Address');

175:
176: EXCEPTION
177: WHEN OTHERS THEN
178: ecx_debug.setErrorInfo(2,30,
179: SQLERRM ||' - ECX_TRADING_PARTNER_PVT.Get_TP_Address');
180: retcode := 2;
181: retmsg := SQLERRM;
182: end Get_Address_id;
183:

Line 216: SQLERRM ||' - ECX_TRADING_PARTNER_PVT. GET_RECEIVERS_TP_INFO');

212: end if;
213: EXCEPTION
214: WHEN OTHERS THEN
215: ecx_debug.setErrorInfo(2,30,
216: SQLERRM ||' - ECX_TRADING_PARTNER_PVT. GET_RECEIVERS_TP_INFO');
217: retcode := 2;
218: retmsg := SQLERRM ||' - ECX_TRADING_PARTNER_PVT. GET_RECEIVERS_TP_INFO';
219: end get_receivers_tp_info;
220:

Line 218: retmsg := SQLERRM ||' - ECX_TRADING_PARTNER_PVT. GET_RECEIVERS_TP_INFO';

214: WHEN OTHERS THEN
215: ecx_debug.setErrorInfo(2,30,
216: SQLERRM ||' - ECX_TRADING_PARTNER_PVT. GET_RECEIVERS_TP_INFO');
217: retcode := 2;
218: retmsg := SQLERRM ||' - ECX_TRADING_PARTNER_PVT. GET_RECEIVERS_TP_INFO';
219: end get_receivers_tp_info;
220:
221: /** Senders TP Info **/
222: procedure get_senders_tp_info

Line 254: SQLERRM ||' - ECX_TRADING_PARTNER_PVT.GET_SENDERS_TP_INFO');

250:
251: EXCEPTION
252: WHEN OTHERS THEN
253: ecx_debug.setErrorInfo(2,30,
254: SQLERRM ||' - ECX_TRADING_PARTNER_PVT.GET_SENDERS_TP_INFO');
255: retcode := 2;
256: retmsg := SQLERRM;
257: end get_senders_tp_info;
258:

Line 299: errmsg := SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_COMPANY_EMAIL';

295: /* End of bug #2183619 */
296:
297: When Others Then
298: retcode := 2;
299: errmsg := SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_COMPANY_EMAIL';
300: ecx_debug.setErrorInfo(2,30,SQLERRM);
301: End Get_TP_Company_Email;
302:
303: /** Get System Adminstrator Email ***/

Line 347: SQLERRM || ' - ECX_TRADING_PARTNER_PVT.get_sysadmin_email');

343: retcode := 0;
344: Exception
345: When Others Then
346: ecx_debug.setErrorInfo(2,30,
347: SQLERRM || ' - ECX_TRADING_PARTNER_PVT.get_sysadmin_email');
348: retcode := 2;
349: errmsg := SQLERRM;
350: End;
351:

Line 404: SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_DETAILS');

400: ecx_debug.setErrorInfo(1,30,
401: 'ECX_NO_UNIQUE_TP_SETUP');
402: When Others Then
403: ecx_debug.setErrorInfo(2,30,
404: SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_DETAILS');
405: p_retcode := 2;
406: p_errmsg := SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_DETAILS';
407: END get_tp_details;
408:

Line 406: p_errmsg := SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_DETAILS';

402: When Others Then
403: ecx_debug.setErrorInfo(2,30,
404: SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_DETAILS');
405: p_retcode := 2;
406: p_errmsg := SQLERRM || ' At ECX_TRADING_PARTNER_PVT.GET_TP_DETAILS';
407: END get_tp_details;
408:
409: /** Get error type***/
410: Procedure get_error_type ( i_error_type OUT NOCOPY pls_integer,

Line 518: ecx_debug.setErrorInfo(2,30, SQLERRM || ' -ECX_TRADING_PARTNER_PVT.getEnvelopeInformation');

514: then
515: close get_msg_attributes;
516: end if;
517:
518: ecx_debug.setErrorInfo(2,30, SQLERRM || ' -ECX_TRADING_PARTNER_PVT.getEnvelopeInformation');
519: retcode :=2;
520: retmsg := SQLERRM || ' -ECX_TRADING_PARTNER_PVT.getEnvelopeInformation';
521: end getEnvelopeInformation;
522:

Line 520: retmsg := SQLERRM || ' -ECX_TRADING_PARTNER_PVT.getEnvelopeInformation';

516: end if;
517:
518: ecx_debug.setErrorInfo(2,30, SQLERRM || ' -ECX_TRADING_PARTNER_PVT.getEnvelopeInformation');
519: retcode :=2;
520: retmsg := SQLERRM || ' -ECX_TRADING_PARTNER_PVT.getEnvelopeInformation';
521: end getEnvelopeInformation;
522:
523: procedure setOriginalReferenceId
524: (

Line 544: substr(SQLERRM,1,200) || ' -ECX_TRADING_PARTNER_PVT.setOriginalReferenceId');

540: when others then
541: retcode := 2;
542: retmsg := substr(SQLERRM,1,200);
543: ecx_debug.setErrorInfo(2,30,
544: substr(SQLERRM,1,200) || ' -ECX_TRADING_PARTNER_PVT.setOriginalReferenceId');
545: end setOriginalReferenceId;
546:
547:
548: function getOAGLOGICALID

Line 558: fnd_profile.get('||'''ECX_OAG_LOGICALID'''||',ecx_trading_partner_pvt.g_oag_logicalid);

554: ecx_utils.g_install_mode := wf_core.translate('WF_INSTALL');
555: if ecx_utils.g_install_mode = 'EMBEDDED'
556: then
557: i_string := 'begin
558: fnd_profile.get('||'''ECX_OAG_LOGICALID'''||',ecx_trading_partner_pvt.g_oag_logicalid);
559: end;';
560: execute immediate i_string ;
561: else
562: ecx_trading_partner_pvt.g_oag_logicalid := wf_core.translate('ECX_OAG_LOGICALID');

Line 562: ecx_trading_partner_pvt.g_oag_logicalid := wf_core.translate('ECX_OAG_LOGICALID');

558: fnd_profile.get('||'''ECX_OAG_LOGICALID'''||',ecx_trading_partner_pvt.g_oag_logicalid);
559: end;';
560: execute immediate i_string ;
561: else
562: ecx_trading_partner_pvt.g_oag_logicalid := wf_core.translate('ECX_OAG_LOGICALID');
563: end if;
564:
565: return ecx_trading_partner_pvt.g_oag_logicalid;
566: exception

Line 565: return ecx_trading_partner_pvt.g_oag_logicalid;

561: else
562: ecx_trading_partner_pvt.g_oag_logicalid := wf_core.translate('ECX_OAG_LOGICALID');
563: end if;
564:
565: return ecx_trading_partner_pvt.g_oag_logicalid;
566: exception
567: when others then
568: return null;
569: end getOAGLOGICALID;

Line 665: END ECX_TRADING_PARTNER_PVT;

661: retcode := 1;
662: return 'N';
663: End validateTPUser;
664:
665: END ECX_TRADING_PARTNER_PVT;