6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_QP_Form_Limit_Balances';
7:
8: -- Global variables holding cached record.
9:
10: g_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
11: g_db_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
12:
13: -- Forward declaration of procedures maintaining entity record cache.
14:
7:
8: -- Global variables holding cached record.
9:
10: g_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
11: g_db_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
12:
13: -- Forward declaration of procedures maintaining entity record cache.
14:
15: PROCEDURE Write_LIMIT_BALANCES
12:
13: -- Forward declaration of procedures maintaining entity record cache.
14:
15: PROCEDURE Write_LIMIT_BALANCES
16: ( p_LIMIT_BALANCES_rec IN QP_Limits_PUB.Limit_Balances_Rec_Type
17: , p_db_record IN BOOLEAN := FALSE
18: );
19:
20: FUNCTION Get_LIMIT_BALANCES
20: FUNCTION Get_LIMIT_BALANCES
21: ( p_db_record IN BOOLEAN := FALSE
22: , p_limit_balance_id IN NUMBER
23: )
24: RETURN QP_Limits_PUB.Limit_Balances_Rec_Type;
25:
26: PROCEDURE Clear_LIMIT_BALANCES;
27:
28: -- Global variable holding performed operations.
26: PROCEDURE Clear_LIMIT_BALANCES;
27:
28: -- Global variable holding performed operations.
29:
30: g_opr__tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
31:
32: -- Procedure : Default_Attributes
33: --
34:
73: , x_limit_balance OUT NOCOPY /* file.sql.39 change */ VARCHAR2
74: , x_limit OUT NOCOPY /* file.sql.39 change */ VARCHAR2
75: )
76: IS
77: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
78: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
79: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
80: l_control_rec QP_GLOBALS.Control_Rec_Type;
81: l_return_status VARCHAR2(1);
74: , x_limit OUT NOCOPY /* file.sql.39 change */ VARCHAR2
75: )
76: IS
77: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
78: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
79: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
80: l_control_rec QP_GLOBALS.Control_Rec_Type;
81: l_return_status VARCHAR2(1);
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
75: )
76: IS
77: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
78: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
79: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
80: l_control_rec QP_GLOBALS.Control_Rec_Type;
81: l_return_status VARCHAR2(1);
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
83: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
78: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
79: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
80: l_control_rec QP_GLOBALS.Control_Rec_Type;
81: l_return_status VARCHAR2(1);
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
83: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
84: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
85: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
86: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
79: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
80: l_control_rec QP_GLOBALS.Control_Rec_Type;
81: l_return_status VARCHAR2(1);
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
83: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
84: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
85: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
86: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
87: BEGIN
80: l_control_rec QP_GLOBALS.Control_Rec_Type;
81: l_return_status VARCHAR2(1);
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
83: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
84: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
85: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
86: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
87: BEGIN
88:
81: l_return_status VARCHAR2(1);
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
83: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
84: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
85: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
86: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
87: BEGIN
88:
89: -- Set control flags.
82: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
83: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
84: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
85: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
86: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
87: BEGIN
88:
89: -- Set control flags.
90:
332: , x_limit_balance OUT NOCOPY /* file.sql.39 change */ VARCHAR2
333: , x_limit OUT NOCOPY /* file.sql.39 change */ VARCHAR2
334: )
335: IS
336: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
337: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
338: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
339: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
333: , x_limit OUT NOCOPY /* file.sql.39 change */ VARCHAR2
334: )
335: IS
336: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
337: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
338: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
339: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
334: )
335: IS
336: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
337: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
338: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
339: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
342: l_return_status VARCHAR2(1);
335: IS
336: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
337: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
338: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
339: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
342: l_return_status VARCHAR2(1);
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
336: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
337: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
338: l_LIMIT_BALANCES_val_rec QP_Limits_PUB.Limit_Balances_Val_Rec_Type;
339: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
342: l_return_status VARCHAR2(1);
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
344: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
339: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
342: l_return_status VARCHAR2(1);
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
344: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
345: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
346: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
347: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
340: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
342: l_return_status VARCHAR2(1);
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
344: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
345: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
346: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
347: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
348: BEGIN
341: l_control_rec QP_GLOBALS.Control_Rec_Type;
342: l_return_status VARCHAR2(1);
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
344: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
345: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
346: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
347: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
348: BEGIN
349:
342: l_return_status VARCHAR2(1);
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
344: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
345: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
346: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
347: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
348: BEGIN
349:
350: -- Set control flags.
343: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
344: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
345: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
346: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
347: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
348: BEGIN
349:
350: -- Set control flags.
351:
832: , x_last_updated_by OUT NOCOPY /* file.sql.39 change */ NUMBER
833: , x_last_update_login OUT NOCOPY /* file.sql.39 change */ NUMBER
834: )
835: IS
836: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
837: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
838: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
839: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
833: , x_last_update_login OUT NOCOPY /* file.sql.39 change */ NUMBER
834: )
835: IS
836: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
837: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
838: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
839: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
841: l_return_status VARCHAR2(1);
834: )
835: IS
836: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
837: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
838: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
839: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
841: l_return_status VARCHAR2(1);
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
835: IS
836: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
837: l_old_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
838: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
839: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
841: l_return_status VARCHAR2(1);
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
843: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
838: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
839: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
841: l_return_status VARCHAR2(1);
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
843: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
844: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
845: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
846: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
839: l_old_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
841: l_return_status VARCHAR2(1);
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
843: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
844: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
845: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
846: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
847: BEGIN
840: l_control_rec QP_GLOBALS.Control_Rec_Type;
841: l_return_status VARCHAR2(1);
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
843: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
844: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
845: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
846: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
847: BEGIN
848:
841: l_return_status VARCHAR2(1);
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
843: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
844: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
845: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
846: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
847: BEGIN
848:
849: -- Set control flags.
842: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
843: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
844: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
845: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
846: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
847: BEGIN
848:
849: -- Set control flags.
850:
994: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
995: , p_limit_balance_id IN NUMBER
996: )
997: IS
998: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
999: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1000: l_control_rec QP_GLOBALS.Control_Rec_Type;
1001: l_return_status VARCHAR2(1);
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
995: , p_limit_balance_id IN NUMBER
996: )
997: IS
998: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
999: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1000: l_control_rec QP_GLOBALS.Control_Rec_Type;
1001: l_return_status VARCHAR2(1);
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1003: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
998: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
999: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1000: l_control_rec QP_GLOBALS.Control_Rec_Type;
1001: l_return_status VARCHAR2(1);
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1003: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1004: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1005: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1006: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
999: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1000: l_control_rec QP_GLOBALS.Control_Rec_Type;
1001: l_return_status VARCHAR2(1);
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1003: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1004: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1005: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1006: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1007: BEGIN
1000: l_control_rec QP_GLOBALS.Control_Rec_Type;
1001: l_return_status VARCHAR2(1);
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1003: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1004: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1005: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1006: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1007: BEGIN
1008:
1001: l_return_status VARCHAR2(1);
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1003: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1004: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1005: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1006: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1007: BEGIN
1008:
1009: -- Set control flags.
1002: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1003: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1004: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1005: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1006: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1007: BEGIN
1008:
1009: -- Set control flags.
1010:
1129: )
1130: IS
1131: l_control_rec QP_GLOBALS.Control_Rec_Type;
1132: l_return_status VARCHAR2(1);
1133: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1134: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1135: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1136: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1137: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1130: IS
1131: l_control_rec QP_GLOBALS.Control_Rec_Type;
1132: l_return_status VARCHAR2(1);
1133: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1134: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1135: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1136: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1137: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1138: BEGIN
1131: l_control_rec QP_GLOBALS.Control_Rec_Type;
1132: l_return_status VARCHAR2(1);
1133: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1134: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1135: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1136: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1137: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1138: BEGIN
1139:
1132: l_return_status VARCHAR2(1);
1133: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1134: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1135: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1136: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1137: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1138: BEGIN
1139:
1140: -- Set control flags.
1133: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1134: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1135: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1136: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1137: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1138: BEGIN
1139:
1140: -- Set control flags.
1141:
1283: , p_reserved_amount IN NUMBER
1284: )
1285: IS
1286: l_return_status VARCHAR2(1);
1287: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1288: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1284: )
1285: IS
1286: l_return_status VARCHAR2(1);
1287: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1288: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1292: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1285: IS
1286: l_return_status VARCHAR2(1);
1287: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1288: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1292: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1293: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1286: l_return_status VARCHAR2(1);
1287: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1288: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1292: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1293: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1294: BEGIN
1287: l_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1288: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1292: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1293: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1294: BEGIN
1295:
1288: l_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1292: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1293: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1294: BEGIN
1295:
1296: -- Load LIMIT_BALANCES record
1289: l_x_LIMITS_rec QP_Limits_PUB.Limits_Rec_Type;
1290: l_x_LIMIT_ATTRS_rec QP_Limits_PUB.Limit_Attrs_Rec_Type;
1291: l_x_LIMIT_ATTRS_tbl QP_Limits_PUB.Limit_Attrs_Tbl_Type;
1292: l_x_LIMIT_BALANCES_rec QP_Limits_PUB.Limit_Balances_Rec_Type;
1293: l_x_LIMIT_BALANCES_tbl QP_Limits_PUB.Limit_Balances_Tbl_Type;
1294: BEGIN
1295:
1296: -- Load LIMIT_BALANCES record
1297:
1409:
1410: -- Procedures maintaining LIMIT_BALANCES record cache.
1411:
1412: PROCEDURE Write_LIMIT_BALANCES
1413: ( p_LIMIT_BALANCES_rec IN QP_Limits_PUB.Limit_Balances_Rec_Type
1414: , p_db_record IN BOOLEAN := FALSE
1415: )
1416: IS
1417: BEGIN
1429: FUNCTION Get_LIMIT_BALANCES
1430: ( p_db_record IN BOOLEAN := FALSE
1431: , p_limit_balance_id IN NUMBER
1432: )
1433: RETURN QP_Limits_PUB.Limit_Balances_Rec_Type
1434: IS
1435: BEGIN
1436:
1437: IF p_limit_balance_id <> g_LIMIT_BALANCES_rec.limit_balance_id
1466: PROCEDURE Clear_Limit_Balances
1467: IS
1468: BEGIN
1469:
1470: g_LIMIT_BALANCES_rec := QP_Limits_PUB.G_MISS_LIMIT_BALANCES_REC;
1471: g_db_LIMIT_BALANCES_rec := QP_Limits_PUB.G_MISS_LIMIT_BALANCES_REC;
1472:
1473: END Clear_Limit_Balances;
1474:
1467: IS
1468: BEGIN
1469:
1470: g_LIMIT_BALANCES_rec := QP_Limits_PUB.G_MISS_LIMIT_BALANCES_REC;
1471: g_db_LIMIT_BALANCES_rec := QP_Limits_PUB.G_MISS_LIMIT_BALANCES_REC;
1472:
1473: END Clear_Limit_Balances;
1474:
1475: END QP_QP_Form_Limit_Balances;