6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_Default_Curr_Lists';
7:
8: -- Package global used within the package.
9:
10: g_CURR_LISTS_rec QP_Currency_PUB.Curr_Lists_Rec_Type;
11:
12: -- Get functions.
13:
14: FUNCTION Get_Base_Currency
172:
173: -- Procedure Attributes
174:
175: PROCEDURE Attributes
176: ( p_CURR_LISTS_rec IN QP_Currency_PUB.Curr_Lists_Rec_Type :=
177: QP_Currency_PUB.G_MISS_CURR_LISTS_REC
178: , p_iteration IN NUMBER := 1
179: , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ QP_Currency_PUB.Curr_Lists_Rec_Type
180: )
173: -- Procedure Attributes
174:
175: PROCEDURE Attributes
176: ( p_CURR_LISTS_rec IN QP_Currency_PUB.Curr_Lists_Rec_Type :=
177: QP_Currency_PUB.G_MISS_CURR_LISTS_REC
178: , p_iteration IN NUMBER := 1
179: , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ QP_Currency_PUB.Curr_Lists_Rec_Type
180: )
181: IS
175: PROCEDURE Attributes
176: ( p_CURR_LISTS_rec IN QP_Currency_PUB.Curr_Lists_Rec_Type :=
177: QP_Currency_PUB.G_MISS_CURR_LISTS_REC
178: , p_iteration IN NUMBER := 1
179: , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ QP_Currency_PUB.Curr_Lists_Rec_Type
180: )
181: IS
182: l_CURR_LISTS_rec QP_Currency_PUB.Curr_Lists_Rec_Type; --[prarasto]
183: BEGIN
178: , p_iteration IN NUMBER := 1
179: , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ QP_Currency_PUB.Curr_Lists_Rec_Type
180: )
181: IS
182: l_CURR_LISTS_rec QP_Currency_PUB.Curr_Lists_Rec_Type; --[prarasto]
183: BEGIN
184:
185: -- Check number of iterations.
186: