DBA Data[Home] [Help]

APPS.QP_PRICE_BOOK_UTIL dependencies on FND_API

Line 2395: RAISE FND_API.G_EXC_ERROR;

2391: l_count := 0;
2392: END;
2393:
2394: IF l_count > 0 THEN
2395: RAISE FND_API.G_EXC_ERROR;
2396: END IF;
2397:
2398: INSERT INTO qp_price_book_headers_all_b (
2399: price_book_header_id,

Line 3097: x_return_status := FND_API.G_RET_STS_ERROR;

3093: AND organization_id = p_org_id;
3094: EXCEPTION
3095: WHEN NO_DATA_FOUND THEN
3096: x_prod_attr_value := 'ITEM_LOOKUP_FAILED';
3097: x_return_status := FND_API.G_RET_STS_ERROR;
3098: FND_MESSAGE.SET_NAME('QP', 'QP_XML_ITEM_NOT_FOUND');
3099: FND_MESSAGE.SET_TOKEN('ITEM_NUMBER', p_item_number);
3100: x_return_text := FND_MESSAGE.GET;
3101: WHEN TOO_MANY_ROWS THEN

Line 3103: x_return_status := FND_API.G_RET_STS_ERROR;

3099: FND_MESSAGE.SET_TOKEN('ITEM_NUMBER', p_item_number);
3100: x_return_text := FND_MESSAGE.GET;
3101: WHEN TOO_MANY_ROWS THEN
3102: x_prod_attr_value := 'ITEM_LOOKUP_FAILED';
3103: x_return_status := FND_API.G_RET_STS_ERROR;
3104: FND_MESSAGE.SET_NAME('QP', 'QP_XML_ITEM_MULTI_FOUND');
3105: FND_MESSAGE.SET_TOKEN('ITEM_NUMBER', p_item_number);
3106: x_return_text := FND_MESSAGE.GET;
3107: END;

Line 3143: x_return_status := FND_API.G_RET_STS_ERROR;

3139: WHERE category_name = p_item_category_name;
3140: EXCEPTION
3141: WHEN NO_DATA_FOUND THEN
3142: x_prod_attr_value := 'CATEGORY_LOOKUP_FAILED';
3143: x_return_status := FND_API.G_RET_STS_ERROR;
3144: FND_MESSAGE.SET_NAME('QP', 'QP_XML_CATEGORY_NOT_FOUND');
3145: FND_MESSAGE.SET_TOKEN('CATEGORY_NAME', p_item_category_name);
3146: x_return_text := FND_MESSAGE.GET;
3147: WHEN TOO_MANY_ROWS THEN

Line 3149: x_return_status := FND_API.G_RET_STS_ERROR;

3145: FND_MESSAGE.SET_TOKEN('CATEGORY_NAME', p_item_category_name);
3146: x_return_text := FND_MESSAGE.GET;
3147: WHEN TOO_MANY_ROWS THEN
3148: x_prod_attr_value := 'CATEGORY_LOOKUP_FAILED';
3149: x_return_status := FND_API.G_RET_STS_ERROR;
3150: FND_MESSAGE.SET_NAME('QP', 'QP_XML_CATEGORY_MULTI_FOUND');
3151: FND_MESSAGE.SET_TOKEN('CATEGORY_NAME', p_item_category_name);
3152: x_return_text := FND_MESSAGE.GET;
3153: END;

Line 3166: x_return_status := FND_API.G_RET_STS_ERROR;

3162: x_pl_agr_bsa_id := p_price_list_id;
3163: ELSIF (p_price_list_name is not null) THEN
3164: x_pl_agr_bsa_id := GET_PRICE_LIST_ID(p_price_list_name);
3165: IF x_pl_agr_bsa_id is null THEN
3166: x_return_status := FND_API.G_RET_STS_ERROR;
3167: FND_MESSAGE.SET_NAME('QP', 'QP_XML_PRICELIST_NOT_FOUND');
3168: FND_MESSAGE.SET_TOKEN('PRICELIST_NAME', p_price_list_name);
3169: x_return_text := FND_MESSAGE.GET;
3170: END IF;

Line 3179: x_return_status := FND_API.G_RET_STS_ERROR;

3175: x_pl_agr_bsa_id := p_agreement_id;
3176: ELSIF (p_agreement_name is not null) THEN
3177: x_pl_agr_bsa_id := GET_AGREEMENT_ID(p_agreement_name, p_pricing_effective_date);
3178: IF x_pl_agr_bsa_id is null THEN
3179: x_return_status := FND_API.G_RET_STS_ERROR;
3180: FND_MESSAGE.SET_NAME('QP', 'QP_XML_AGREEMENT_NOT_FOUND');
3181: FND_MESSAGE.SET_TOKEN('AGREEMENT_NAME', p_agreement_name);
3182: FND_MESSAGE.SET_TOKEN('EFFECTIVE_DATE', p_pricing_effective_date);
3183: x_return_text := FND_MESSAGE.GET;

Line 3193: x_return_status := FND_API.G_RET_STS_ERROR;

3189: x_pl_agr_bsa_id := p_bsa_id;
3190: ELSIF (p_bsa_name is not null) THEN
3191: x_pl_agr_bsa_id := GET_BSA_ID(p_bsa_name);
3192: IF x_pl_agr_bsa_id is null THEN
3193: x_return_status := FND_API.G_RET_STS_ERROR;
3194: FND_MESSAGE.SET_NAME('QP', 'QP_XML_BSA_NOT_FOUND');
3195: FND_MESSAGE.SET_TOKEN('BSA_NAME', p_bsa_name);
3196: x_return_text := FND_MESSAGE.GET;
3197: END IF;

Line 3222: x_return_status := FND_API.G_RET_STS_ERROR;

3218: AND prc_context_type = p_attribute_type;
3219: EXCEPTION
3220: WHEN NO_DATA_FOUND THEN
3221: x_context_code := null;
3222: x_return_status := FND_API.G_RET_STS_ERROR;
3223: FND_MESSAGE.SET_NAME('QP', 'QP_XML_CONTEXT_NOT_FOUND');
3224: FND_MESSAGE.SET_TOKEN('CONTEXT_NAME', p_context_name);
3225: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);
3226: x_return_text := FND_MESSAGE.GET;

Line 3229: x_return_status := FND_API.G_RET_STS_ERROR;

3225: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);
3226: x_return_text := FND_MESSAGE.GET;
3227: WHEN TOO_MANY_ROWS THEN
3228: x_context_code := null;
3229: x_return_status := FND_API.G_RET_STS_ERROR;
3230: FND_MESSAGE.SET_NAME('QP', 'QP_XML_CONTEXT_MULTI_FOUND');
3231: FND_MESSAGE.SET_TOKEN('CONTEXT_NAME', p_context_name);
3232: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);
3233: x_return_text := FND_MESSAGE.GET;

Line 3259: x_return_status := FND_API.G_RET_STS_ERROR;

3255: AND nvl(stl.user_segment_name,stl.seeded_segment_name) = p_attribute_name;
3256: EXCEPTION
3257: WHEN NO_DATA_FOUND THEN
3258: x_attribute_code := null;
3259: x_return_status := FND_API.G_RET_STS_ERROR;
3260: FND_MESSAGE.SET_NAME('QP', 'QP_XML_ATTRIBUTE_NOT_FOUND');
3261: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_NAME', p_attribute_name);
3262: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);
3263: FND_MESSAGE.SET_TOKEN('CONTEXT_CODE', p_context_code);

Line 3267: x_return_status := FND_API.G_RET_STS_ERROR;

3263: FND_MESSAGE.SET_TOKEN('CONTEXT_CODE', p_context_code);
3264: x_return_text := FND_MESSAGE.GET;
3265: WHEN TOO_MANY_ROWS THEN
3266: x_attribute_code := null;
3267: x_return_status := FND_API.G_RET_STS_ERROR;
3268: FND_MESSAGE.SET_NAME('QP', 'QP_XML_ATTRIBUTE_MULTI_FOUND');
3269: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_NAME', p_attribute_name);
3270: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);
3271: FND_MESSAGE.SET_TOKEN('CONTEXT_CODE', p_context_code);

Line 3368: x_return_status := FND_API.G_RET_STS_ERROR;

3364:
3365: EXCEPTION
3366: WHEN NO_DATA_FOUND THEN
3367: x_attribute_value_code := null;
3368: x_return_status := FND_API.G_RET_STS_ERROR;
3369: FND_MESSAGE.SET_NAME('QP', 'QP_XML_ATTR_VALUE_NOT_FOUND');
3370: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_VALUE_NAME', p_attribute_value_name);
3371: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_CODE', p_attribute_code);
3372: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);

Line 3377: x_return_status := FND_API.G_RET_STS_ERROR;

3373: FND_MESSAGE.SET_TOKEN('CONTEXT_CODE', p_context_code);
3374: x_return_text := FND_MESSAGE.GET;
3375: WHEN TOO_MANY_ROWS THEN
3376: x_attribute_value_code := null;
3377: x_return_status := FND_API.G_RET_STS_ERROR;
3378: FND_MESSAGE.SET_NAME('QP', 'QP_XML_ATTR_VALUE_MULTI_FOUND');
3379: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_VALUE_NAME', p_attribute_value_name);
3380: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_CODE', p_attribute_code);
3381: FND_MESSAGE.SET_TOKEN('CONTEXT_TYPE', p_attribute_type);

Line 3399: IF l_status <> FND_API.G_RET_STS_SUCCESS THEN

3395: l_status VARCHAR2(30);
3396: l_status_text VARCHAR2(2000);
3397: BEGIN
3398: PUBLISH_AND_DELIVER(p_pb_input_header_id, p_price_book_id, p_servlet_url, l_status, l_status_text);
3399: IF l_status <> FND_API.G_RET_STS_SUCCESS THEN
3400: retcode := 2;
3401: err_buff := l_status_text;
3402: ELSE
3403: retcode := 0;

Line 3447: IF l_debug = FND_API.G_TRUE THEN

3443: BEGIN
3444:
3445: QP_PREQ_GRP.Set_QP_Debug;
3446: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
3447: IF l_debug = FND_API.G_TRUE THEN
3448: l_output_file := OE_DEBUG_PUB.SET_DEBUG_MODE('FILE');
3449: FND_FILE.PUT_LINE( FND_FILE.LOG, 'The output file is : ' || l_output_file );
3450: END IF;
3451:

Line 3477: FND_API.G_TRUE);

3473: l_return_status_text,
3474: l_dummy_return_details,
3475: false,
3476: L_TRANSFER_TIMEOUT,
3477: FND_API.G_TRUE);
3478:
3479: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
3480: IF (l_return_status_text = 'UTL_TCP.END_OF_INPUT') THEN
3481: l_status_request_cnt := 0;

Line 3479: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

3475: false,
3476: L_TRANSFER_TIMEOUT,
3477: FND_API.G_TRUE);
3478:
3479: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
3480: IF (l_return_status_text = 'UTL_TCP.END_OF_INPUT') THEN
3481: l_status_request_cnt := 0;
3482: BEGIN
3483: LOOP

Line 3509: x_return_status := FND_API.G_RET_STS_SUCCESS;

3505: RAISE E_ROUTINE_ERRORS;
3506: END IF;
3507: END IF;
3508:
3509: x_return_status := FND_API.G_RET_STS_SUCCESS;
3510:
3511: EXCEPTION
3512: WHEN INVALID_PARAMS_ERROR THEN
3513: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3513: x_return_status := FND_API.G_RET_STS_ERROR;

3509: x_return_status := FND_API.G_RET_STS_SUCCESS;
3510:
3511: EXCEPTION
3512: WHEN INVALID_PARAMS_ERROR THEN
3513: x_return_status := FND_API.G_RET_STS_ERROR;
3514: x_return_status_text := 'Invalid parameter values.';
3515: WHEN E_ROUTINE_ERRORS THEN
3516: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN
3517: QP_PREQ_GRP.engine_debug(l_routine||'l_return_status_text:'||l_return_status_text);

Line 3516: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN

3512: WHEN INVALID_PARAMS_ERROR THEN
3513: x_return_status := FND_API.G_RET_STS_ERROR;
3514: x_return_status_text := 'Invalid parameter values.';
3515: WHEN E_ROUTINE_ERRORS THEN
3516: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN
3517: QP_PREQ_GRP.engine_debug(l_routine||'l_return_status_text:'||l_return_status_text);
3518: QP_PREQ_GRP.engine_debug(l_routine||'SQLERRM:'||SQLERRM);
3519: END IF;
3520: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3520: x_return_status := FND_API.G_RET_STS_ERROR;

3516: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN
3517: QP_PREQ_GRP.engine_debug(l_routine||'l_return_status_text:'||l_return_status_text);
3518: QP_PREQ_GRP.engine_debug(l_routine||'SQLERRM:'||SQLERRM);
3519: END IF;
3520: x_return_status := FND_API.G_RET_STS_ERROR;
3521: x_return_status_text := l_return_status_text;
3522: WHEN MAX_STATUS_REQUESTS_REACHED THEN
3523: x_return_status := FND_API.G_RET_STS_ERROR;
3524: x_return_status_text := 'Request has exceeded '||(L_MAX_STATUS_REQUESTS*L_STATUS_REQUEST_INTERVAL)||' seconds.';

Line 3523: x_return_status := FND_API.G_RET_STS_ERROR;

3519: END IF;
3520: x_return_status := FND_API.G_RET_STS_ERROR;
3521: x_return_status_text := l_return_status_text;
3522: WHEN MAX_STATUS_REQUESTS_REACHED THEN
3523: x_return_status := FND_API.G_RET_STS_ERROR;
3524: x_return_status_text := 'Request has exceeded '||(L_MAX_STATUS_REQUESTS*L_STATUS_REQUEST_INTERVAL)||' seconds.';
3525: WHEN INVALID_PRICE_BOOK_HEADER THEN
3526: x_return_status := FND_API.G_RET_STS_ERROR;
3527: x_return_status_text := 'Invalid price book header id.';

Line 3526: x_return_status := FND_API.G_RET_STS_ERROR;

3522: WHEN MAX_STATUS_REQUESTS_REACHED THEN
3523: x_return_status := FND_API.G_RET_STS_ERROR;
3524: x_return_status_text := 'Request has exceeded '||(L_MAX_STATUS_REQUESTS*L_STATUS_REQUEST_INTERVAL)||' seconds.';
3525: WHEN INVALID_PRICE_BOOK_HEADER THEN
3526: x_return_status := FND_API.G_RET_STS_ERROR;
3527: x_return_status_text := 'Invalid price book header id.';
3528: WHEN OTHERS THEN
3529: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN
3530: QP_PREQ_GRP.engine_debug(l_routine||'l_return_status_text:'||l_return_status_text);

Line 3529: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN

3525: WHEN INVALID_PRICE_BOOK_HEADER THEN
3526: x_return_status := FND_API.G_RET_STS_ERROR;
3527: x_return_status_text := 'Invalid price book header id.';
3528: WHEN OTHERS THEN
3529: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN
3530: QP_PREQ_GRP.engine_debug(l_routine||'l_return_status_text:'||l_return_status_text);
3531: QP_PREQ_GRP.engine_debug(l_routine||'SQLERRM:'||SQLERRM);
3532: END IF;
3533: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3533: x_return_status := FND_API.G_RET_STS_ERROR;

3529: IF QP_PREQ_GRP.G_DEBUG_ENGINE = FND_API.G_TRUE THEN
3530: QP_PREQ_GRP.engine_debug(l_routine||'l_return_status_text:'||l_return_status_text);
3531: QP_PREQ_GRP.engine_debug(l_routine||'SQLERRM:'||SQLERRM);
3532: END IF;
3533: x_return_status := FND_API.G_RET_STS_ERROR;
3534: x_return_status_text := l_return_status_text;
3535: END PUBLISH_AND_DELIVER;
3536:
3537: PROCEDURE SEND_SYNC_CATALOG

Line 3580: IF (l_debug = FND_API.G_TRUE) THEN

3576: -- set debug level
3577: QP_PREQ_GRP.Set_QP_Debug;
3578: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
3579:
3580: IF (l_debug = FND_API.G_TRUE) THEN
3581: QP_PREQ_GRP.engine_debug('ENTERING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG');
3582: END IF;
3583:
3584: IF (l_debug = FND_API.G_TRUE) THEN

Line 3584: IF (l_debug = FND_API.G_TRUE) THEN

3580: IF (l_debug = FND_API.G_TRUE) THEN
3581: QP_PREQ_GRP.engine_debug('ENTERING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG');
3582: END IF;
3583:
3584: IF (l_debug = FND_API.G_TRUE) THEN
3585: QP_PREQ_GRP.engine_debug('With the following parameters:');
3586: QP_PREQ_GRP.engine_debug('p_price_book_header_id:' || p_price_book_header_id);
3587: END IF;
3588:

Line 3616: IF (l_debug = FND_API.G_TRUE) THEN

3612: FROM qp_price_book_headers_b p, qp_pb_input_headers_b i
3613: WHERE p.price_book_header_id = p_price_book_header_id
3614: AND p.pb_input_header_id = i.pb_input_header_id;
3615:
3616: IF (l_debug = FND_API.G_TRUE) THEN
3617: QP_PREQ_GRP.engine_debug('party_id:' || party_id);
3618: QP_PREQ_GRP.engine_debug('party_site_id:' || party_site_id);
3619: END IF;
3620:

Line 3625: IF (l_debug = FND_API.G_TRUE) THEN

3621: SELECT FND_PROFILE.VALUE('ORG_ID')
3622: INTO l_operating_unit_id
3623: FROM dual;
3624:
3625: IF (l_debug = FND_API.G_TRUE) THEN
3626: QP_PREQ_GRP.engine_debug('l_operating_unit_id:' || l_operating_unit_id);
3627: END IF;
3628:
3629: l_inv_org_id := qp_util.Get_Item_Validation_Org;

Line 3630: IF (l_debug = FND_API.G_TRUE) THEN

3626: QP_PREQ_GRP.engine_debug('l_operating_unit_id:' || l_operating_unit_id);
3627: END IF;
3628:
3629: l_inv_org_id := qp_util.Get_Item_Validation_Org;
3630: IF (l_debug = FND_API.G_TRUE) THEN
3631: QP_PREQ_GRP.engine_debug('l_inv_org_id:' || l_inv_org_id);
3632: END IF;
3633:
3634: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Parameters Initialized';

Line 3635: IF (l_debug = FND_API.G_TRUE) THEN

3631: QP_PREQ_GRP.engine_debug('l_inv_org_id:' || l_inv_org_id);
3632: END IF;
3633:
3634: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Parameters Initialized';
3635: IF (l_debug = FND_API.G_TRUE) THEN
3636: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3637: END IF;
3638:
3639: -- XML Setup Check

Line 3640: IF (l_debug = FND_API.G_TRUE) THEN

3636: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3637: END IF;
3638:
3639: -- XML Setup Check
3640: IF (l_debug = FND_API.G_TRUE) THEN
3641: QP_PREQ_GRP.engine_debug('Parameters before ecx_document.isDeliveryRequired:');
3642: QP_PREQ_GRP.engine_debug('transaction_type:' || transaction_type);
3643: QP_PREQ_GRP.engine_debug('transaction_subtype:' || transaction_subtype);
3644: QP_PREQ_GRP.engine_debug('party_id:' || party_id);

Line 3659: IF (l_debug = FND_API.G_TRUE) THEN

3655: resultout => result,
3656: retcode => return_code,
3657: errmsg => errmsg);
3658:
3659: IF (l_debug = FND_API.G_TRUE) THEN
3660: QP_PREQ_GRP.engine_debug('Values returned from ecx_document.isDeliveryRequired:');
3661: QP_PREQ_GRP.engine_debug('return_code:' || return_code);
3662: QP_PREQ_GRP.engine_debug('errmsg:' || errmsg);
3663: END IF;

Line 3666: IF (l_debug = FND_API.G_TRUE) THEN

3662: QP_PREQ_GRP.engine_debug('errmsg:' || errmsg);
3663: END IF;
3664:
3665: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : XML Setup Check';
3666: IF (l_debug = FND_API.G_TRUE) THEN
3667: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3668: END IF;
3669:
3670: IF NOT(result) THEN

Line 3673: IF (l_debug = FND_API.G_TRUE) THEN

3669:
3670: IF NOT(result) THEN
3671: -- trading partner not found
3672: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : No Trading Partner found during XML Setup Check';
3673: IF (l_debug = FND_API.G_TRUE) THEN
3674: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3675: END IF;
3676:
3677: ELSE -- no number specified, send in one message

Line 3680: IF (l_debug = FND_API.G_TRUE) THEN

3676:
3677: ELSE -- no number specified, send in one message
3678:
3679: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : No Number Limit Specified';
3680: IF (l_debug = FND_API.G_TRUE) THEN
3681: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3682: END IF;
3683:
3684: -- create unique key

Line 3686: IF (l_debug = FND_API.G_TRUE) THEN

3682: END IF;
3683:
3684: -- create unique key
3685: SELECT QP_XML_MESSAGES_S.NEXTVAL INTO l_syncctlg_seq FROM dual;
3686: IF (l_debug = FND_API.G_TRUE) THEN
3687: QP_PREQ_GRP.engine_debug('l_syncctlg_seq:' || l_syncctlg_seq);
3688: END IF;
3689: l_event_key := to_char(p_price_book_header_id) || '.' || to_char(l_syncctlg_seq);
3690:

Line 3692: IF (l_debug = FND_API.G_TRUE) THEN

3688: END IF;
3689: l_event_key := to_char(p_price_book_header_id) || '.' || to_char(l_syncctlg_seq);
3690:
3691: SELECT SYSDATE INTO l_date FROM dual;
3692: IF (l_debug = FND_API.G_TRUE) THEN
3693: QP_PREQ_GRP.engine_debug('l_date:' || l_date);
3694: END IF;
3695: l_canonical_date := FND_DATE.DATE_TO_CANONICAL(l_date);
3696:

Line 3698: IF (l_debug = FND_API.G_TRUE) THEN

3694: END IF;
3695: l_canonical_date := FND_DATE.DATE_TO_CANONICAL(l_date);
3696:
3697: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Created Unique Key';
3698: IF (l_debug = FND_API.G_TRUE) THEN
3699: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3700: END IF;
3701:
3702: -- add parameters to list for create collaboration event

Line 3735: IF (l_debug = FND_API.G_TRUE) THEN

3731: p_value => l_canonical_date,
3732: p_parameterlist => l_create_cln_parameter_list);
3733:
3734: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Initialize Create Event Parameters';
3735: IF (l_debug = FND_API.G_TRUE) THEN
3736: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3737: end if;
3738:
3739: -- raise create collaboration event

Line 3745: IF (l_debug = FND_API.G_TRUE) THEN

3741: p_event_key => l_event_key,
3742: p_parameters => l_create_cln_parameter_list);
3743:
3744: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Create Event Raised';
3745: IF (l_debug = FND_API.G_TRUE) THEN
3746: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3747: end if;
3748:
3749: -- add parameters to list for send show shipment document

Line 3824: IF (l_debug = FND_API.G_TRUE) THEN

3820: p_value => NULL,
3821: p_parameterlist => l_send_syct_parameter_list);
3822:
3823: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Send Document Event Parameters Initialized';
3824: IF (l_debug = FND_API.G_TRUE) THEN
3825: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3826: END IF;
3827:
3828: -- raise event for send show shipment document

Line 3834: IF (l_debug = FND_API.G_TRUE) THEN

3830: p_event_key => l_event_key,
3831: p_parameters => l_send_syct_parameter_list);
3832:
3833: x_progress := 'QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG : Send Document Event Raised';
3834: IF (l_debug = FND_API.G_TRUE) THEN
3835: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3836: END IF;
3837:
3838: END IF;

Line 3840: IF (l_debug = FND_API.G_TRUE) THEN

3836: END IF;
3837:
3838: END IF;
3839:
3840: IF (l_debug = FND_API.G_TRUE) THEN
3841: QP_PREQ_GRP.engine_debug('EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG Successfully');
3842: END IF;
3843:
3844: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3844: x_return_status := FND_API.G_RET_STS_SUCCESS;

3840: IF (l_debug = FND_API.G_TRUE) THEN
3841: QP_PREQ_GRP.engine_debug('EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG Successfully');
3842: END IF;
3843:
3844: x_return_status := FND_API.G_RET_STS_SUCCESS;
3845:
3846: EXCEPTION
3847: WHEN OTHERS THEN
3848: l_error_code := SQLCODE;

Line 3850: IF (l_debug = FND_API.G_TRUE) THEN

3846: EXCEPTION
3847: WHEN OTHERS THEN
3848: l_error_code := SQLCODE;
3849: l_error_msg := SQLERRM;
3850: IF (l_debug = FND_API.G_TRUE) THEN
3851: QP_PREQ_GRP.engine_debug('Exception ' || ':' || l_error_code || ':' || l_error_msg);
3852: END IF;
3853:
3854: x_progress := 'EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG in Error ';

Line 3855: IF (l_debug = FND_API.G_TRUE) THEN

3851: QP_PREQ_GRP.engine_debug('Exception ' || ':' || l_error_code || ':' || l_error_msg);
3852: END IF;
3853:
3854: x_progress := 'EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG in Error ';
3855: IF (l_debug = FND_API.G_TRUE) THEN
3856: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3857: END IF;
3858: x_return_status := FND_API.G_RET_STS_ERROR;
3859: x_return_status_text := l_error_msg;

Line 3858: x_return_status := FND_API.G_RET_STS_ERROR;

3854: x_progress := 'EXITING QP_PRICE_BOOK_UTIL.SEND_SYNC_CATALOG in Error ';
3855: IF (l_debug = FND_API.G_TRUE) THEN
3856: QP_PREQ_GRP.engine_debug('Failure point ' || x_progress);
3857: END IF;
3858: x_return_status := FND_API.G_RET_STS_ERROR;
3859: x_return_status_text := l_error_msg;
3860: END SEND_SYNC_CATALOG;
3861:
3862: PROCEDURE GENERATE_PUBLISH_PRICE_BOOK_WF

Line 3905: IF l_debug = FND_API.G_TRUE THEN

3901:
3902: SET_XML_CONTEXT(l_user_name, l_status_code, l_status_text);
3903:
3904: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
3905: IF l_debug = FND_API.G_TRUE THEN
3906: QP_PREQ_GRP.engine_debug(l_routine||'calling GENERATE_PUBLISH_PRICE_BOOK');
3907: END IF;
3908: QP_PRICE_BOOK_PVT.GENERATE_PUBLISH_PRICE_BOOK(l_pb_input_header_id,
3909: l_request_id,

Line 3913: IF l_debug = FND_API.G_TRUE THEN

3909: l_request_id,
3910: l_status_code,
3911: l_ret_code,
3912: l_err_buf);
3913: IF l_debug = FND_API.G_TRUE THEN
3914: QP_PREQ_GRP.engine_debug(l_routine||'returned from GENERATE_PUBLISH_PRICE_BOOK');
3915: END IF;
3916:
3917: resultout := wf_engine.eng_completed||':'||wf_engine.eng_null;

Line 3949: IF l_debug = FND_API.G_TRUE THEN

3945:
3946: QP_PREQ_GRP.Set_QP_Debug;
3947: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
3948:
3949: IF l_debug = FND_API.G_TRUE THEN
3950: QP_PREQ_GRP.engine_debug( 'ENTERING CATSO_SELECTOR PROCEDURE' ) ;
3951: QP_PREQ_GRP.engine_debug( 'THE WORKFLOW FUNCTION MODE IS: FUNCMODE='||P_FUNCMODE ) ;
3952: END IF;
3953:

Line 3955: IF l_debug = FND_API.G_TRUE THEN

3951: QP_PREQ_GRP.engine_debug( 'THE WORKFLOW FUNCTION MODE IS: FUNCMODE='||P_FUNCMODE ) ;
3952: END IF;
3953:
3954: IF (p_funcmode = 'RUN') THEN
3955: IF l_debug = FND_API.G_TRUE THEN
3956: QP_PREQ_GRP.engine_debug( 'P_FUNCMODE IS RUN' ) ;
3957: END IF;
3958: p_x_result := 'COMPLETE';
3959: ELSIF(p_funcmode = 'TEST_CTX') THEN

Line 3960: IF l_debug = FND_API.G_TRUE THEN

3956: QP_PREQ_GRP.engine_debug( 'P_FUNCMODE IS RUN' ) ;
3957: END IF;
3958: p_x_result := 'COMPLETE';
3959: ELSIF(p_funcmode = 'TEST_CTX') THEN
3960: IF l_debug = FND_API.G_TRUE THEN
3961: QP_PREQ_GRP.engine_debug( 'P_FUNCMODE IS TEST_CTX' ) ;
3962: END IF;
3963:
3964: l_org_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,

Line 3968: IF l_debug = FND_API.G_TRUE THEN

3964: l_org_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
3965: itemkey => p_itemkey,
3966: aname => 'ORG_ID');
3967:
3968: IF l_debug = FND_API.G_TRUE THEN
3969: QP_PREQ_GRP.engine_debug( 'l_org_id (from workflow)=>'|| l_org_id ) ;
3970: QP_PREQ_GRP.engine_debug( 'mo_global.get_current_org_id =>'|| mo_global.get_current_org_id ) ;
3971: END IF;
3972:

Line 3984: IF l_debug = FND_API.G_TRUE THEN

3980: END IF;
3981: END IF;
3982:
3983: ELSIF(p_funcmode = 'SET_CTX') THEN
3984: IF l_debug = FND_API.G_TRUE THEN
3985: QP_PREQ_GRP.engine_debug( 'P_FUNCMODE IS SET_CTX' ) ;
3986: END IF;
3987:
3988: l_user_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,

Line 4001: IF l_debug = FND_API.G_TRUE THEN

3997: l_org_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
3998: itemkey => p_itemkey,
3999: aname => 'ORG_ID');
4000:
4001: IF l_debug = FND_API.G_TRUE THEN
4002: QP_PREQ_GRP.engine_debug('l_user_id =>' || l_user_id || ' l_resp_id =>' || l_resp_id || ' l_resp_appl_id =>' || l_resp_appl_id || ' l_org_id =>' || l_org_id);
4003: END IF;
4004:
4005: IF l_resp_appl_id is null OR l_resp_id is null THEN

Line 4007: IF l_debug = FND_API.G_TRUE THEN

4003: END IF;
4004:
4005: IF l_resp_appl_id is null OR l_resp_id is null THEN
4006: dbms_application_info.set_client_info(l_org_id);
4007: IF l_debug = FND_API.G_TRUE THEN
4008: QP_PREQ_GRP.engine_debug('set org using dbms_application_info.set_client_info');
4009: END IF;
4010: ELSE
4011: -- Set the database session context

Line 4031: IF l_debug = FND_API.G_TRUE THEN

4027:
4028: p_x_result := 'COMPLETE';
4029: END IF;
4030:
4031: IF l_debug = FND_API.G_TRUE THEN
4032: QP_PREQ_GRP.engine_debug('p_x_result =>'||p_x_result);
4033: END IF;
4034:
4035: EXCEPTION

Line 4072: IF l_debug = FND_API.G_TRUE THEN

4068: null);
4069: l_pricing_perspective_code := FND_PROFILE.VALUE('QP_EXT_DEFAULT_PRICING_PERSPECTIVE');
4070: QP_PREQ_GRP.Set_QP_Debug;
4071: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
4072: IF l_debug = FND_API.G_TRUE THEN
4073: QP_PREQ_GRP.engine_debug(l_routine || ':l_user_id=' || l_user_id);
4074: QP_PREQ_GRP.engine_debug(l_routine || ':l_pricing_perspective_code=' || l_pricing_perspective_code);
4075: END IF;
4076:

Line 4082: IF l_debug = FND_API.G_TRUE THEN

4078: SELECT a.application_id
4079: INTO l_pricing_perspective_appl_id
4080: FROM fnd_application a
4081: WHERE a.application_short_name = l_pricing_perspective_code;
4082: IF l_debug = FND_API.G_TRUE THEN
4083: QP_PREQ_GRP.engine_debug(l_routine || ':l_pricing_perspective_appl_id=' || l_pricing_perspective_appl_id);
4084: END IF;
4085:
4086: -- get responsibility based on pricing perspective

Line 4091: IF l_debug = FND_API.G_TRUE THEN

4087: fnd_global.apps_initialize(l_user_id,
4088: null,
4089: l_pricing_perspective_appl_id);
4090: l_resp_id := FND_PROFILE.VALUE('QP_XML_RESP');
4091: IF l_debug = FND_API.G_TRUE THEN
4092: QP_PREQ_GRP.engine_debug(l_routine || ':l_resp_id=' || l_resp_id);
4093: END IF;
4094:
4095: -- get application id and short name based on responsibility

Line 4101: IF l_debug = FND_API.G_TRUE THEN

4097: INTO l_resp_appl_id, l_resp_appl_name
4098: FROM fnd_responsibility r, fnd_application a
4099: WHERE r.responsibility_id = l_resp_id
4100: AND a.application_id = r.application_id;
4101: IF l_debug = FND_API.G_TRUE THEN
4102: QP_PREQ_GRP.engine_debug(l_routine || ':l_resp_appl_id=' || l_resp_appl_id || ',l_resp_appl_name=' || l_resp_appl_name);
4103: END IF;
4104:
4105: -- set context

Line 4113: x_return_status := FND_API.G_RET_STS_ERROR;

4109: MO_GLOBAL.Init('QP');
4110:
4111: EXCEPTION
4112: WHEN NO_DATA_FOUND THEN
4113: x_return_status := FND_API.G_RET_STS_ERROR;
4114: FND_MESSAGE.SET_NAME('QP', 'QP_XML_RESPONSIBILITY_REQUIRED');
4115: x_return_text := FND_MESSAGE.GET;
4116: END;
4117:

Line 4163: x_return_status := FND_API.G_RET_STS_SUCCESS;

4159: LAST_UPDATED_BY = FND_GLOBAL.USER_ID
4160: WHERE pb_input_header_id = l_pb_input_header_id;
4161:
4162: x_pb_input_header_id := l_pb_input_header_id;
4163: x_return_status := FND_API.G_RET_STS_SUCCESS;
4164: x_return_text := '';
4165:
4166: EXCEPTION
4167: WHEN NO_DATA_FOUND THEN

Line 4168: x_return_status := FND_API.G_RET_STS_ERROR;

4164: x_return_text := '';
4165:
4166: EXCEPTION
4167: WHEN NO_DATA_FOUND THEN
4168: x_return_status := FND_API.G_RET_STS_ERROR;
4169: x_return_text := 'Could not find price book ' || p_price_book_name || ', ' || p_customer_attr_value || ', ' || p_effective_date;
4170: END CATGI_UPDATE_PUBLISH_OPTIONS;
4171:
4172: PROCEDURE CATGI_POST_INSERT_PROCESSING

Line 4202: x_return_status := FND_API.G_RET_STS_ERROR;

4198: FROM qp_pb_input_headers_vl
4199: WHERE pb_input_header_id = p_pb_input_header_id;
4200: EXCEPTION
4201: WHEN OTHERS THEN
4202: x_return_status := FND_API.G_RET_STS_ERROR;
4203: x_return_text := 'CATGI_POST_INSERT_PROCESSING: pb not found - ' || SQLERRM;
4204: END;
4205:
4206: IF l_pb_input_header_rec.cust_account_id is null THEN

Line 4229: x_return_status := FND_API.G_RET_STS_ERROR;

4225: AND customer_attribute = l_pb_input_header_rec.customer_attribute
4226: AND price_book_type_code = 'F';
4227: EXCEPTION
4228: WHEN OTHERS THEN
4229: x_return_status := FND_API.G_RET_STS_ERROR;
4230: FND_MESSAGE.SET_NAME('QP', 'QP_FULL_PRICE_BOOK_MUST_EXIST');
4231: x_return_text := FND_MESSAGE.GET;
4232: RETURN;
4233: END;

Line 4291: x_return_status := FND_API.G_RET_STS_ERROR;

4287: l_sysdate, l_user_id, l_sysdate, l_user_id, l_login_id
4288: );
4289: EXCEPTION
4290: WHEN OTHERS THEN
4291: x_return_status := FND_API.G_RET_STS_ERROR;
4292: x_return_text := 'CATGI_POST_INSERT_PROCESSING: error while inserting lines - ' || SQLERRM;
4293: END;
4294: END IF;
4295:

Line 4299: x_return_status := FND_API.G_RET_STS_SUCCESS;

4295:
4296: END IF;
4297:
4298: --x_pb_input_header_id := l_pb_input_header_id;
4299: x_return_status := FND_API.G_RET_STS_SUCCESS;
4300: x_return_text := '';
4301:
4302: EXCEPTION
4303: WHEN NO_DATA_FOUND THEN

Line 4304: x_return_status := FND_API.G_RET_STS_ERROR;

4300: x_return_text := '';
4301:
4302: EXCEPTION
4303: WHEN NO_DATA_FOUND THEN
4304: x_return_status := FND_API.G_RET_STS_ERROR;
4305: x_return_text := 'Could not find price book ' || p_pb_input_header_id;
4306: WHEN OTHERS THEN
4307: x_return_status := FND_API.G_RET_STS_ERROR;
4308: x_return_text := 'CATGI_POST_INSERT_PROCESSING: general error - ' || SQLERRM;

Line 4307: x_return_status := FND_API.G_RET_STS_ERROR;

4303: WHEN NO_DATA_FOUND THEN
4304: x_return_status := FND_API.G_RET_STS_ERROR;
4305: x_return_text := 'Could not find price book ' || p_pb_input_header_id;
4306: WHEN OTHERS THEN
4307: x_return_status := FND_API.G_RET_STS_ERROR;
4308: x_return_text := 'CATGI_POST_INSERT_PROCESSING: general error - ' || SQLERRM;
4309: END CATGI_POST_INSERT_PROCESSING;
4310:
4311: PROCEDURE CATGI_UPDATE_CUST_ACCOUNT_ID

Line 4323: x_return_status := FND_API.G_RET_STS_SUCCESS;

4319: BEGIN
4320: UPDATE QP_PB_INPUT_HEADERS_B
4321: SET CUST_ACCOUNT_ID = p_cust_account_id
4322: WHERE pb_input_header_id = p_pb_input_header_id;
4323: x_return_status := FND_API.G_RET_STS_SUCCESS;
4324: x_return_text := '';
4325: EXCEPTION
4326: WHEN NO_DATA_FOUND THEN
4327: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4327: x_return_status := FND_API.G_RET_STS_ERROR;

4323: x_return_status := FND_API.G_RET_STS_SUCCESS;
4324: x_return_text := '';
4325: EXCEPTION
4326: WHEN NO_DATA_FOUND THEN
4327: x_return_status := FND_API.G_RET_STS_ERROR;
4328: x_return_text := 'Could not find price book ' || p_pb_input_header_id;
4329: WHEN OTHERS THEN
4330: x_return_status := FND_API.G_RET_STS_ERROR;
4331: x_return_text := 'CATGI_UPDATE_MISC: general error - ' || SQLERRM;

Line 4330: x_return_status := FND_API.G_RET_STS_ERROR;

4326: WHEN NO_DATA_FOUND THEN
4327: x_return_status := FND_API.G_RET_STS_ERROR;
4328: x_return_text := 'Could not find price book ' || p_pb_input_header_id;
4329: WHEN OTHERS THEN
4330: x_return_status := FND_API.G_RET_STS_ERROR;
4331: x_return_text := 'CATGI_UPDATE_MISC: general error - ' || SQLERRM;
4332: END CATGI_UPDATE_CUST_ACCOUNT_ID;
4333:
4334: ---------------------------------------------------------

Line 4701: x_return_status := FND_API.G_RET_STS_SUCCESS;

4697:
4698: --Close context
4699: DBMS_XMLQUERY.closeContext(l_qryCtx);
4700:
4701: x_return_status := FND_API.G_RET_STS_SUCCESS;
4702:
4703: COMMIT;
4704: EXCEPTION
4705: WHEN OTHERS

Line 4708: x_return_status := FND_API.G_RET_STS_ERROR;

4704: EXCEPTION
4705: WHEN OTHERS
4706: THEN
4707: FND_FILE.PUT_LINE( FND_FILE.LOG, 'error message:' || SQLERRM );
4708: x_return_status := FND_API.G_RET_STS_ERROR;
4709: x_return_text := 'Error in XML Generation: '||SQLERRM;
4710: END GENERATE_PRICE_BOOK_XML;
4711: /** KDURGASI **/
4712: