6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_QP_Form_Qualifier_Rules';
7:
8: -- Global variables holding cached record.
9:
10: g_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
11: g_db_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
12:
13: -- Forward declaration of procedures maintaining entity record cache.
14:
7:
8: -- Global variables holding cached record.
9:
10: g_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
11: g_db_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
12:
13: -- Forward declaration of procedures maintaining entity record cache.
14:
15: PROCEDURE Write_QUALIFIER_RULES
12:
13: -- Forward declaration of procedures maintaining entity record cache.
14:
15: PROCEDURE Write_QUALIFIER_RULES
16: ( p_QUALIFIER_RULES_rec IN QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type
17: , p_db_record IN BOOLEAN := FALSE
18: );
19:
20: FUNCTION Get_QUALIFIER_RULES
20: FUNCTION Get_QUALIFIER_RULES
21: ( p_db_record IN BOOLEAN := FALSE
22: , p_qualifier_rule_id IN NUMBER
23: )
24: RETURN QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
25:
26: PROCEDURE Clear_QUALIFIER_RULES;
27:
28: -- Global variable holding performed operations.
26: PROCEDURE Clear_QUALIFIER_RULES;
27:
28: -- Global variable holding performed operations.
29:
30: g_opr__tbl QP_Qualifier_Rules_PUB.Qualifier_Rules_Tbl_Type;
31:
32: -- Procedure : Default_Attributes
33: --
34:
57: , x_qualifier_rule_id OUT NOCOPY /* file.sql.39 change */ NUMBER
58: , x_qualifier_rule OUT NOCOPY /* file.sql.39 change */ VARCHAR2
59: )
60: IS
61: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
62: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
63: l_control_rec QP_GLOBALS.Control_Rec_Type;
64: l_return_status VARCHAR2(1);
65: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
58: , x_qualifier_rule OUT NOCOPY /* file.sql.39 change */ VARCHAR2
59: )
60: IS
61: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
62: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
63: l_control_rec QP_GLOBALS.Control_Rec_Type;
64: l_return_status VARCHAR2(1);
65: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
66: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
61: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
62: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
63: l_control_rec QP_GLOBALS.Control_Rec_Type;
64: l_return_status VARCHAR2(1);
65: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
66: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
67: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
68: BEGIN
69:
62: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
63: l_control_rec QP_GLOBALS.Control_Rec_Type;
64: l_return_status VARCHAR2(1);
65: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
66: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
67: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
68: BEGIN
69:
70: oe_debug_pub.ADD('in forms default attributes');
63: l_control_rec QP_GLOBALS.Control_Rec_Type;
64: l_return_status VARCHAR2(1);
65: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
66: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
67: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
68: BEGIN
69:
70: oe_debug_pub.ADD('in forms default attributes');
71:
284: , x_qualifier_rule_id OUT NOCOPY /* file.sql.39 change */ NUMBER
285: , x_qualifier_rule OUT NOCOPY /* file.sql.39 change */ VARCHAR2
286: )
287: IS
288: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
289: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
290: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
291: l_control_rec QP_GLOBALS.Control_Rec_Type;
292: l_return_status VARCHAR2(1);
285: , x_qualifier_rule OUT NOCOPY /* file.sql.39 change */ VARCHAR2
286: )
287: IS
288: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
289: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
290: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
291: l_control_rec QP_GLOBALS.Control_Rec_Type;
292: l_return_status VARCHAR2(1);
293: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
286: )
287: IS
288: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
289: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
290: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
291: l_control_rec QP_GLOBALS.Control_Rec_Type;
292: l_return_status VARCHAR2(1);
293: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
294: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
289: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
290: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
291: l_control_rec QP_GLOBALS.Control_Rec_Type;
292: l_return_status VARCHAR2(1);
293: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
294: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
295: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
296: BEGIN
297:
290: l_QUALIFIER_RULES_val_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Val_Rec_Type;
291: l_control_rec QP_GLOBALS.Control_Rec_Type;
292: l_return_status VARCHAR2(1);
293: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
294: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
295: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
296: BEGIN
297:
298: oe_debug_pub.add('entering forms change attributes');
291: l_control_rec QP_GLOBALS.Control_Rec_Type;
292: l_return_status VARCHAR2(1);
293: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
294: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
295: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
296: BEGIN
297:
298: oe_debug_pub.add('entering forms change attributes');
299:
638: , x_last_updated_by OUT NOCOPY /* file.sql.39 change */ NUMBER
639: , x_last_update_login OUT NOCOPY /* file.sql.39 change */ NUMBER
640: )
641: IS
642: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
643: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
644: l_control_rec QP_GLOBALS.Control_Rec_Type;
645: l_return_status VARCHAR2(1);
646: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
639: , x_last_update_login OUT NOCOPY /* file.sql.39 change */ NUMBER
640: )
641: IS
642: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
643: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
644: l_control_rec QP_GLOBALS.Control_Rec_Type;
645: l_return_status VARCHAR2(1);
646: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
647: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
642: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
643: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
644: l_control_rec QP_GLOBALS.Control_Rec_Type;
645: l_return_status VARCHAR2(1);
646: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
647: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
648: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
649: BEGIN
650:
643: l_old_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
644: l_control_rec QP_GLOBALS.Control_Rec_Type;
645: l_return_status VARCHAR2(1);
646: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
647: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
648: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
649: BEGIN
650:
651:
644: l_control_rec QP_GLOBALS.Control_Rec_Type;
645: l_return_status VARCHAR2(1);
646: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
647: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
648: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
649: BEGIN
650:
651:
652:
804: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
805: , p_qualifier_rule_id IN NUMBER
806: )
807: IS
808: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
809: l_control_rec QP_GLOBALS.Control_Rec_Type;
810: l_return_status VARCHAR2(1);
811: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
812: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
807: IS
808: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
809: l_control_rec QP_GLOBALS.Control_Rec_Type;
810: l_return_status VARCHAR2(1);
811: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
812: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
813: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
814: BEGIN
815:
808: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
809: l_control_rec QP_GLOBALS.Control_Rec_Type;
810: l_return_status VARCHAR2(1);
811: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
812: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
813: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
814: BEGIN
815:
816: -- Set control flags.
809: l_control_rec QP_GLOBALS.Control_Rec_Type;
810: l_return_status VARCHAR2(1);
811: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
812: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
813: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
814: BEGIN
815:
816: -- Set control flags.
817:
931: )
932: IS
933: l_control_rec QP_GLOBALS.Control_Rec_Type;
934: l_return_status VARCHAR2(1);
935: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
936: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
937: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
938: BEGIN
939:
932: IS
933: l_control_rec QP_GLOBALS.Control_Rec_Type;
934: l_return_status VARCHAR2(1);
935: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
936: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
937: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
938: BEGIN
939:
940: -- Set control flags.
933: l_control_rec QP_GLOBALS.Control_Rec_Type;
934: l_return_status VARCHAR2(1);
935: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
936: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
937: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
938: BEGIN
939:
940: -- Set control flags.
941:
1040: )
1041: IS
1042: l_control_rec QP_GLOBALS.Control_Rec_Type;
1043: l_return_status VARCHAR2(1);
1044: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1045: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1046: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1047: BEGIN
1048:
1041: IS
1042: l_control_rec QP_GLOBALS.Control_Rec_Type;
1043: l_return_status VARCHAR2(1);
1044: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1045: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1046: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1047: BEGIN
1048:
1049: -- Set control flags.
1042: l_control_rec QP_GLOBALS.Control_Rec_Type;
1043: l_return_status VARCHAR2(1);
1044: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1045: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1046: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1047: BEGIN
1048:
1049: -- Set control flags.
1050:
1176: , p_request_id IN NUMBER
1177: )
1178: IS
1179: l_return_status VARCHAR2(1);
1180: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1181: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1182: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1183: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1184: BEGIN
1177: )
1178: IS
1179: l_return_status VARCHAR2(1);
1180: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1181: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1182: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1183: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1184: BEGIN
1185:
1178: IS
1179: l_return_status VARCHAR2(1);
1180: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1181: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1182: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1183: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1184: BEGIN
1185:
1186: -- Load QUALIFIER_RULES record
1179: l_return_status VARCHAR2(1);
1180: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1181: l_x_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
1182: l_x_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
1183: l_x_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
1184: BEGIN
1185:
1186: -- Load QUALIFIER_RULES record
1187:
1284:
1285: -- Procedures maintaining QUALIFIER_RULES record cache.
1286:
1287: PROCEDURE Write_QUALIFIER_RULES
1288: ( p_QUALIFIER_RULES_rec IN QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type
1289: , p_db_record IN BOOLEAN := FALSE
1290: )
1291: IS
1292: BEGIN
1304: FUNCTION Get_QUALIFIER_RULES
1305: ( p_db_record IN BOOLEAN := FALSE
1306: , p_qualifier_rule_id IN NUMBER
1307: )
1308: RETURN QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type
1309: IS
1310: BEGIN
1311:
1312: oe_debug_pub.add('Entering Get_qualifier_rules');
1361: PROCEDURE Clear_Qualifier_Rules
1362: IS
1363: BEGIN
1364:
1365: g_QUALIFIER_RULES_rec := QP_Qualifier_Rules_PUB.G_MISS_QUALIFIER_RULES_REC;
1366: g_db_QUALIFIER_RULES_rec := QP_Qualifier_Rules_PUB.G_MISS_QUALIFIER_RULES_REC;
1367:
1368: END Clear_Qualifier_Rules;
1369:
1362: IS
1363: BEGIN
1364:
1365: g_QUALIFIER_RULES_rec := QP_Qualifier_Rules_PUB.G_MISS_QUALIFIER_RULES_REC;
1366: g_db_QUALIFIER_RULES_rec := QP_Qualifier_Rules_PUB.G_MISS_QUALIFIER_RULES_REC;
1367:
1368: END Clear_Qualifier_Rules;
1369:
1370: