DBA Data[Home] [Help]

APPS.QP_PRICE_BOOK_UTIL dependencies on QP_PRICE_BOOK_UTIL

Line 1: PACKAGE BODY QP_PRICE_BOOK_UTIL AS

1: PACKAGE BODY QP_PRICE_BOOK_UTIL AS
2: /*$Header: QPXUPBKB.pls 120.106.12010000.2 2008/10/15 14:08:52 dnema ship $*/
3:
4: --Global constant holding the package name
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_PRICE_BOOK_UTIL';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_PRICE_BOOK_UTIL';

1: PACKAGE BODY QP_PRICE_BOOK_UTIL AS
2: /*$Header: QPXUPBKB.pls 120.106.12010000.2 2008/10/15 14:08:52 dnema ship $*/
3:
4: --Global constant holding the package name
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_PRICE_BOOK_UTIL';
6:
7: /*****************************************************************************
8: Procedure to insert Price Book related error and warning messages into
9: qp_price_book_messages table.

Line 3391: l_routine VARCHAR2(240):='QP_PRICE_BOOK_UTIL.PUBLISH_AND_DELIVER';

3387: IS
3388: L_MAX_STATUS_REQUESTS NUMBER:=240;
3389: L_STATUS_REQUEST_INTERVAL NUMBER:=10; -- seconds
3390: L_TRANSFER_TIMEOUT NUMBER:=3600; -- seconds
3391: l_routine VARCHAR2(240):='QP_PRICE_BOOK_UTIL.PUBLISH_AND_DELIVER';
3392: l_output_file VARCHAR2(240);
3393: l_debug VARCHAR2(3);
3394: l_url_servlet_string VARCHAR2(240);
3395: l_url_param_string VARCHAR2(240);

Line 3548: QP_PREQ_GRP.engine_debug('ENTERING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG');

3544: QP_PREQ_GRP.Set_QP_Debug;
3545: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
3546:
3547: IF (l_debug = FND_API.G_TRUE) THEN
3548: QP_PREQ_GRP.engine_debug('ENTERING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG');
3549: END IF;
3550:
3551: IF (l_debug = FND_API.G_TRUE) THEN
3552: QP_PREQ_GRP.engine_debug('With the following parameters:');

Line 3601: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Parameters Initialized';

3597: IF (l_debug = FND_API.G_TRUE) THEN
3598: QP_PREQ_GRP.engine_debug('l_inv_org_id:' || l_inv_org_id);
3599: END IF;
3600:
3601: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Parameters Initialized';
3602: IF (l_debug = FND_API.G_TRUE) THEN
3603: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3604: END IF;
3605:

Line 3632: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : XML Setup Check';

3628: QP_PREQ_GRP.engine_debug('return_code:' || return_code);
3629: QP_PREQ_GRP.engine_debug('errmsg:' || errmsg);
3630: END IF;
3631:
3632: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : XML Setup Check';
3633: IF (l_debug = FND_API.G_TRUE) THEN
3634: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3635: END IF;
3636:

Line 3639: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : No Trading Partner found during XML Setup Check';

3635: END IF;
3636:
3637: IF NOT(result) THEN
3638: -- trading partner not found
3639: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : No Trading Partner found during XML Setup Check';
3640: IF (l_debug = FND_API.G_TRUE) THEN
3641: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3642: END IF;
3643:

Line 3646: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : No Number Limit Specified';

3642: END IF;
3643:
3644: ELSE -- no number specified, send in one message
3645:
3646: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : No Number Limit Specified';
3647: IF (l_debug = FND_API.G_TRUE) THEN
3648: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3649: END IF;
3650:

Line 3664: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Created Unique Key';

3660: QP_PREQ_GRP.engine_debug('l_date:' || l_date);
3661: END IF;
3662: l_canonical_date := FND_DATE.DATE_TO_CANONICAL(l_date);
3663:
3664: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Created Unique Key';
3665: IF (l_debug = FND_API.G_TRUE) THEN
3666: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3667: END IF;
3668:

Line 3701: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Initialize Create Event Parameters';

3697: wf_event.AddParameterToList(p_name => 'DOCUMENT_CREATION_DATE',
3698: p_value => l_canonical_date,
3699: p_parameterlist => l_create_cln_parameter_list);
3700:
3701: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Initialize Create Event Parameters';
3702: IF (l_debug = FND_API.G_TRUE) THEN
3703: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3704: end if;
3705:

Line 3711: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Create Event Raised';

3707: wf_event.raise(p_event_name => l_create_cln_event,
3708: p_event_key => l_event_key,
3709: p_parameters => l_create_cln_parameter_list);
3710:
3711: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Create Event Raised';
3712: IF (l_debug = FND_API.G_TRUE) THEN
3713: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3714: end if;
3715:

Line 3790: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Send Document Event Parameters Initialized';

3786: wf_event.AddParameterToList(p_name => 'ECX_PARAMETER5',
3787: p_value => NULL,
3788: p_parameterlist => l_send_syct_parameter_list);
3789:
3790: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Send Document Event Parameters Initialized';
3791: IF (l_debug = FND_API.G_TRUE) THEN
3792: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3793: END IF;
3794:

Line 3800: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Send Document Event Raised';

3796: wf_event.RAISE(p_event_name => l_send_syct_event,
3797: p_event_key => l_event_key,
3798: p_parameters => l_send_syct_parameter_list);
3799:
3800: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Send Document Event Raised';
3801: IF (l_debug = FND_API.G_TRUE) THEN
3802: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3803: END IF;
3804:

Line 3808: QP_PREQ_GRP.engine_debug('EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG Successfully');

3804:
3805: END IF;
3806:
3807: IF (l_debug = FND_API.G_TRUE) THEN
3808: QP_PREQ_GRP.engine_debug('EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG Successfully');
3809: END IF;
3810:
3811: x_return_status := FND_API.G_RET_STS_SUCCESS;
3812:

Line 3821: x_progress := 'EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG in Error ';

3817: IF (l_debug = FND_API.G_TRUE) THEN
3818: QP_PREQ_GRP.engine_debug('Exception ' || ':' || l_error_code || ':' || l_error_msg);
3819: END IF;
3820:
3821: x_progress := 'EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG in Error ';
3822: IF (l_debug = FND_API.G_TRUE) THEN
3823: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3824: END IF;
3825: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3847: l_routine VARCHAR2(240):='QP_PRICE_BOOK_UTIL.GENERATE_PUBLISH_PRICE_BOOK_WF:';

3843: l_request_id NUMBER;
3844: l_ret_code NUMBER;
3845: l_err_buf VARCHAR2(240);
3846: l_debug VARCHAR2(3);
3847: l_routine VARCHAR2(240):='QP_PRICE_BOOK_UTIL.GENERATE_PUBLISH_PRICE_BOOK_WF:';
3848: BEGIN
3849: l_pb_input_header_id := Wf_Engine.GetItemAttrText(itemtype, itemkey, 'PARAMETER1');
3850: IF (l_pb_input_header_id is null) THEN
3851: wf_core.token('PARAMETER1','NULL');

Line 3888: Wf_Core.Context('QP_PRICE_BOOK_UTIL', 'GENERATE_PUBLISH_PRICE_BOOK_WF', itemtype, itemkey, to_char(actid), funcmode);

3884: resultout := wf_engine.eng_completed||':'||wf_engine.eng_null;
3885:
3886: EXCEPTION
3887: WHEN OTHERS THEN
3888: Wf_Core.Context('QP_PRICE_BOOK_UTIL', 'GENERATE_PUBLISH_PRICE_BOOK_WF', itemtype, itemkey, to_char(actid), funcmode);
3889: raise;
3890: END GENERATE_PUBLISH_PRICE_BOOK_WF;
3891:
3892: PROCEDURE CATSO_SELECTOR

Line 4004: WF_CORE.Context('QP_PRICE_BOOK_UTIL', 'CATSO_SELECTOR',

4000: END IF;
4001:
4002: EXCEPTION
4003: WHEN OTHERS THEN NULL;
4004: WF_CORE.Context('QP_PRICE_BOOK_UTIL', 'CATSO_SELECTOR',
4005: p_itemtype, p_itemkey, p_actid, p_funcmode);
4006: RAISE;
4007:
4008: END CATSO_SELECTOR;

Line 4024: l_routine VARCHAR2(240):='QP_PRICE_BOOK_UTIL.SET_XML_CONTEXT';

4020: l_resp_id NUMBER;
4021: l_resp_appl_id NUMBER;
4022: l_resp_appl_name VARCHAR2(30);
4023: l_debug VARCHAR2(3);
4024: l_routine VARCHAR2(240):='QP_PRICE_BOOK_UTIL.SET_XML_CONTEXT';
4025: BEGIN
4026: -- get user based on user name
4027: SELECT user_id
4028: INTO l_user_id

Line 4150: l_context_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;

4146: l_pb_input_header_id NUMBER;
4147: l_pb_input_header_rec qp_pb_input_headers_vl%ROWTYPE;
4148: l_full_pb_input_header_rec qp_pb_input_headers_vl%ROWTYPE;
4149:
4150: l_context_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4151: l_attribute_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4152: l_attribute_value_tbl QP_PRICE_BOOK_UTIL.VARCHAR_TYPE;
4153: l_attribute_type_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4154:

Line 4151: l_attribute_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;

4147: l_pb_input_header_rec qp_pb_input_headers_vl%ROWTYPE;
4148: l_full_pb_input_header_rec qp_pb_input_headers_vl%ROWTYPE;
4149:
4150: l_context_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4151: l_attribute_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4152: l_attribute_value_tbl QP_PRICE_BOOK_UTIL.VARCHAR_TYPE;
4153: l_attribute_type_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4154:
4155: l_user_id NUMBER;

Line 4152: l_attribute_value_tbl QP_PRICE_BOOK_UTIL.VARCHAR_TYPE;

4148: l_full_pb_input_header_rec qp_pb_input_headers_vl%ROWTYPE;
4149:
4150: l_context_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4151: l_attribute_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4152: l_attribute_value_tbl QP_PRICE_BOOK_UTIL.VARCHAR_TYPE;
4153: l_attribute_type_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4154:
4155: l_user_id NUMBER;
4156: l_login_id NUMBER;

Line 4153: l_attribute_type_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;

4149:
4150: l_context_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4151: l_attribute_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4152: l_attribute_value_tbl QP_PRICE_BOOK_UTIL.VARCHAR_TYPE;
4153: l_attribute_type_tbl QP_PRICE_BOOK_UTIL.VARCHAR30_TYPE;
4154:
4155: l_user_id NUMBER;
4156: l_login_id NUMBER;
4157: l_sysdate DATE;

Line 4339: END QP_PRICE_BOOK_UTIL;

4335: RETURN 5000;
4336: END Get_Processing_BatchSize;
4337:
4338:
4339: END QP_PRICE_BOOK_UTIL;