1: PACKAGE BODY OE_VERSION_COMP AS
2: /* $Header: OEXSCOMB.pls 120.18.12020000.4 2013/01/24 06:12:20 sujithku ship $ */
3:
4: PROCEDURE QUERY_HEADER_ROW
5: (p_header_id NUMBER,
11: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
12: BEGIN
13: oe_debug_pub.add('l_debug_level'||l_debug_level );
14: IF l_debug_level > 0 THEN
15: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_HEADER_ROW'||p_version );
16: oe_debug_pub.add('header' ||p_header_id);
17: oe_debug_pub.add('version' ||p_version);
18: oe_debug_pub.add('phase_change_flag' ||p_phase_change_flag);
19: END IF;
400: l_org_id NUMBER;
401: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
402: BEGIN
403: IF l_debug_level > 0 THEN
404: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_HEADER_TRANS_ROW');
405: oe_debug_pub.add('header' ||p_header_id);
406: oe_debug_pub.add('version' ||p_version);
407: END IF;
408:
800: g_trans_version NUMBER,
801: g_prior_phase_change_flag VARCHAR2,
802: g_curr_phase_change_flag VARCHAR2,
803: g_next_phase_change_flag VARCHAR2,
804: x_header_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.header_tbl_type)
805: IS
806: p_curr_rec OE_Order_PUB.Header_Rec_Type;
807: p_next_rec OE_Order_PUB.Header_Rec_Type;
808: p_prior_rec OE_Order_PUB.Header_Rec_Type;
891:
892: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
893: BEGIN
894:
895: oe_debug_pub.add('Entering OE_VERSION_COMP'||l_debug_level);
896: IF l_debug_level > 0 THEN
897: oe_debug_pub.add('Entering OE_VERSION_COMP.COMPARE_HEADER_VERSIONS');
898: oe_debug_pub.add('header' ||p_header_id);
899: oe_debug_pub.add('prior_version' ||p_prior_version);
893: BEGIN
894:
895: oe_debug_pub.add('Entering OE_VERSION_COMP'||l_debug_level);
896: IF l_debug_level > 0 THEN
897: oe_debug_pub.add('Entering OE_VERSION_COMP.COMPARE_HEADER_VERSIONS');
898: oe_debug_pub.add('header' ||p_header_id);
899: oe_debug_pub.add('prior_version' ||p_prior_version);
900: oe_debug_pub.add('curr_version' ||p_current_version);
901: oe_debug_pub.add('next_version' ||p_next_version);
906: oe_debug_pub.add('next phase chagne' ||g_next_phase_change_flag);
907: END IF;
908:
909: IF p_prior_version IS NOT NULL THEN
910: OE_VERSION_COMP.QUERY_HEADER_ROW(p_header_id => p_header_id,
911: p_version => p_prior_version,
912: p_phase_change_flag => g_prior_phase_change_flag,
913: x_header_rec => p_prior_rec);
914: END IF;
912: p_phase_change_flag => g_prior_phase_change_flag,
913: x_header_rec => p_prior_rec);
914: END IF;
915: IF p_current_version IS NOT NULL THEN
916: OE_VERSION_COMP.QUERY_HEADER_ROW(p_header_id => p_header_id,
917: p_version => p_current_version,
918: p_phase_change_flag => g_curr_phase_change_flag,
919: x_header_rec => p_curr_rec);
920: END IF;
920: END IF;
921: IF p_next_version = g_trans_version then
922: IF g_trans_version is not null then
923: --p_next_version := g_trans_version;
924: OE_VERSION_COMP.QUERY_HEADER_TRANS_ROW(p_header_id => p_header_id,
925: p_version => g_trans_version,
926: x_header_rec => p_next_rec);
927: END IF;
928: ELSE
926: x_header_rec => p_next_rec);
927: END IF;
928: ELSE
929: IF p_next_version IS NOT NULL THEN
930: OE_VERSION_COMP.QUERY_HEADER_ROW(p_header_id => p_header_id,
931: p_version => p_next_version,
932: p_phase_change_flag => g_next_phase_change_flag,
933: x_header_rec => p_next_rec);
934: END IF;
7187: l_org_id NUMBER;
7188: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7189: BEGIN
7190: IF l_debug_level > 0 THEN
7191: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_LINE_ROW');
7192: oe_debug_pub.add('header' ||p_header_id);
7193: oe_debug_pub.add('version' ||p_version);
7194: END IF;
7195:
7889: l_org_id NUMBER;
7890: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7891: BEGIN
7892: IF l_debug_level > 0 THEN
7893: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_LINE_TRANS_ROW', 1);
7894: oe_debug_pub.add('header' ||p_header_id);
7895: oe_debug_pub.add('version' ||p_version);
7896: END IF;
7897:
8589: g_trans_version NUMBER,
8590: g_prior_phase_change_flag VARCHAR2,
8591: g_curr_phase_change_flag VARCHAR2,
8592: g_next_phase_change_flag VARCHAR2,
8593: x_line_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.line_tbl_type,
8594: p_total_lines NUMBER,
8595: x_line_number VARCHAR2)
8596: IS
8597: p_curr_rec OE_Order_PUB.line_rec_type;
8710: oe_debug_pub.add('prior version' ||p_prior_version);
8711: END IF;
8712: /***************************************/
8713: IF p_prior_version IS NOT NULL THEN
8714: OE_VERSION_COMP.QUERY_LINE_ROW(p_header_id => p_header_id,
8715: p_line_id => p_line_id,
8716: p_version => p_prior_version,
8717: p_phase_change_flag => g_prior_phase_change_flag,
8718: x_line_rec => p_prior_rec);
8727: oe_debug_pub.add('current version' ||p_current_version);
8728: END IF;
8729:
8730: IF p_current_version IS NOT NULL THEN
8731: OE_VERSION_COMP.QUERY_LINE_ROW(p_header_id => p_header_id,
8732: p_line_id => p_line_id,
8733: p_version => p_current_version,
8734: p_phase_change_flag => g_curr_phase_change_flag,
8735: x_line_rec => p_curr_rec);
8747: END IF;
8748: IF p_next_version = g_trans_version then
8749: IF g_trans_version is not null then
8750: --p_next_version := g_trans_version;
8751: OE_VERSION_COMP.QUERY_LINE_TRANS_ROW(p_header_id => p_header_id,
8752: p_line_id => p_line_id,
8753: p_version => g_trans_version,
8754: x_line_rec => p_next_rec);
8755: END IF;
8760: p_next_rec_exists := 'Y';
8761: END IF;
8762: ELSE
8763: IF p_next_version IS NOT NULL THEN
8764: OE_VERSION_COMP.QUERY_LINE_ROW(p_header_id => p_header_id,
8765: p_line_id => p_line_id,
8766: p_version => p_next_version,
8767: p_phase_change_flag => g_next_phase_change_flag,
8768: x_line_rec => p_next_rec);
18618: oe_debug_pub.add('******AFTER COMPARING ATTRIBUTES*************');
18619: oe_debug_pub.add('current ind '|| ind);
18620: END IF;
18621: IF l_debug_level > 0 THEN
18622: oe_debug_pub.add(' Exiting OE_VERSION_COMP.Compare_Line_Attributes ');
18623: END IF;
18624: /*
18625: j := 0;
18626: dbms_output.put_line('No of records'||x_line_changed_attr_tbl.count);
18642: g_trans_version NUMBER,
18643: g_prior_phase_change_flag VARCHAR2,
18644: g_curr_phase_change_flag VARCHAR2,
18645: g_next_phase_change_flag VARCHAR2,
18646: x_line_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.line_tbl_type)
18647: IS
18648:
18649: l_line_id NUMBER;
18650: CURSOR C_get_lines(p_header_id IN NUMBER,p_prior_version IN NUMBER, p_current_version IN NUMBER, p_next_version IN NUMBER) IS
18797: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
18798: BEGIN
18799:
18800: IF l_debug_level > 0 THEN
18801: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_HEADER_SC_ROW', 1);
18802: oe_debug_pub.add('header' ||p_header_id);
18803: oe_debug_pub.add('sales credit' ||p_sales_credit_id);
18804: oe_debug_pub.add('version' ||p_version);
18805: END IF;
18914: l_phase_change_flag VARCHAR2(1);
18915: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
18916: BEGIN
18917: IF l_debug_level > 0 THEN
18918: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_HEADER_SC_TRANS_ROW');
18919: oe_debug_pub.add('header' ||p_header_id);
18920: oe_debug_pub.add('version' ||p_version);
18921: END IF;
18922:
19025: g_trans_version NUMBER,
19026: g_prior_phase_change_flag VARCHAR2,
19027: g_curr_phase_change_flag VARCHAR2,
19028: g_next_phase_change_flag VARCHAR2,
19029: x_header_sc_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.header_sc_tbl_type,
19030: p_total_lines NUMBER)
19031: IS
19032: p_curr_rec OE_Order_PUB.Header_scredit_Rec_Type;
19033: p_next_rec OE_Order_PUB.Header_scredit_Rec_Type;
19077: oe_debug_pub.add('prior version' ||p_prior_version);
19078: END IF;
19079:
19080: IF p_prior_version IS NOT NULL THEN
19081: OE_VERSION_COMP.QUERY_HEADER_SC_ROW(p_header_id => p_header_id,
19082: p_sales_credit_id => p_sales_credit_id,
19083: p_version => p_prior_version,
19084: p_phase_change_flag => g_prior_phase_change_flag,
19085: x_header_scredit_rec => p_prior_rec);
19094: oe_debug_pub.add('current version' ||p_current_version);
19095: END IF;
19096:
19097: IF p_current_version IS NOT NULL THEN
19098: OE_VERSION_COMP.QUERY_HEADER_SC_ROW(p_header_id => p_header_id,
19099: p_sales_credit_id => p_sales_credit_id,
19100: p_version => p_current_version,
19101: p_phase_change_flag => g_curr_phase_change_flag,
19102: x_header_scredit_rec => p_curr_rec);
19114: END IF;
19115:
19116: IF p_next_version = g_trans_version then
19117: IF g_trans_version is not null then
19118: OE_VERSION_COMP.QUERY_HEADER_SC_TRANS_ROW(p_header_id => p_header_id,
19119: p_sales_credit_id => p_sales_credit_id,
19120: p_version => p_next_version,
19121: x_header_scredit_rec => p_next_rec);
19122: END IF;
19127: p_next_rec_exists := 'Y';
19128: END IF;
19129: ELSE
19130: IF p_next_version IS NOT NULL THEN
19131: OE_VERSION_COMP.QUERY_HEADER_SC_ROW(p_header_id => p_header_id,
19132: p_sales_credit_id => p_sales_credit_id,
19133: p_version => p_next_version,
19134: p_phase_change_flag => g_next_phase_change_flag,
19135: x_header_scredit_rec => p_next_rec);
20066: END IF;
20067:
20068: END IF; /* line_id not null */
20069: IF l_debug_level > 0 THEN
20070: oe_debug_pub.add(' Exiting OE_VERSION_COMP.Compare_header_sc_Attributes ');
20071: END IF;
20072: /*
20073: j := 0;
20074: dbms_output.put_line('No of resales dreditcords'||x_header_sc_changed_attr_tbl.count);
20092: g_trans_version NUMBER,
20093: g_prior_phase_change_flag VARCHAR2,
20094: g_curr_phase_change_flag VARCHAR2,
20095: g_next_phase_change_flag VARCHAR2,
20096: x_header_sc_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.header_sc_tbl_type)
20097: IS
20098:
20099: CURSOR C_get_sales_credits(p_header_id IN NUMBER,p_prior_version IN NUMBER, p_current_version IN NUMBER, p_next_version IN NUMBER) IS
20100: SELECT distinct sales_credit_id
20223: l_org_id NUMBER;
20224: l_phase_change_flag VARCHAR2(1);
20225: BEGIN
20226:
20227: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_line_SC_ROW', 1);
20228:
20229: l_org_id := OE_GLOBALS.G_ORG_ID;
20230:
20231: IF l_org_id IS NULL THEN
20336: l_phase_change_flag VARCHAR2(1);
20337: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20338: BEGIN
20339: IF l_debug_level > 0 THEN
20340: oe_debug_pub.add('Entering OE_VERSION_COMP.QUERY_line_SC_TRANS_ROW');
20341: oe_debug_pub.add('header' ||p_header_id);
20342: oe_debug_pub.add('version' ||p_version);
20343: END IF;
20344:
20448: g_trans_version NUMBER,
20449: g_prior_phase_change_flag VARCHAR2,
20450: g_curr_phase_change_flag VARCHAR2,
20451: g_next_phase_change_flag VARCHAR2,
20452: x_line_sc_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.line_sc_tbl_type,
20453: p_total_lines NUMBER,
20454: x_line_number VARCHAR2)
20455: IS
20456: p_curr_rec OE_Order_PUB.line_scredit_Rec_Type;
20501: oe_debug_pub.add('prior version' ||p_prior_version);
20502: END IF;
20503:
20504: IF p_prior_version IS NOT NULL THEN
20505: OE_VERSION_COMP.QUERY_line_SC_ROW(p_header_id => p_header_id,
20506: p_sales_credit_id => p_sales_credit_id,
20507: p_version => p_prior_version,
20508: p_phase_change_flag => g_prior_phase_change_flag,
20509: x_line_scredit_rec => p_prior_rec);
20518: oe_debug_pub.add('current version' ||p_current_version);
20519: END IF;
20520:
20521: IF p_current_version IS NOT NULL THEN
20522: OE_VERSION_COMP.QUERY_line_SC_ROW(p_header_id => p_header_id,
20523: p_sales_credit_id => p_sales_credit_id,
20524: p_version => p_current_version,
20525: p_phase_change_flag => g_curr_phase_change_flag,
20526: x_line_scredit_rec => p_curr_rec);
20538: END IF;
20539:
20540: IF p_next_version = g_trans_version then
20541: IF g_trans_version is not null then
20542: OE_VERSION_COMP.QUERY_line_SC_TRANS_ROW(p_header_id => p_header_id,
20543: p_sales_credit_id => p_sales_credit_id,
20544: p_version => p_next_version,
20545: x_line_scredit_rec => p_next_rec);
20546: END IF;
20551: p_next_rec_exists := 'Y';
20552: END IF;
20553: ELSE
20554: IF p_next_version IS NOT NULL THEN
20555: OE_VERSION_COMP.QUERY_line_SC_ROW(p_header_id => p_header_id,
20556: p_sales_credit_id => p_sales_credit_id,
20557: p_version => p_next_version,
20558: p_phase_change_flag => g_prior_phase_change_flag,
20559: x_line_scredit_rec => p_next_rec);
21541: oe_debug_pub.add('******AFTER COMPARING ATTRIBUTES*************');
21542: oe_debug_pub.add('current ind '|| ind);
21543: END IF;
21544: IF l_debug_level > 0 THEN
21545: oe_debug_pub.add(' Exiting OE_VERSION_COMP.Compare_line_sc_Attributes ');
21546: END IF;
21547: /*
21548: j := 0;
21549: dbms_output.put_line('No of resales dreditcords'||x_line_sc_changed_attr_tbl.count);
21567: g_trans_version NUMBER,
21568: g_prior_phase_change_flag VARCHAR2,
21569: g_curr_phase_change_flag VARCHAR2,
21570: g_next_phase_change_flag VARCHAR2,
21571: x_line_sc_changed_attr_tbl IN OUT NOCOPY OE_VERSION_COMP.line_sc_tbl_type)
21572: IS
21573:
21574: CURSOR C_get_sales_credits(p_header_id IN NUMBER,p_prior_version IN NUMBER, p_current_version IN NUMBER, p_next_version IN NUMBER) IS
21575: SELECT distinct sales_credit_id,line_id
21774:
21775: BEGIN
21776:
21777: IF l_debug_level > 0 THEN
21778: oe_debug_pub.add('Entering OE_VERSION_COMP.Card_Equal. ', 3);
21779: END IF;
21780:
21781: IF p_attribute_name = 'CREDIT_CARD_HOLDER_NAME' THEN
21782: -- instrument_id stores the card_history_change_id
22100: Return Null;
22101: END get_dff_seg_prompt;
22102: --bug 4302049}
22103:
22104: END OE_VERSION_COMP;