DBA Data[Home] [Help]

APPS.FTE_FREIGHT_PRICING_SPECIAL dependencies on STANDARD

Line 813: -- TODO : throw a standard error code which can be translated to a message.

809:
810: -- This function is used while pattern processing to check if certain unsupported patterns exist
811: -- for the selected lane function.
812: -- This function checks the pattern number and the special flags. It returns 'OK' or 'NOT_OK'.
813: -- TODO : throw a standard error code which can be translated to a message.
814: -- FUNCTION detect_function_ineligible (pattern IN NUMBER,
815: -- x_return_status OUT VARCHAR2 ) RETURN VARCHAR2;
816:
817: -- Used to check for and calculate dimensional wt. for a given top level row.

Line 1989: -- If next break point is not found should ideally proceed with one set as standard LTL

1985: END LOOP;
1986: END IF;
1987:
1988: -- Should not error out
1989: -- If next break point is not found should ideally proceed with one set as standard LTL
1990: -- For this release will throw error and a descriptive message AG 05/08
1991: /*
1992: -- if next break point is not found, the calling procedure will just send one set to QP
1993: IF (l_best_break <= 0) THEN

Line 2404: fte_freight_pricing_util.print_msg(l_log_level,'not able to find next weight break, so do not use deficit weight pricing, continue as standard LTL.');

2400: raise fte_freight_pricing_util.g_get_next_weight_break_failed;
2401: END IF;
2402: ELSE
2403: IF (l_next_weight_break is null OR l_next_weight_break <= 0) THEN
2404: fte_freight_pricing_util.print_msg(l_log_level,'not able to find next weight break, so do not use deficit weight pricing, continue as standard LTL.');
2405: ELSE
2406: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'Found applicable weight break : '||l_next_weight_break||' '||l_next_weight_break_uom);
2407: l_deficit_wt_enabled := true;
2408: END IF;

Line 3076: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'===> Running Standard LTL ');

3072: END IF;
3073:
3074: ELSE
3075:
3076: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'===> Running Standard LTL ');
3077:
3078: -- get total shipment wt. Should take care of conversions.
3079: get_total_shipment_weight (p_top_level_rows => p_top_level_rows,
3080: x_total_wt => l_total_wt,

Line 3094: -- standard LTL

3090: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_total_wt_uom = '||l_total_wt_uom);
3091: END IF;
3092:
3093:
3094: -- standard LTL
3095: -- prepare engine input
3096: -- add Total_Item_Quantity attributes
3097: -- call qp
3098: l_event_num := fte_qp_engine.G_LINE_EVENT_NUM;

Line 3197: END IF; -- standard LTL

3193: raise fte_freight_pricing_util.g_qp_price_request_failed_2;
3194: END IF;
3195: END IF;
3196:
3197: END IF; -- standard LTL
3198:
3199: post_process(
3200: p_event_num => l_event_num,
3201: p_set_num => l_set_num,

Line 3391: -- if standard rate is chosed, original rolledup line quantity is used later

3387: --fte_freight_pricing.g_rolledup_lines(l_content_id).line_quantity :=
3388: --(fte_freight_pricing.g_rolledup_lines(l_content_id).line_quantity * l_ratio_num) / l_ratio_den;
3389: --bug2803178 keep both the original and bumped rolledup line quantity
3390: -- if hundred wt rate is chosed, bumped rolledup line quantity is used later
3391: -- if standard rate is chosed, original rolledup line quantity is used later
3392: g_bumped_rolledup_lines(l_content_id).line_quantity :=
3393: (fte_freight_pricing.g_rolledup_lines(l_content_id).line_quantity * l_ratio_num) / l_ratio_den;
3394:
3395: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'bumpedup->'||g_bumped_rolledup_lines(l_content_id).line_quantity);

Line 3411: -- if standard rate is chosed, original rolledup line quantity is used later

3407: --fte_freight_pricing.g_rolledup_lines(l_content_id).line_quantity :=
3408: --(fte_freight_pricing.g_rolledup_lines(l_content_id).line_quantity * l_ratio_num) / l_ratio_den;
3409: --bug2803178 keep both the original and bumped rolledup line quantity
3410: -- if hundred wt rate is chosed, bumped rolledup line quantity is used later
3411: -- if standard rate is chosed, original rolledup line quantity is used later
3412: g_bumped_rolledup_lines(l_content_id).line_quantity :=
3413: (fte_freight_pricing.g_rolledup_lines(l_content_id).line_quantity * l_ratio_num) / l_ratio_den;
3414:
3415: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'bumpedup->'||g_bumped_rolledup_lines(l_content_id).line_quantity);

Line 3474: l_standard_price NUMBER;

3470: l_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
3471: l_attr_row fte_freight_pricing.pricing_attribute_rec_type;
3472: l_new_index NUMBER;
3473:
3474: l_standard_price NUMBER;
3475: l_hundredwt_price NUMBER;
3476: l_bumped_up_wt NUMBER;
3477: l_bumped_up_wt_uom VARCHAR2(30);
3478: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;

Line 3500: -- currently you cannot have a mix of Letter and standard parcel because they are

3496: i := p_pattern_rows.FIRST;
3497: IF (i IS NOT NULL) THEN
3498: LOOP
3499: --only SC_WB and MC_WB are ok for Parcel (except Letter - SC_CB or MC_CB )
3500: -- currently you cannot have a mix of Letter and standard parcel because they are
3501: -- separate service types. A parcel lane can have only one service type.
3502: -- fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'i='||i||' pattern='||p_pattern_rows(i).pattern_no);
3503: -- IF NOT (p_pattern_rows(i).pattern_no = FTE_FREIGHT_PRICING.G_PATTERN_2
3504: -- OR p_pattern_rows(i).pattern_no = FTE_FREIGHT_PRICING.G_PATTERN_5

Line 3571: -- create set 1 : for standard parcel rates

3567:
3568: -- check if only patterns : SC_WB and MC_WB are present. Throw error if not.
3569: -- calculate the total wt. of the shipment by summing up wts. of top level items in the same uom.
3570: -- we need to check for multi-piece only if shipment has more than 1 container
3571: -- create set 1 : for standard parcel rates
3572: -- create standard lines
3573: -- create standard pricing attributes and qualifiers
3574: -- calculate total shipment wt (here the individual packages are bumped up to the min package wts. if required )
3575: -- create set 2 (if needed) : for hundred wt

Line 3572: -- create standard lines

3568: -- check if only patterns : SC_WB and MC_WB are present. Throw error if not.
3569: -- calculate the total wt. of the shipment by summing up wts. of top level items in the same uom.
3570: -- we need to check for multi-piece only if shipment has more than 1 container
3571: -- create set 1 : for standard parcel rates
3572: -- create standard lines
3573: -- create standard pricing attributes and qualifiers
3574: -- calculate total shipment wt (here the individual packages are bumped up to the min package wts. if required )
3575: -- create set 2 (if needed) : for hundred wt
3576: -- create standard lines

Line 3573: -- create standard pricing attributes and qualifiers

3569: -- calculate the total wt. of the shipment by summing up wts. of top level items in the same uom.
3570: -- we need to check for multi-piece only if shipment has more than 1 container
3571: -- create set 1 : for standard parcel rates
3572: -- create standard lines
3573: -- create standard pricing attributes and qualifiers
3574: -- calculate total shipment wt (here the individual packages are bumped up to the min package wts. if required )
3575: -- create set 2 (if needed) : for hundred wt
3576: -- create standard lines
3577: -- need to bump up individual package wt to min wt.***

Line 3576: -- create standard lines

3572: -- create standard lines
3573: -- create standard pricing attributes and qualifiers
3574: -- calculate total shipment wt (here the individual packages are bumped up to the min package wts. if required )
3575: -- create set 2 (if needed) : for hundred wt
3576: -- create standard lines
3577: -- need to bump up individual package wt to min wt.***
3578: -- create standard pricing attributes and qualifiers
3579: -- create attributes for total shipment wt (with bump ups)
3580: -- call qp engine

Line 3578: -- create standard pricing attributes and qualifiers

3574: -- calculate total shipment wt (here the individual packages are bumped up to the min package wts. if required )
3575: -- create set 2 (if needed) : for hundred wt
3576: -- create standard lines
3577: -- need to bump up individual package wt to min wt.***
3578: -- create standard pricing attributes and qualifiers
3579: -- create attributes for total shipment wt (with bump ups)
3580: -- call qp engine
3581: -- calculate total price of set. Choose the least price i.e. delete the set which has higher price.
3582: -- call pricing objective resolution if needed

Line 3652: -- create set I ( for standard rate checking ) --

3648: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
3649: raise fte_freight_pricing_util.g_create_control_record_failed;
3650: END IF;
3651:
3652: -- create set I ( for standard rate checking ) --
3653: l_set_num := 1;
3654: i := p_pricing_engine_rows.FIRST;
3655: IF (i IS NOT NULL) THEN
3656: LOOP

Line 4032: --standard rates apply

4028: IF g_special_flags.parcel_hundredwt_flag = 'Y' THEN
4029:
4030: IF (l_op_ret_code = fte_qp_engine.G_PAR_NO_MP_PRICE) THEN
4031: --multipiece prices not found.
4032: --standard rates apply
4033: --delete any set=2 lines that may exist
4034: l_set_num :=2; --set to delete
4035: fte_qp_engine.delete_set_from_line_event( p_set_num => l_set_num,
4036: x_return_status => l_return_status);

Line 4080: x_price => l_standard_price ,

4076: -- singlepiece and multipiece rates are both found
4077: -- compare the rates and use the lower rates
4078: l_set_num :=1;
4079: fte_qp_engine.get_total_base_price(p_set_num => l_set_num,
4080: x_price => l_standard_price ,
4081: x_return_status => l_return_status);
4082:
4083: fte_freight_pricing_util.set_location(p_loc=>'after get_total_base_price for set='||l_set_num);
4084: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN

Line 4089: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_standard_price = '||l_standard_price);

4085: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4086: raise FTE_FREIGHT_PRICING_UTIL.g_total_base_price_failed;
4087: END IF;
4088: ELSE
4089: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_standard_price = '||l_standard_price);
4090: END IF;
4091:
4092: l_set_num :=2;
4093: fte_qp_engine.get_total_base_price(p_set_num => l_set_num,

Line 4106: IF (l_standard_price <= l_hundredwt_price) THEN

4102: ELSE
4103: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_hundredwt_price= '||l_hundredwt_price);
4104: END IF;
4105:
4106: IF (l_standard_price <= l_hundredwt_price) THEN
4107: -- standard rates apply. delete set 2
4108: l_set_num :=2; --set to delete
4109: fte_qp_engine.delete_set_from_line_event( p_set_num => l_set_num,
4110: x_return_status => l_return_status);

Line 4107: -- standard rates apply. delete set 2

4103: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_hundredwt_price= '||l_hundredwt_price);
4104: END IF;
4105:
4106: IF (l_standard_price <= l_hundredwt_price) THEN
4107: -- standard rates apply. delete set 2
4108: l_set_num :=2; --set to delete
4109: fte_qp_engine.delete_set_from_line_event( p_set_num => l_set_num,
4110: x_return_status => l_return_status);
4111:

Line 4297: -- create standard engine line and attributes (default stuff created by pattern matching)

4293: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4294: fte_freight_pricing_util.reset_dbg_vars;
4295: fte_freight_pricing_util.set_method(l_log_level,'process_others');
4296:
4297: -- create standard engine line and attributes (default stuff created by pattern matching)
4298: l_event_num := fte_qp_engine.G_LINE_EVENT_NUM;
4299: fte_qp_engine.create_control_record(p_event_num => l_event_num,
4300: x_return_status => l_return_status );
4301:

Line 4444: -- Is called by the main code after searching for patterns and creating standard engine rows and attributes

4440: END process_others;
4441:
4442:
4443:
4444: -- Is called by the main code after searching for patterns and creating standard engine rows and attributes
4445: -- Checks process flags.
4446: -- Depending upon the mix of conditions it calls other internal procedures to process the input lines.
4447: -- If no special conditions apply, standard code is executed (process_others). It still needs to check for min. charges
4448: -- if enabled.

Line 4447: -- If no special conditions apply, standard code is executed (process_others). It still needs to check for min. charges

4443:
4444: -- Is called by the main code after searching for patterns and creating standard engine rows and attributes
4445: -- Checks process flags.
4446: -- Depending upon the mix of conditions it calls other internal procedures to process the input lines.
4447: -- If no special conditions apply, standard code is executed (process_others). It still needs to check for min. charges
4448: -- if enabled.
4449:
4450: PROCEDURE process_special_conditions(
4451: p_pricing_control_rec IN fte_freight_pricing.pricing_control_input_rec_type,

Line 4529: -- 03/08/02 : None : need to call standard qp call + chekc for min. charge + new call if applicable

4525: raise fte_freight_pricing_util.g_process_Parcel_failed;
4526: END IF;
4527: ELSE
4528: --
4529: -- 03/08/02 : None : need to call standard qp call + chekc for min. charge + new call if applicable
4530: process_others(p_pricing_control_rec => p_pricing_control_rec,
4531: p_pricing_engine_rows => x_pricing_engine_rows,
4532: p_top_level_rows => p_top_level_rows,
4533: p_pricing_dual_instances => p_pricing_dual_instances,

Line 4796: -- create standard engine line and attributes (default stuff created by pattern matching)

4792: i := l_pricing_engine_rows.NEXT(i);
4793:
4794: END LOOP;
4795:
4796: -- create standard engine line and attributes (default stuff created by pattern matching)
4797: l_event_num := fte_qp_engine.G_LINE_EVENT_NUM;
4798: fte_qp_engine.create_control_record(p_event_num => l_event_num,
4799: x_return_status => l_return_status );
4800:

Line 5730: -- create standard engine line and attributes (default stuff created by pattern matching)

5726: END IF;
5727:
5728:
5729:
5730: -- create standard engine line and attributes (default stuff created by pattern matching)
5731: l_event_num := fte_qp_engine.G_LINE_EVENT_NUM;
5732: fte_qp_engine.create_control_record(p_event_num => l_event_num,
5733: x_return_status => l_return_status );
5734: