10: -- Procedure Clear_Dependent_Attr
11:
12: PROCEDURE Clear_Dependent_Attr
13: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
14: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
15: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
16: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
17: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
18: )
11:
12: PROCEDURE Clear_Dependent_Attr
13: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
14: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
15: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
16: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
17: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
18: )
19: IS
12: PROCEDURE Clear_Dependent_Attr
13: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
14: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
15: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
16: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
17: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
18: )
19: IS
20: l_index NUMBER := 0;
13: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
14: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
15: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
16: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
17: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
18: )
19: IS
20: l_index NUMBER := 0;
21: l_src_attr_tbl QP_GLOBALS.NUMBER_Tbl_Type;
655:
656: -- Procedure Apply_Attribute_Changes
657:
658: PROCEDURE Apply_Attribute_Changes
659: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
660: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
661: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
662: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
663: )
656: -- Procedure Apply_Attribute_Changes
657:
658: PROCEDURE Apply_Attribute_Changes
659: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
660: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
661: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
662: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
663: )
664: IS
657:
658: PROCEDURE Apply_Attribute_Changes
659: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
660: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
661: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
662: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
663: )
664: IS
665: l_return_status varchar2(30);
658: PROCEDURE Apply_Attribute_Changes
659: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
660: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
661: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
662: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
663: )
664: IS
665: l_return_status varchar2(30);
666: BEGIN
1067:
1068: -- Function Complete_Record
1069:
1070: FUNCTION Complete_Record
1071: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1072: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1073: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1074: IS
1075: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1068: -- Function Complete_Record
1069:
1070: FUNCTION Complete_Record
1071: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1072: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1073: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1074: IS
1075: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1076: BEGIN
1069:
1070: FUNCTION Complete_Record
1071: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1072: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1073: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1074: IS
1075: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1076: BEGIN
1077:
1071: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1072: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1073: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1074: IS
1075: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1076: BEGIN
1077:
1078: IF l_PRICE_LIST_LINE_rec.accrual_qty = FND_API.G_MISS_NUM THEN
1079: l_PRICE_LIST_LINE_rec.accrual_qty := p_old_PRICE_LIST_LINE_rec.accrual_qty;
1372:
1373: -- Function Convert_Miss_To_Null
1374:
1375: FUNCTION Convert_Miss_To_Null
1376: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1377: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1378: IS
1379: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1380: BEGIN
1373: -- Function Convert_Miss_To_Null
1374:
1375: FUNCTION Convert_Miss_To_Null
1376: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1377: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1378: IS
1379: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1380: BEGIN
1381:
1375: FUNCTION Convert_Miss_To_Null
1376: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1377: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
1378: IS
1379: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type := p_PRICE_LIST_LINE_rec;
1380: BEGIN
1381:
1382: IF l_PRICE_LIST_LINE_rec.accrual_qty = FND_API.G_MISS_NUM THEN
1383: l_PRICE_LIST_LINE_rec.accrual_qty := NULL;
1694: Return l_rounding_factor;
1695: END Round_List_Price;
1696:
1697: PROCEDURE Update_Row
1698: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1699: )
1700: IS
1701: l_operand NUMBER;
1702: l_check_active_flag VARCHAR2(1); /* Proration */
1838:
1839: -- Procedure Insert_Row
1840:
1841: PROCEDURE Insert_Row
1842: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
1843: )
1844: IS
1845: l_return_status varchar2(30);
1846: l_operand NUMBER;
2147: -- Function Query_Row
2148:
2149: FUNCTION Query_Row
2150: ( p_list_line_id IN NUMBER
2151: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
2152: IS
2153: BEGIN
2154:
2155: RETURN Query_Rows
2166: ( p_list_line_id IN NUMBER :=
2167: FND_API.G_MISS_NUM
2168: , p_list_header_id IN NUMBER :=
2169: FND_API.G_MISS_NUM
2170: ) RETURN QP_Price_List_PUB.Price_List_Line_Tbl_Type
2171: IS
2172: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
2173: l_PRICE_LIST_LINE_tbl QP_Price_List_PUB.Price_List_Line_Tbl_Type;
2174:
2168: , p_list_header_id IN NUMBER :=
2169: FND_API.G_MISS_NUM
2170: ) RETURN QP_Price_List_PUB.Price_List_Line_Tbl_Type
2171: IS
2172: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
2173: l_PRICE_LIST_LINE_tbl QP_Price_List_PUB.Price_List_Line_Tbl_Type;
2174:
2175: CURSOR l_PRICE_LIST_LINE_csr IS
2176: SELECT ACCRUAL_QTY
2169: FND_API.G_MISS_NUM
2170: ) RETURN QP_Price_List_PUB.Price_List_Line_Tbl_Type
2171: IS
2172: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
2173: l_PRICE_LIST_LINE_tbl QP_Price_List_PUB.Price_List_Line_Tbl_Type;
2174:
2175: CURSOR l_PRICE_LIST_LINE_csr IS
2176: SELECT ACCRUAL_QTY
2177: , ACCRUAL_UOM_CODE
2604: --
2605:
2606: PROCEDURE Lock_Row
2607: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
2608: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2609: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
2610: )
2611: IS
2612: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
2605:
2606: PROCEDURE Lock_Row
2607: ( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
2608: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2609: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
2610: )
2611: IS
2612: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
2613: BEGIN
2608: , p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2609: , x_PRICE_LIST_LINE_rec OUT NOCOPY /* file.sql.39 change */ QP_Price_List_PUB.Price_List_Line_Rec_Type
2610: )
2611: IS
2612: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
2613: BEGIN
2614:
2615: QP_Price_List_Line_Util.Print_Price_List_line(p_PRICE_LIST_LINE_rec,
2616: 1);
2963:
2964: -- Function Get_Values
2965:
2966: FUNCTION Get_Values
2967: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2968: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
2969: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
2970: ) RETURN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
2971: IS
2964: -- Function Get_Values
2965:
2966: FUNCTION Get_Values
2967: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2968: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
2969: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
2970: ) RETURN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
2971: IS
2972: l_PRICE_LIST_LINE_val_rec QP_Price_List_PUB.Price_List_Line_Val_Rec_Type;
2965:
2966: FUNCTION Get_Values
2967: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2968: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
2969: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
2970: ) RETURN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
2971: IS
2972: l_PRICE_LIST_LINE_val_rec QP_Price_List_PUB.Price_List_Line_Val_Rec_Type;
2973: BEGIN
2966: FUNCTION Get_Values
2967: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
2968: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
2969: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
2970: ) RETURN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
2971: IS
2972: l_PRICE_LIST_LINE_val_rec QP_Price_List_PUB.Price_List_Line_Val_Rec_Type;
2973: BEGIN
2974:
2968: , p_old_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type :=
2969: QP_Price_List_PUB.G_MISS_PRICE_LIST_LINE_REC
2970: ) RETURN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
2971: IS
2972: l_PRICE_LIST_LINE_val_rec QP_Price_List_PUB.Price_List_Line_Val_Rec_Type;
2973: BEGIN
2974:
2975: /*
2976: IF p_PRICE_LIST_LINE_rec.accrual_uom_code IS NOT NULL AND
3182:
3183: -- Function Get_Ids
3184:
3185: FUNCTION Get_Ids
3186: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
3187: , p_PRICE_LIST_LINE_val_rec IN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
3188: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
3189: IS
3190: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
3183: -- Function Get_Ids
3184:
3185: FUNCTION Get_Ids
3186: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
3187: , p_PRICE_LIST_LINE_val_rec IN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
3188: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
3189: IS
3190: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
3191: BEGIN
3184:
3185: FUNCTION Get_Ids
3186: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
3187: , p_PRICE_LIST_LINE_val_rec IN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
3188: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
3189: IS
3190: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
3191: BEGIN
3192:
3186: ( p_PRICE_LIST_LINE_rec IN QP_Price_List_PUB.Price_List_Line_Rec_Type
3187: , p_PRICE_LIST_LINE_val_rec IN QP_Price_List_PUB.Price_List_Line_Val_Rec_Type
3188: ) RETURN QP_Price_List_PUB.Price_List_Line_Rec_Type
3189: IS
3190: l_PRICE_LIST_LINE_rec QP_Price_List_PUB.Price_List_Line_Rec_Type;
3191: BEGIN
3192:
3193: -- initialize return_status.
3194:
3808: END Get_Ids;
3809:
3810:
3811: Procedure Print_Price_List_Line
3812: (p_PRICE_LIST_LINE_rec IN QP_PRICE_LIST_PUB.PRICE_LIST_LINE_REC_TYPE,
3813: p_counter IN NUMBER)
3814: IS
3815: BEGIN
3816: