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_Price_List_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
14: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_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_Price_List_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
14: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_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_Price_List_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
14: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_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_Price_List_PUB.Pricing_Attr_Rec_Type
13: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
14: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
15: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
16: )
17: IS
18: l_index NUMBER := 0;
19: l_src_attr_tbl QP_GLOBALS.NUMBER_Tbl_Type;
433:
434: -- Procedure Apply_Attribute_Changes
435:
436: PROCEDURE Apply_Attribute_Changes
437: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
438: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
439: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
440: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
441: )
434: -- Procedure Apply_Attribute_Changes
435:
436: PROCEDURE Apply_Attribute_Changes
437: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
438: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
439: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
440: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
441: )
442: IS
435:
436: PROCEDURE Apply_Attribute_Changes
437: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
438: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
439: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
440: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
441: )
442: IS
443: l_return_status varchar2(30);
436: PROCEDURE Apply_Attribute_Changes
437: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
438: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
439: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
440: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
441: )
442: IS
443: l_return_status varchar2(30);
444: l_list_header_id NUMBER;
753:
754: -- Function Complete_Record
755:
756: FUNCTION Complete_Record
757: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
758: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
759: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
760: IS
761: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
754: -- Function Complete_Record
755:
756: FUNCTION Complete_Record
757: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
758: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
759: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
760: IS
761: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
762: BEGIN
755:
756: FUNCTION Complete_Record
757: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
758: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
759: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
760: IS
761: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
762: BEGIN
763:
757: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
758: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
759: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
760: IS
761: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
762: BEGIN
763:
764: IF l_PRICING_ATTR_rec.accumulate_flag = FND_API.G_MISS_CHAR THEN
765: l_PRICING_ATTR_rec.accumulate_flag := p_old_PRICING_ATTR_rec.accumulate_flag;
947:
948: -- Function Convert_Miss_To_Null
949:
950: FUNCTION Convert_Miss_To_Null
951: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
952: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
953: IS
954: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
955: BEGIN
948: -- Function Convert_Miss_To_Null
949:
950: FUNCTION Convert_Miss_To_Null
951: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
952: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
953: IS
954: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
955: BEGIN
956:
950: FUNCTION Convert_Miss_To_Null
951: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
952: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
953: IS
954: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
955: BEGIN
956:
957: IF l_PRICING_ATTR_rec.from_rltd_modifier_id = FND_API.G_MISS_NUM THEN
958: l_PRICING_ATTR_rec.from_rltd_modifier_id := NULL;
1140:
1141: -- Procedure Update_Row
1142:
1143: PROCEDURE Update_Row
1144: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1145: )
1146: IS
1147: l_pric_attr_value_from_number NUMBER := NULL;
1148: l_pric_attr_value_to_number NUMBER := NULL;
1287:
1288: -- Procedure Insert_Row
1289:
1290: PROCEDURE Insert_Row
1291: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1292: )
1293: IS
1294: l_check_active_flag VARCHAR2(1);
1295: l_active_flag VARCHAR2(1);
1525: -- Function Query_Row
1526:
1527: FUNCTION Query_Row
1528: ( p_pricing_attribute_id IN NUMBER
1529: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1530: IS
1531: BEGIN
1532:
1533: RETURN Query_Rows
1544: ( p_pricing_attribute_id IN NUMBER :=
1545: FND_API.G_MISS_NUM
1546: , p_list_line_id IN NUMBER :=
1547: FND_API.G_MISS_NUM
1548: ) RETURN QP_Price_List_PUB.Pricing_Attr_Tbl_Type
1549: IS
1550: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1551: l_PRICING_ATTR_tbl QP_Price_List_PUB.Pricing_Attr_Tbl_Type;
1552:
1546: , p_list_line_id IN NUMBER :=
1547: FND_API.G_MISS_NUM
1548: ) RETURN QP_Price_List_PUB.Pricing_Attr_Tbl_Type
1549: IS
1550: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1551: l_PRICING_ATTR_tbl QP_Price_List_PUB.Pricing_Attr_Tbl_Type;
1552:
1553: CURSOR l_PRICING_ATTR_csr IS
1554: SELECT ACCUMULATE_FLAG
1547: FND_API.G_MISS_NUM
1548: ) RETURN QP_Price_List_PUB.Pricing_Attr_Tbl_Type
1549: IS
1550: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1551: l_PRICING_ATTR_tbl QP_Price_List_PUB.Pricing_Attr_Tbl_Type;
1552:
1553: CURSOR l_PRICING_ATTR_csr IS
1554: SELECT ACCUMULATE_FLAG
1555: , ATTRIBUTE1
1726: --
1727:
1728: PROCEDURE Lock_Row
1729: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1730: , p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1731: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
1732: )
1733: IS
1734: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1727:
1728: PROCEDURE Lock_Row
1729: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1730: , p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1731: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
1732: )
1733: IS
1734: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1735: BEGIN
1730: , p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1731: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
1732: )
1733: IS
1734: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1735: BEGIN
1736:
1737: SELECT ACCUMULATE_FLAG
1738: , ATTRIBUTE1
2033:
2034: -- Function Get_Values
2035:
2036: FUNCTION Get_Values
2037: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2038: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2039: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
2040: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2041: IS
2034: -- Function Get_Values
2035:
2036: FUNCTION Get_Values
2037: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2038: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2039: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
2040: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2041: IS
2042: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
2035:
2036: FUNCTION Get_Values
2037: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2038: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2039: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
2040: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2041: IS
2042: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
2043: BEGIN
2036: FUNCTION Get_Values
2037: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2038: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2039: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
2040: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2041: IS
2042: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
2043: BEGIN
2044:
2038: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2039: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
2040: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2041: IS
2042: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
2043: BEGIN
2044:
2045: IF p_PRICING_ATTR_rec.accumulate_flag IS NOT NULL AND
2046: p_PRICING_ATTR_rec.accumulate_flag <> FND_API.G_MISS_CHAR AND
2098:
2099: -- Function Get_Ids
2100:
2101: FUNCTION Get_Ids
2102: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2103: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2104: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2105: IS
2106: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2099: -- Function Get_Ids
2100:
2101: FUNCTION Get_Ids
2102: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2103: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2104: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2105: IS
2106: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2107: BEGIN
2100:
2101: FUNCTION Get_Ids
2102: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2103: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2104: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2105: IS
2106: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2107: BEGIN
2108:
2102: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2103: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2104: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2105: IS
2106: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2107: BEGIN
2108:
2109: -- initialize return_status.
2110:
2338:
2339: END Get_Ids;
2340:
2341: Procedure Pre_Write_Process
2342: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2343: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2344: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2345: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2346: ) IS
2339: END Get_Ids;
2340:
2341: Procedure Pre_Write_Process
2342: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2343: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2344: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2345: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2346: ) IS
2347: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2340:
2341: Procedure Pre_Write_Process
2342: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2343: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2344: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2345: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2346: ) IS
2347: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2348: l_return_status varchar2(30);
2341: Procedure Pre_Write_Process
2342: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2343: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2344: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2345: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2346: ) IS
2347: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2348: l_return_status varchar2(30);
2349: BEGIN
2343: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2344: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2345: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2346: ) IS
2347: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2348: l_return_status varchar2(30);
2349: BEGIN
2350:
2351: oe_debug_pub.Add('Entering QP_pll_PRICING_ATTR_Util.pre_write_process', 1);