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;
737:
738: -- Function Complete_Record
739:
740: FUNCTION Complete_Record
741: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
742: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
743: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
744: IS
745: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
738: -- Function Complete_Record
739:
740: FUNCTION Complete_Record
741: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
742: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
743: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
744: IS
745: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
746: BEGIN
739:
740: FUNCTION Complete_Record
741: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
742: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
743: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
744: IS
745: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
746: BEGIN
747:
741: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
742: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
743: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
744: IS
745: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
746: BEGIN
747:
748: IF l_PRICING_ATTR_rec.accumulate_flag = FND_API.G_MISS_CHAR THEN
749: l_PRICING_ATTR_rec.accumulate_flag := p_old_PRICING_ATTR_rec.accumulate_flag;
931:
932: -- Function Convert_Miss_To_Null
933:
934: FUNCTION Convert_Miss_To_Null
935: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
936: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
937: IS
938: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
939: BEGIN
932: -- Function Convert_Miss_To_Null
933:
934: FUNCTION Convert_Miss_To_Null
935: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
936: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
937: IS
938: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
939: BEGIN
940:
934: FUNCTION Convert_Miss_To_Null
935: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
936: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
937: IS
938: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
939: BEGIN
940:
941: IF l_PRICING_ATTR_rec.from_rltd_modifier_id = FND_API.G_MISS_NUM THEN
942: l_PRICING_ATTR_rec.from_rltd_modifier_id := NULL;
1124:
1125: -- Procedure Update_Row
1126:
1127: PROCEDURE Update_Row
1128: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1129: )
1130: IS
1131: l_pric_attr_value_from_number NUMBER := NULL;
1132: l_pric_attr_value_to_number NUMBER := NULL;
1271:
1272: -- Procedure Insert_Row
1273:
1274: PROCEDURE Insert_Row
1275: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1276: )
1277: IS
1278: l_check_active_flag VARCHAR2(1);
1279: l_active_flag VARCHAR2(1);
1509: -- Function Query_Row
1510:
1511: FUNCTION Query_Row
1512: ( p_pricing_attribute_id IN NUMBER
1513: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1514: IS
1515: BEGIN
1516:
1517: RETURN Query_Rows
1528: ( p_pricing_attribute_id IN NUMBER :=
1529: FND_API.G_MISS_NUM
1530: , p_list_line_id IN NUMBER :=
1531: FND_API.G_MISS_NUM
1532: ) RETURN QP_Price_List_PUB.Pricing_Attr_Tbl_Type
1533: IS
1534: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1535: l_PRICING_ATTR_tbl QP_Price_List_PUB.Pricing_Attr_Tbl_Type;
1536:
1530: , p_list_line_id IN NUMBER :=
1531: FND_API.G_MISS_NUM
1532: ) RETURN QP_Price_List_PUB.Pricing_Attr_Tbl_Type
1533: IS
1534: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1535: l_PRICING_ATTR_tbl QP_Price_List_PUB.Pricing_Attr_Tbl_Type;
1536:
1537: CURSOR l_PRICING_ATTR_csr IS
1538: SELECT ACCUMULATE_FLAG
1531: FND_API.G_MISS_NUM
1532: ) RETURN QP_Price_List_PUB.Pricing_Attr_Tbl_Type
1533: IS
1534: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1535: l_PRICING_ATTR_tbl QP_Price_List_PUB.Pricing_Attr_Tbl_Type;
1536:
1537: CURSOR l_PRICING_ATTR_csr IS
1538: SELECT ACCUMULATE_FLAG
1539: , ATTRIBUTE1
1710: --
1711:
1712: PROCEDURE Lock_Row
1713: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1714: , p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1715: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
1716: )
1717: IS
1718: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1711:
1712: PROCEDURE Lock_Row
1713: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1714: , p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1715: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
1716: )
1717: IS
1718: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1719: BEGIN
1714: , p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1715: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
1716: )
1717: IS
1718: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
1719: BEGIN
1720:
1721: SELECT ACCUMULATE_FLAG
1722: , ATTRIBUTE1
1967:
1968: -- Function Get_Values
1969:
1970: FUNCTION Get_Values
1971: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1972: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
1973: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
1974: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
1975: IS
1968: -- Function Get_Values
1969:
1970: FUNCTION Get_Values
1971: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1972: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
1973: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
1974: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
1975: IS
1976: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
1969:
1970: FUNCTION Get_Values
1971: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1972: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
1973: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
1974: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
1975: IS
1976: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
1977: BEGIN
1970: FUNCTION Get_Values
1971: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
1972: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
1973: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
1974: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
1975: IS
1976: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
1977: BEGIN
1978:
1972: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
1973: QP_Price_List_PUB.G_MISS_PRICING_ATTR_REC
1974: ) RETURN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
1975: IS
1976: l_PRICING_ATTR_val_rec QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type;
1977: BEGIN
1978:
1979: IF p_PRICING_ATTR_rec.accumulate_flag IS NOT NULL AND
1980: p_PRICING_ATTR_rec.accumulate_flag <> FND_API.G_MISS_CHAR AND
2032:
2033: -- Function Get_Ids
2034:
2035: FUNCTION Get_Ids
2036: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2037: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2038: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2039: IS
2040: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2033: -- Function Get_Ids
2034:
2035: FUNCTION Get_Ids
2036: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2037: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2038: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2039: IS
2040: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2041: BEGIN
2034:
2035: FUNCTION Get_Ids
2036: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2037: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2038: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2039: IS
2040: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2041: BEGIN
2042:
2036: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2037: , p_PRICING_ATTR_val_rec IN QP_Price_List_PUB.Pricing_Attr_Val_Rec_Type
2038: ) RETURN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2039: IS
2040: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type;
2041: BEGIN
2042:
2043: -- initialize return_status.
2044:
2272:
2273: END Get_Ids;
2274:
2275: Procedure Pre_Write_Process
2276: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2277: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2278: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2279: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2280: ) IS
2273: END Get_Ids;
2274:
2275: Procedure Pre_Write_Process
2276: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2277: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2278: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2279: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2280: ) IS
2281: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2274:
2275: Procedure Pre_Write_Process
2276: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2277: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2278: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2279: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2280: ) IS
2281: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2282: l_return_status varchar2(30);
2275: Procedure Pre_Write_Process
2276: ( p_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type
2277: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2278: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2279: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2280: ) IS
2281: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2282: l_return_status varchar2(30);
2283: BEGIN
2277: , p_old_PRICING_ATTR_rec IN QP_Price_List_PUB.Pricing_Attr_Rec_Type :=
2278: QP_Price_List_PUB.G_MISS_Pricing_Attr_REC
2279: , x_PRICING_ATTR_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Pricing_Attr_Rec_Type
2280: ) IS
2281: l_PRICING_ATTR_rec QP_Price_List_PUB.Pricing_Attr_Rec_Type := p_PRICING_ATTR_rec;
2282: l_return_status varchar2(30);
2283: BEGIN
2284:
2285: oe_debug_pub.Add('Entering QP_pll_PRICING_ATTR_Util.pre_write_process', 1);