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.RLM_CUM_SV dependencies on RLM_CUM_SV

Line 1: PACKAGE BODY RLM_CUM_SV AS

1: PACKAGE BODY RLM_CUM_SV AS
2: /* $Header: RLMCUMMB.pls 120.5.12010000.2 2008/07/30 12:54:08 sunilku ship $ */
3:
4: --
5: l_DEBUG NUMBER := NVL(fnd_profile.value('RLM_DEBUG_MODE'),-1);

Line 7: /=============================== rlm_cum_sv ===============================/

3:
4: --
5: l_DEBUG NUMBER := NVL(fnd_profile.value('RLM_DEBUG_MODE'),-1);
6: --
7: /*=============================== rlm_cum_sv ===============================*/
8:
9: /*============================================================================
10:
11: PROCEDURE NAME: CalculateCumKey

Line 16: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,

12:
13: =============================================================================*/
14:
15: PROCEDURE CalculateCumKey (
16: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
17: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)
18: IS
19: v_rlm_setup_terms_record rlm_setup_terms_sv.setup_terms_rec_typ;
20: v_cum_control_code rlm_cust_shipto_terms.cum_control_code%TYPE;

Line 17: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)

13: =============================================================================*/
14:
15: PROCEDURE CalculateCumKey (
16: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
17: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)
18: IS
19: v_rlm_setup_terms_record rlm_setup_terms_sv.setup_terms_rec_typ;
20: v_cum_control_code rlm_cust_shipto_terms.cum_control_code%TYPE;
21: v_cum_org_level_code rlm_cust_shipto_terms.cum_org_level_code%TYPE;

Line 225: rlm_cum_sv.GetLatestCum(x_cum_key_record,

221: AND (NVL(v_rlm_setup_terms_record.cum_control_code,'NO_CUM')
222: IN ('CUM_BY_DATE_PO','CUM_BY_DATE_RECORD_YEAR','CUM_BY_DATE_ONLY'))
223: THEN
224: --
225: rlm_cum_sv.GetLatestCum(x_cum_key_record,
226: v_rlm_setup_terms_record,
227: x_cum_record);
228: --
229: IF x_cum_record.record_return_status = FALSE THEN

Line 851: x_new_ship_count IN RLM_CUM_SV.t_new_ship_count := RLM_CUM_SV.g_miss_new_ship_count,

847:
848: =============================================================================*/
849:
850: PROCEDURE CalculateSupplierCum (
851: x_new_ship_count IN RLM_CUM_SV.t_new_ship_count := RLM_CUM_SV.g_miss_new_ship_count,
852: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
853: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)
854: IS
855: --

Line 852: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,

848: =============================================================================*/
849:
850: PROCEDURE CalculateSupplierCum (
851: x_new_ship_count IN RLM_CUM_SV.t_new_ship_count := RLM_CUM_SV.g_miss_new_ship_count,
852: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
853: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)
854: IS
855: --
856: E_UNEXPECTED EXCEPTION;

Line 853: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)

849:
850: PROCEDURE CalculateSupplierCum (
851: x_new_ship_count IN RLM_CUM_SV.t_new_ship_count := RLM_CUM_SV.g_miss_new_ship_count,
852: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
853: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type)
854: IS
855: --
856: E_UNEXPECTED EXCEPTION;
857: v_terms_level VARCHAR2(15) DEFAULT NULL;

Line 3007: PARAMETERS: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type

3003:
3004: DESCRIPTION: This procedure returns the tpcontext using CUM Key
3005: Record
3006:
3007: PARAMETERS: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type
3008: x_customer_number OUT NOCOPY VARCHAR2
3009: x_ship_to_ece_locn_code OUT NOCOPY VARCHAR2
3010: x_bill_to_ece_locn_code OUT NOCOPY VARCHAR2
3011: x_inter_ship_to_ece_locn_code OUT NOCOPY VARCHAR2

Line 3016: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,

3012: x_tp_group_code OUT NOCOPY VARCHAR2
3013:
3014: ============================================================================*/
3015: PROCEDURE GetTPContext(
3016: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
3017: x_customer_number OUT NOCOPY VARCHAR2,
3018: x_ship_to_ece_locn_code OUT NOCOPY VARCHAR2,
3019: x_bill_to_ece_locn_code OUT NOCOPY VARCHAR2,
3020: x_inter_ship_to_ece_locn_code OUT NOCOPY VARCHAR2,

Line 3416: v_old_cum_counter RLM_CUM_SV.t_new_ship_count;

3412: v_num NUMBER;
3413: v_start_num NUMBER DEFAULT 0;
3414: v_end_num NUMBER DEFAULT 0;
3415: v_cum_key_record cum_key_attrib_rec_type;
3416: v_old_cum_counter RLM_CUM_SV.t_new_ship_count;
3417: p_ship_from_org_id NUMBER DEFAULT NULL;
3418: p_ship_to_org_id NUMBER DEFAULT NULL;
3419: p_intmed_ship_to_org_id NUMBER DEFAULT NULL;
3420: p_bill_to_org_id NUMBER DEFAULT NULL;

Line 3440: v_old_cum_records RLM_CUM_SV.t_cums;

3436: v_trail4 VARCHAR2(5000);
3437: v_trail5 VARCHAR2(5000);
3438: v_trail6 VARCHAR2(5000);
3439: --v_old_cum_table t_old_cum;
3440: v_old_cum_records RLM_CUM_SV.t_cums;
3441: v_tmp_old_table t_old_cum;
3442: ----
3443: ---- Used by Process Order API
3444: --

Line 3453: v_cum_records RLM_CUM_SV.t_cums;

3449: v_msg_data VARCHAR2(2000);
3450: v_adjustment_ids t_new_ship_count;
3451: v_adjustment_date DATE DEFAULT NULL;
3452: v_header_id NUMBER;
3453: v_cum_records RLM_CUM_SV.t_cums;
3454: v_msg_count NUMBER;
3455: adj_qty NUMBER DEFAULT 0;
3456: l_file_val VARCHAR2(80);
3457: v_om_dbg_dir VARCHAR2(80);

Line 3688: rlm_cum_sv.GetCums(v_rlm_setup_terms_rec

3684: v_cum_key_record.ship_to_address_id := v_ship_to_address_id;
3685: v_cum_key_record.bill_to_address_id := v_bill_to_address_id;
3686:
3687:
3688: rlm_cum_sv.GetCums(v_rlm_setup_terms_rec
3689: ,v_terms_level
3690: ,v_cum_key_record
3691: ,x_transaction_start_date
3692: ,v_end_date_time

Line 3826: rlm_cum_sv.GetShippLines(

3822: then delete this table
3823: */
3824: v_tmp_old_table(v_index2) := p_cum_key_id;
3825: --
3826: rlm_cum_sv.GetShippLines(
3827: x_cum_key_id => p_cum_key_id,
3828: x_ship_from_org_id => p_ship_from_org_id,
3829: x_ship_to_org_id => p_ship_to_org_id,
3830: x_intmed_ship_to_org_id => p_intmed_ship_to_org_id,

Line 3867: rlm_cum_sv.GetShippLines(

3863: --new cum correctly.
3864: --
3865: v_end_date_time := SYSDATE;
3866: --
3867: rlm_cum_sv.GetShippLines(
3868: x_cum_key_id => p_cum_key_id,
3869: x_ship_from_org_id => p_ship_from_org_id,
3870: x_ship_to_org_id => p_ship_to_org_id,
3871: x_intmed_ship_to_org_id => p_intmed_ship_to_org_id,

Line 3881: rlm_cum_sv.quicksort(g_cum_oe_lines.FIRST,

3877: x_index => v_shipLineCounter);
3878: --
3879: IF g_cum_oe_lines.COUNT > 0 THEN
3880: --
3881: rlm_cum_sv.quicksort(g_cum_oe_lines.FIRST,
3882: g_cum_oe_lines.LAST,
3883: C_cum_oe_lines);
3884: --
3885: END IF;

Line 3891: rlm_cum_sv.SetSupplierCum(

3887: -- Need to set called_by_reset_cum to 'Y'
3888: v_cum_key_record.called_by_reset_cum := 'Y';
3889: --
3890:
3891: rlm_cum_sv.SetSupplierCum(
3892: x_index => v_index,
3893: x_cum_key_record => v_cum_key_record,
3894: x_transaction_start_date => x_transaction_start_date,
3895: x_cum_records => v_cum_records,

Line 4014: rlm_cum_sv.quicksort(g_oe_tmp_line_tbl.FIRST,

4010: RAISE e_NoShipment;
4011: --
4012: END IF;
4013: --
4014: rlm_cum_sv.quicksort(g_oe_tmp_line_tbl.FIRST,
4015: g_oe_tmp_line_tbl.LAST,
4016: RLM_CUM_SV.C_line_table_type);
4017: --
4018: v_index3 := g_oe_tmp_line_tbl.FIRST;

Line 4016: RLM_CUM_SV.C_line_table_type);

4012: END IF;
4013: --
4014: rlm_cum_sv.quicksort(g_oe_tmp_line_tbl.FIRST,
4015: g_oe_tmp_line_tbl.LAST,
4016: RLM_CUM_SV.C_line_table_type);
4017: --
4018: v_index3 := g_oe_tmp_line_tbl.FIRST;
4019: --
4020: IF (l_debug <> -1) THEN

Line 4741: x_cum_key_record IN OUT NOCOPY rlm_cum_sv.cum_key_attrib_rec_type,

4737:
4738: PROCEDURE GetCums (
4739: x_rlm_setup_terms_record IN rlm_setup_terms_sv.setup_terms_rec_typ,
4740: x_terms_level IN VARCHAR2,
4741: x_cum_key_record IN OUT NOCOPY rlm_cum_sv.cum_key_attrib_rec_type,
4742: x_transaction_start_date IN DATE,
4743: x_transaction_end_date IN DATE ,
4744: x_ship_from_org_id IN NUMBER,
4745: x_ship_to_org_id IN NUMBER,

Line 4748: x_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,

4744: x_ship_from_org_id IN NUMBER,
4745: x_ship_to_org_id IN NUMBER,
4746: x_intmed_ship_to_org_id IN NUMBER,
4747: x_bill_to_org_id IN NUMBER,
4748: x_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,
4749: x_old_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,
4750: x_counter OUT NOCOPY RLM_CUM_SV.t_new_ship_count,
4751: x_return_status OUT NOCOPY NUMBER)
4752: IS

Line 4749: x_old_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,

4745: x_ship_to_org_id IN NUMBER,
4746: x_intmed_ship_to_org_id IN NUMBER,
4747: x_bill_to_org_id IN NUMBER,
4748: x_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,
4749: x_old_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,
4750: x_counter OUT NOCOPY RLM_CUM_SV.t_new_ship_count,
4751: x_return_status OUT NOCOPY NUMBER)
4752: IS
4753: v_cum_control_code rlm_cust_shipto_terms.cum_control_code%TYPE;

Line 4750: x_counter OUT NOCOPY RLM_CUM_SV.t_new_ship_count,

4746: x_intmed_ship_to_org_id IN NUMBER,
4747: x_bill_to_org_id IN NUMBER,
4748: x_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,
4749: x_old_cum_records OUT NOCOPY RLM_CUM_SV.t_cums,
4750: x_counter OUT NOCOPY RLM_CUM_SV.t_new_ship_count,
4751: x_return_status OUT NOCOPY NUMBER)
4752: IS
4753: v_cum_control_code rlm_cust_shipto_terms.cum_control_code%TYPE;
4754: v_cum_org_level_code rlm_cust_shipto_terms.cum_org_level_code%TYPE;

Line 4755: v_tmp_cum_record rlm_cum_sv.cum_rec_type;

4751: x_return_status OUT NOCOPY NUMBER)
4752: IS
4753: v_cum_control_code rlm_cust_shipto_terms.cum_control_code%TYPE;
4754: v_cum_org_level_code rlm_cust_shipto_terms.cum_org_level_code%TYPE;
4755: v_tmp_cum_record rlm_cum_sv.cum_rec_type;
4756: v_address_id NUMBER;
4757: v_cum_rec_ctr NUMBER DEFAULT 0;
4758: v_old_cum_ctr NUMBER DEFAULT 0;
4759: v_counter_ctr NUMBER DEFAULT 0;

Line 5428: ** x_cum_records IN OUT NOCOPY RLM_CUM_SV.t_cums

5424: This is the index for table x_cum_records
5425: ** x_cum_key_record IN cum_key_attrib_rec_type
5426: contains information about address ids
5427: ** x_transaction_start_date IN DATE
5428: ** x_cum_records IN OUT NOCOPY RLM_CUM_SV.t_cums
5429: Using the x_index we get the new cum record which needs to be rest
5430: ** x_return_status OUT NOCOPY BOOLEAN
5431: This will return FALSE if unexpected error happens
5432: ** x_counter IN OUT NOCOPY NUMBER

Line 5441: x_cum_records IN OUT NOCOPY RLM_CUM_SV.t_cums,

5437: PROCEDURE SetSupplierCum (
5438: x_index IN NUMBER,
5439: x_cum_key_record IN cum_key_attrib_rec_type,
5440: x_transaction_start_date IN DATE,
5441: x_cum_records IN OUT NOCOPY RLM_CUM_SV.t_cums,
5442: x_return_status OUT NOCOPY BOOLEAN,
5443: x_counter IN OUT NOCOPY NUMBER,
5444: x_adjustment_date IN OUT NOCOPY DATE )
5445: IS

Line 5679: IF sortType = RLM_CUM_SV.C_line_table_type THEN

5675: low := First;
5676: high := Last;
5677:
5678: /* Select an element from the middle. */
5679: IF sortType = RLM_CUM_SV.C_line_table_type THEN
5680: pivot_n := g_oe_tmp_line_tbl(TRUNC((First + Last) / 2)).header_id;
5681: LOOP
5682: /* Find lowest element that is >= Pivot */
5683: WHILE g_oe_tmp_line_tbl(Low).header_id < Pivot_n LOOP

Line 5733: rlm_message_sv.sql_error('rlm_cum_sv.QuickSort', v_Progress);

5729: --
5730: EXCEPTION
5731:
5732: WHEN OTHERS THEN
5733: rlm_message_sv.sql_error('rlm_cum_sv.QuickSort', v_Progress);
5734: --
5735: IF (l_debug <> -1) THEN
5736: rlm_core_sv.dlog(C_DEBUG,'progress',v_Progress);
5737: rlm_core_sv.dpop(C_DEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));

Line 5755: T2 rlm_cum_sv.cum_oe_lines_type;

5751: sortType IN NUMBER)
5752: IS
5753:
5754: T oe_order_pub.Line_Rec_Type ;
5755: T2 rlm_cum_sv.cum_oe_lines_type;
5756: v_Progress VARCHAR2(3) := '010';
5757:
5758: BEGIN
5759:

Line 5762: IF sortType = rlm_cum_sv.C_line_table_type THEN

5758: BEGIN
5759:
5760: -- rlm_core_sv.dpush(C_SDEBUG,'Swap');
5761:
5762: IF sortType = rlm_cum_sv.C_line_table_type THEN
5763: T := g_oe_tmp_line_tbl(i);
5764: g_oe_tmp_line_tbl(i) := g_oe_tmp_line_tbl(j);
5765: g_oe_tmp_line_tbl(j) := T;
5766: ELSE

Line 5777: --rlm_message_sv.sql_error('rlm_cum_sv.Swap', v_Progress);

5773:
5774: EXCEPTION
5775:
5776: WHEN OTHERS THEN
5777: --rlm_message_sv.sql_error('rlm_cum_sv.Swap', v_Progress);
5778: --rlm_core_sv.dlog(C_DEBUG,'progress',v_Progress);
5779: --rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
5780: raise;
5781:

Line 5899: PROCEDURE UpdateOldKey(x_old_cum_records IN OUT NOCOPY RLM_CUM_SV.t_cums,

5895: PARAMETERS: x_old_cum_table IN t_old_cum
5896:
5897: ============================================================================*/
5898: --{
5899: PROCEDURE UpdateOldKey(x_old_cum_records IN OUT NOCOPY RLM_CUM_SV.t_cums,
5900: x_shipment_rule_code IN VARCHAR2,
5901: x_cutoff_time IN DATE,
5902: x_cum_key_record IN OUT NOCOPY cum_key_attrib_rec_type,
5903: x_ship_from_org_id IN NUMBER,

Line 5961: rlm_cum_sv.GetShippLines(

5957: IF (l_debug <> -1) THEN
5958: rlm_core_sv.dlog(C_DEBUG,'inventory_item_id', x_cum_key_record.inventory_item_id);
5959: END IF;
5960: --
5961: rlm_cum_sv.GetShippLines(
5962: x_cum_key_id => x_old_cum_records(cum_records_counter).cum_key_id,
5963: x_ship_from_org_id => x_ship_from_org_id,
5964: x_ship_to_org_id => x_ship_to_org_id,
5965: x_intmed_ship_to_org_id => x_intmed_ship_to_org_id,

Line 5975: rlm_cum_sv.quicksort(g_cum_oe_lines.FIRST,

5971: x_index => v_index);
5972: --
5973: IF g_cum_oe_lines.COUNT > 0 THEN
5974: --
5975: rlm_cum_sv.quicksort(g_cum_oe_lines.FIRST,
5976: g_cum_oe_lines.LAST,
5977: C_cum_oe_lines);
5978: --
5979: END IF;

Line 5996: rlm_cum_sv.SetSupplierCum(

5992: -- Need to set called_by_reset_cum to 'Y'
5993: x_cum_key_record.called_by_reset_cum := 'Y';
5994: --
5995:
5996: rlm_cum_sv.SetSupplierCum(
5997: x_index => cum_records_counter,
5998: x_cum_key_record => x_cum_key_record,
5999: x_transaction_start_date => NULL,
6000: x_cum_records => x_old_cum_records,

Line 6080: rlm_cum_sv.quicksort(g_oe_tmp_line_tbl.FIRST,

6076: RAISE e_NoShipment;
6077: --
6078: END IF;
6079: --
6080: rlm_cum_sv.quicksort(g_oe_tmp_line_tbl.FIRST,
6081: g_oe_tmp_line_tbl.LAST,
6082: RLM_CUM_SV.C_line_table_type);
6083: --
6084: v_tmp_line_idx := g_oe_tmp_line_tbl.FIRST;

Line 6082: RLM_CUM_SV.C_line_table_type);

6078: END IF;
6079: --
6080: rlm_cum_sv.quicksort(g_oe_tmp_line_tbl.FIRST,
6081: g_oe_tmp_line_tbl.LAST,
6082: RLM_CUM_SV.C_line_table_type);
6083: --
6084: v_tmp_line_idx := g_oe_tmp_line_tbl.FIRST;
6085: --
6086: IF (l_debug <> -1) THEN

Line 6513: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,

6509:
6510:
6511:
6512: PROCEDURE GetLatestCum (
6513: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
6514: x_rlm_setup_terms_record IN rlm_setup_terms_sv.setup_terms_rec_typ,
6515: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type,
6516: x_called_from_vd IN NUMBER)
6517: IS

Line 6515: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type,

6511:
6512: PROCEDURE GetLatestCum (
6513: x_cum_key_record IN RLM_CUM_SV.cum_key_attrib_rec_type,
6514: x_rlm_setup_terms_record IN rlm_setup_terms_sv.setup_terms_rec_typ,
6515: x_cum_record IN OUT NOCOPY RLM_CUM_SV.cum_rec_type,
6516: x_called_from_vd IN NUMBER)
6517: IS
6518: v_cum_org_level_code rlm_cust_shipto_terms.cum_org_level_code%TYPE;
6519: p_ship_from_org_id NUMBER DEFAULT NULL;

Line 6560: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD

6556: AND NVL(bill_to_address_id,0)= NVL(p_bill_to_address_id,0)
6557: AND NVL(customer_item_id,0) = NVL(p_customer_item_id,0)
6558: AND cum_start_date IS NOT NULL
6559: AND (cum_start_date < SYSDATE
6560: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD
6561: )
6562: AND purchase_order_number IS NULL
6563: AND cust_record_year IS NULL
6564: AND NVL(inactive_flag,'N') = 'N'

Line 6591: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD

6587: AND NVL(bill_to_address_id,0) = NVL(p_bill_to_address_id,0)
6588: AND NVL(customer_item_id,0)= NVL(p_customer_item_id,0)
6589: AND cum_start_date IS NOT NULL
6590: AND (cum_start_date < SYSDATE
6591: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD
6592: )
6593: AND purchase_order_number IS NULL
6594: AND cust_record_year IS NULL
6595: AND NVL(inactive_flag,'N') = 'N'

Line 6622: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD

6618: AND NVL(bill_to_address_id,0)= NVL(p_bill_to_address_id,0)
6619: AND NVL(customer_item_id,0)= NVL(p_customer_item_id,0)
6620: AND cum_start_date IS NOT NULL
6621: AND (cum_start_date < SYSDATE
6622: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD
6623: )
6624: AND purchase_order_number IS NULL
6625: AND cust_record_year IS NOT NULL
6626: AND (cust_record_year = p_cust_record_year

Line 6656: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD

6652: AND NVL(bill_to_address_id,0) = NVL(p_bill_to_address_id,0)
6653: AND NVL(customer_item_id,0) = NVL(p_customer_item_id,0)
6654: AND cum_start_date IS NOT NULL
6655: AND (cum_start_date < SYSDATE
6656: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD
6657: )
6658: AND purchase_order_number IS NULL
6659: AND cust_record_year IS NOT NULL
6660: AND (cust_record_year = p_cust_record_year

Line 6690: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD

6686: AND NVL(bill_to_address_id,0)= NVL(p_bill_to_address_id,0)
6687: AND NVL(customer_item_id,0) = NVL(p_customer_item_id,0)
6688: AND cum_start_date IS NOT NULL
6689: AND (cum_start_date < SYSDATE
6690: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD
6691: )
6692: AND purchase_order_number IS NOT NULL
6693: AND (purchase_order_number = p_purchase_order_number
6694: OR p_purchase_order_number IS NULL

Line 6724: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD

6720: AND NVL(bill_to_address_id,0) = NVL(p_bill_to_address_id,0)
6721: AND NVL(customer_item_id,0)= NVL(p_customer_item_id,0)
6722: AND cum_start_date IS NOT NULL
6723: AND (cum_start_date < SYSDATE
6724: OR x_called_from_vd = rlm_cum_sv.k_CalledByVD
6725: )
6726:
6727: AND purchase_order_number IS NOT NULL
6728: AND (purchase_order_number = p_purchase_order_number

Line 7036: IF (x_called_from_vd = rlm_cum_sv.k_CalledByVD )

7032: IF x_cum_record.cum_key_id IS NOT NULL THEN
7033: --
7034: x_cum_record.record_return_status := TRUE;
7035: --
7036: IF (x_called_from_vd = rlm_cum_sv.k_CalledByVD )
7037: AND NVL(x_cum_record.cum_start_date,SYSDATE) > SYSDATE
7038: THEN
7039: --
7040: x_cum_record.msg_name := 'RLM_CUM_START_FUTURE';

Line 7172: rlm_message_sv.sql_error('Locking Cum Key Failed', 'rlm_cum_sv.LockCumKey');

7168: RETURN(FALSE);
7169: --
7170: WHEN OTHERS THEN
7171: --
7172: rlm_message_sv.sql_error('Locking Cum Key Failed', 'rlm_cum_sv.LockCumKey');
7173: --
7174: IF (l_debug <> -1) THEN
7175: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
7176: END IF;

Line 7183: END RLM_CUM_SV;

7179: --
7180: END LockCumKey;
7181:
7182:
7183: END RLM_CUM_SV;