8: -- Procedure Clear_Dependent_Attr
9:
10: PROCEDURE Clear_Dependent_Attr
11: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
12: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
14: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
16: )
9:
10: PROCEDURE Clear_Dependent_Attr
11: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
12: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
14: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
16: )
17: IS
10: PROCEDURE Clear_Dependent_Attr
11: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
12: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
14: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
16: )
17: IS
18: l_index NUMBER := 0;
11: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
12: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
14: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
16: )
17: IS
18: l_index NUMBER := 0;
19: l_src_attr_tbl QP_GLOBALS.NUMBER_Tbl_Type;
424:
425: -- Procedure Apply_Attribute_Changes
426:
427: PROCEDURE Apply_Attribute_Changes
428: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
429: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
430: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
431: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
432: )
425: -- Procedure Apply_Attribute_Changes
426:
427: PROCEDURE Apply_Attribute_Changes
428: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
429: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
430: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
431: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
432: )
433: IS
426:
427: PROCEDURE Apply_Attribute_Changes
428: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
429: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
430: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
431: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
432: )
433: IS
434: x_datatype VARCHAR2(1);
427: PROCEDURE Apply_Attribute_Changes
428: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
429: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
430: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
431: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
432: )
433: IS
434: x_datatype VARCHAR2(1);
435: x_context_flag VARCHAR2(1);
877:
878: -- Function Complete_Record
879:
880: FUNCTION Complete_Record
881: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
882: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
883: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
884: IS
885: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
878: -- Function Complete_Record
879:
880: FUNCTION Complete_Record
881: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
882: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
883: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
884: IS
885: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
886: BEGIN
879:
880: FUNCTION Complete_Record
881: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
882: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
883: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
884: IS
885: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
886: BEGIN
887:
881: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
882: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
883: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
884: IS
885: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
886: BEGIN
887:
888: oe_debug_pub.add('BEGIN Complete_Record in QPXUPRAB');
889:
1069:
1070: -- Function Convert_Miss_To_Null
1071:
1072: FUNCTION Convert_Miss_To_Null
1073: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1074: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1075: IS
1076: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
1077: BEGIN
1070: -- Function Convert_Miss_To_Null
1071:
1072: FUNCTION Convert_Miss_To_Null
1073: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1074: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1075: IS
1076: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
1077: BEGIN
1078:
1072: FUNCTION Convert_Miss_To_Null
1073: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1074: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1075: IS
1076: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
1077: BEGIN
1078:
1079: oe_debug_pub.add('BEGIN Convert_Miss_To_Null in QPXUPRAB');
1080:
1264: --CHILD BREAK LINES' PRICING ATTRIBUTE RECORDS
1265: ----------------------------------------------------------------------------
1266:
1267:
1268: PROCEDURE UPDATE_CHILD_PRICING_ATTR(p_PRICING_ATTR_rec IN QP_MODIFIERS_PUB.Pricing_Attr_rec_type) IS
1269:
1270: l_status NUMBER;
1271: l_list_line_id NUMBER;
1272: l_list_line_type_code VARCHAR2(30);
1409:
1410: -- Procedure Update_Row
1411:
1412: PROCEDURE Update_Row
1413: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1414: )
1415: IS
1416:
1417: l_list_line_type_code VARCHAR2(30);
1605:
1606: -- Procedure Insert_Row
1607:
1608: PROCEDURE Insert_Row
1609: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1610: )
1611: IS
1612: l_context_flag VARCHAR2(1);
1613: l_attribute_flag VARCHAR2(1);
1919: -- Function Query_Row
1920:
1921: FUNCTION Query_Row
1922: ( p_pricing_attribute_id IN NUMBER
1923: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
1924: IS
1925: BEGIN
1926:
1927: RETURN Query_Rows
1938: ( p_pricing_attribute_id IN NUMBER :=
1939: FND_API.G_MISS_NUM
1940: , p_list_line_id IN NUMBER :=
1941: FND_API.G_MISS_NUM
1942: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Tbl_Type
1943: IS
1944: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
1945: l_PRICING_ATTR_tbl QP_Modifiers_PUB.Pricing_Attr_Tbl_Type;
1946:
1940: , p_list_line_id IN NUMBER :=
1941: FND_API.G_MISS_NUM
1942: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Tbl_Type
1943: IS
1944: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
1945: l_PRICING_ATTR_tbl QP_Modifiers_PUB.Pricing_Attr_Tbl_Type;
1946:
1947: CURSOR l_PRICING_ATTR_csr IS
1948: SELECT ACCUMULATE_FLAG
1941: FND_API.G_MISS_NUM
1942: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Tbl_Type
1943: IS
1944: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
1945: l_PRICING_ATTR_tbl QP_Modifiers_PUB.Pricing_Attr_Tbl_Type;
1946:
1947: CURSOR l_PRICING_ATTR_csr IS
1948: SELECT ACCUMULATE_FLAG
1949: , ATTRIBUTE1
2126: --
2127:
2128: PROCEDURE Lock_Row
2129: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
2130: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2131: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2132: )
2133: IS
2134: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2127:
2128: PROCEDURE Lock_Row
2129: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
2130: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2131: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2132: )
2133: IS
2134: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2135: BEGIN
2130: , p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2131: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2132: )
2133: IS
2134: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2135: BEGIN
2136:
2137: oe_debug_pub.add('BEGIN Lock_row in QPXUPRAB');
2138:
2441:
2442: -- Function Get_Values
2443:
2444: FUNCTION Get_Values
2445: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2446: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2447: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
2448: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2449: IS
2442: -- Function Get_Values
2443:
2444: FUNCTION Get_Values
2445: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2446: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2447: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
2448: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2449: IS
2450: l_PRICING_ATTR_val_rec QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type;
2443:
2444: FUNCTION Get_Values
2445: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2446: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2447: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
2448: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2449: IS
2450: l_PRICING_ATTR_val_rec QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type;
2451: BEGIN
2444: FUNCTION Get_Values
2445: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2446: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2447: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
2448: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2449: IS
2450: l_PRICING_ATTR_val_rec QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type;
2451: BEGIN
2452:
2446: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2447: QP_Modifiers_PUB.G_MISS_PRICING_ATTR_REC
2448: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2449: IS
2450: l_PRICING_ATTR_val_rec QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type;
2451: BEGIN
2452:
2453: oe_debug_pub.add('BEGIN Get_Values in QPXUPRAB');
2454:
2529:
2530: -- Function Get_Ids
2531:
2532: FUNCTION Get_Ids
2533: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2534: , p_PRICING_ATTR_val_rec IN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2535: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2536: IS
2537: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2530: -- Function Get_Ids
2531:
2532: FUNCTION Get_Ids
2533: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2534: , p_PRICING_ATTR_val_rec IN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2535: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2536: IS
2537: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2538: BEGIN
2531:
2532: FUNCTION Get_Ids
2533: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2534: , p_PRICING_ATTR_val_rec IN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2535: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2536: IS
2537: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2538: BEGIN
2539:
2533: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2534: , p_PRICING_ATTR_val_rec IN QP_Modifiers_PUB.Pricing_Attr_Val_Rec_Type
2535: ) RETURN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2536: IS
2537: l_PRICING_ATTR_rec QP_Modifiers_PUB.Pricing_Attr_Rec_Type;
2538: BEGIN
2539:
2540: oe_debug_pub.add('BEGIN Get_Ids in QPXUPRAB');
2541:
2832:
2833: END Get_Ids;
2834:
2835: Procedure Pre_Write_Process
2836: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2837: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2838: QP_Modifiers_PUB.G_MISS_Pricing_Attr_REC
2839: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2840: ) IS
2833: END Get_Ids;
2834:
2835: Procedure Pre_Write_Process
2836: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2837: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2838: QP_Modifiers_PUB.G_MISS_Pricing_Attr_REC
2839: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2840: ) IS
2841: l_PRICING_ATTR_rec QP_MODIFIERS_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2834:
2835: Procedure Pre_Write_Process
2836: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2837: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2838: QP_Modifiers_PUB.G_MISS_Pricing_Attr_REC
2839: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2840: ) IS
2841: l_PRICING_ATTR_rec QP_MODIFIERS_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2842: l_return_status varchar2(30);
2835: Procedure Pre_Write_Process
2836: ( p_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2837: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2838: QP_Modifiers_PUB.G_MISS_Pricing_Attr_REC
2839: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2840: ) IS
2841: l_PRICING_ATTR_rec QP_MODIFIERS_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2842: l_return_status varchar2(30);
2843: l_changed_lines varchar2(1) := null;
2837: , p_old_PRICING_ATTR_rec IN QP_Modifiers_PUB.Pricing_Attr_Rec_Type :=
2838: QP_Modifiers_PUB.G_MISS_Pricing_Attr_REC
2839: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Modifiers_PUB.Pricing_Attr_Rec_Type
2840: ) IS
2841: l_PRICING_ATTR_rec QP_MODIFIERS_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2842: l_return_status varchar2(30);
2843: l_changed_lines varchar2(1) := null;
2844: l_list_header_id number;
2845: