DBA Data[Home] [Help]

APPS.AHL_MC_RULE_PVT dependencies on AHL_MC_RULE_PVT

Line 1: PACKAGE BODY AHL_MC_RULE_PVT AS

1: PACKAGE BODY AHL_MC_RULE_PVT AS
2: /* $Header: AHLVMCRB.pls 120.0 2005/05/26 01:16:13 appldev noship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'Ahl_MC_Rule_Pvt';
4:
5:

Line 3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'Ahl_MC_Rule_Pvt';

1: PACKAGE BODY AHL_MC_RULE_PVT AS
2: /* $Header: AHLVMCRB.pls 120.0 2005/05/26 01:16:13 appldev noship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'Ahl_MC_Rule_Pvt';
4:
5:
6: ------------------------
7: -- Declare Procedures --

Line 13: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type);

9:
10: --Helper Procedure used to build the rules table
11: PROCEDURE Build_UI_Rule_Stmt_Tbl (
12: p_rule_stmt_id IN NUMBER,
13: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type);
14:
15: PROCEDURE Build_Rule_Stmt_Tbl (
16: p_start_index IN NUMBER,
17: p_end_index IN NUMBER,

Line 19: p_ui_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,

15: PROCEDURE Build_Rule_Stmt_Tbl (
16: p_start_index IN NUMBER,
17: p_end_index IN NUMBER,
18: p_rule_id IN NUMBER,
19: p_ui_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
20: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type,
21: x_rule_stmt_id OUT NOCOPY NUMBER);
22:
23: -----------------

Line 20: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type,

16: p_start_index IN NUMBER,
17: p_end_index IN NUMBER,
18: p_rule_id IN NUMBER,
19: p_ui_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
20: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type,
21: x_rule_stmt_id OUT NOCOPY NUMBER);
22:
23: -----------------
24: -- Start of Comments --

Line 45: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)

41: x_return_status OUT NOCOPY VARCHAR2,
42: x_msg_count OUT NOCOPY NUMBER,
43: x_msg_data OUT NOCOPY VARCHAR2,
44: p_rule_id IN NUMBER,
45: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)
46: IS
47: --
48: CURSOR ahl_rule_stmt_csr (p_rule_id IN NUMBER) IS
49: SELECT rule_statement_id

Line 142: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)

138: -- End of Comments.
139:
140: PROCEDURE Build_UI_Rule_Stmt_Tbl (
141: p_rule_stmt_id IN NUMBER,
142: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)
143: IS
144: --
145: CURSOR Check_rule_operator_csr (p_rulestmt_id IN NUMBER) IS
146: SELECT rs.operator, rs.subject_id, rs.object_id,

Line 214: l_subject_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;

210: l_obj_ver_num NUMBER;
211: l_oper_meaning VARCHAR2(80);
212: l_subject_id AHL_MC_RULE_STATEMENTS.SUBJECT_ID%TYPE;
213: l_object_id AHL_MC_RULE_STATEMENTS.OBJECT_ID%TYPE;
214: l_subject_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
215: l_object_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
216: l_max NUMBER;
217:
218: l_stmt_rec Rule_Stmt_Csr%ROWTYPE;

Line 215: l_object_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;

211: l_oper_meaning VARCHAR2(80);
212: l_subject_id AHL_MC_RULE_STATEMENTS.SUBJECT_ID%TYPE;
213: l_object_id AHL_MC_RULE_STATEMENTS.OBJECT_ID%TYPE;
214: l_subject_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
215: l_object_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
216: l_max NUMBER;
217:
218: l_stmt_rec Rule_Stmt_Csr%ROWTYPE;
219: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;

Line 219: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;

215: l_object_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
216: l_max NUMBER;
217:
218: l_stmt_rec Rule_Stmt_Csr%ROWTYPE;
219: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
220: --
221: BEGIN
222:
223: OPEN check_rule_operator_csr(p_rule_stmt_id);

Line 370: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,

366: -- End of Comments.
367:
368: PROCEDURE Build_Rule_Tree (
369: p_rule_id IN NUMBER,
370: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
371: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type)
372: IS
373: --
374: l_ui_stmt_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;

Line 371: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type)

367:
368: PROCEDURE Build_Rule_Tree (
369: p_rule_id IN NUMBER,
370: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
371: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type)
372: IS
373: --
374: l_ui_stmt_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
375: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;

Line 374: l_ui_stmt_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;

370: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
371: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type)
372: IS
373: --
374: l_ui_stmt_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
375: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
376: l_depth_count NUMBER;
377: l_rule_stmt_id NUMBER;
378: l_msg_count NUMBER;

Line 375: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;

371: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type)
372: IS
373: --
374: l_ui_stmt_tbl AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type;
375: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
376: l_depth_count NUMBER;
377: l_rule_stmt_id NUMBER;
378: l_msg_count NUMBER;
379: --

Line 460: p_ui_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,

456: PROCEDURE Build_Rule_Stmt_Tbl (
457: p_start_index IN NUMBER,
458: p_end_index IN NUMBER,
459: p_rule_id IN NUMBER,
460: p_ui_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
461: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type,
462: x_rule_stmt_id OUT NOCOPY NUMBER)
463: IS
464: --

Line 461: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type,

457: p_start_index IN NUMBER,
458: p_end_index IN NUMBER,
459: p_rule_id IN NUMBER,
460: p_ui_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
461: x_rule_stmt_tbl OUT NOCOPY AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type,
462: x_rule_stmt_id OUT NOCOPY NUMBER)
463: IS
464: --
465: CURSOR next_rule_stmt_id_csr IS

Line 469: l_stmt_rec AHL_MC_RULE_PVT.Rule_Stmt_Rec_Type;

465: CURSOR next_rule_stmt_id_csr IS
466: SELECT ahl_mc_rule_statements_s.nextval FROM DUAL;
467:
468: --
469: l_stmt_rec AHL_MC_RULE_PVT.Rule_Stmt_Rec_Type;
470: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
471: l_subject_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
472: l_object_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
473: l_subject_id NUMBER; --subject stmt id

Line 470: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;

466: SELECT ahl_mc_rule_statements_s.nextval FROM DUAL;
467:
468: --
469: l_stmt_rec AHL_MC_RULE_PVT.Rule_Stmt_Rec_Type;
470: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
471: l_subject_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
472: l_object_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
473: l_subject_id NUMBER; --subject stmt id
474: l_object_id NUMBER; --object stmt id

Line 471: l_subject_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;

467:
468: --
469: l_stmt_rec AHL_MC_RULE_PVT.Rule_Stmt_Rec_Type;
470: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
471: l_subject_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
472: l_object_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
473: l_subject_id NUMBER; --subject stmt id
474: l_object_id NUMBER; --object stmt id
475: l_operator VARCHAR2(30); --rule operator

Line 472: l_object_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;

468: --
469: l_stmt_rec AHL_MC_RULE_PVT.Rule_Stmt_Rec_Type;
470: l_ui_stmt_rec AHL_MC_RULE_PVT.UI_Rule_Stmt_Rec_Type;
471: l_subject_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
472: l_object_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
473: l_subject_id NUMBER; --subject stmt id
474: l_object_id NUMBER; --object stmt id
475: l_operator VARCHAR2(30); --rule operator
476: l_operation_flag VARCHAR2(1);

Line 673: -- p_x_rule_rec IN OUT NOCOPY AHL_MC_RULE_PVT.Rule_Rec_Type Required

669: -- Pre-reqs :
670: -- Parameters :
671: --
672: -- Insert_Rule Parameters:
673: -- p_x_rule_rec IN OUT NOCOPY AHL_MC_RULE_PVT.Rule_Rec_Type Required
674: -- p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type Required
675: --
676: -- End of Comments.
677:

Line 674: -- p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type Required

670: -- Parameters :
671: --
672: -- Insert_Rule Parameters:
673: -- p_x_rule_rec IN OUT NOCOPY AHL_MC_RULE_PVT.Rule_Rec_Type Required
674: -- p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type Required
675: --
676: -- End of Comments.
677:
678: PROCEDURE Insert_Rule (

Line 687: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,

683: x_return_status OUT NOCOPY VARCHAR2,
684: x_msg_count OUT NOCOPY NUMBER,
685: x_msg_data OUT NOCOPY VARCHAR2,
686: p_module IN VARCHAR2 := 'JSP',
687: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
688: p_x_rule_rec IN OUT NOCOPY AHL_MC_RULE_PVT.Rule_Rec_Type)
689: IS
690: --
691: CURSOR check_mc_status_csr (p_header_id IN NUMBER) IS

Line 688: p_x_rule_rec IN OUT NOCOPY AHL_MC_RULE_PVT.Rule_Rec_Type)

684: x_msg_count OUT NOCOPY NUMBER,
685: x_msg_data OUT NOCOPY VARCHAR2,
686: p_module IN VARCHAR2 := 'JSP',
687: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type,
688: p_x_rule_rec IN OUT NOCOPY AHL_MC_RULE_PVT.Rule_Rec_Type)
689: IS
690: --
691: CURSOR check_mc_status_csr (p_header_id IN NUMBER) IS
692: SELECT config_status_code, config_status_meaning

Line 713: l_rule_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;

709: l_api_name CONSTANT VARCHAR2(30) := 'Insert_Rule';
710: l_junk VARCHAR2(1);
711: l_status_code VARCHAR2(30);
712: l_status VARCHAR2(80);
713: l_rule_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
714: l_row_id VARCHAR2(30);
715: --
716: BEGIN
717:

Line 978: -- p_rule_rec IN AHL_MC_RULE_PVT.Rule_Rec_Type Required

974: -- Pre-reqs :
975: -- Parameters :
976: --
977: -- Update_Rule Parameters:
978: -- p_rule_rec IN AHL_MC_RULE_PVT.Rule_Rec_Type Required
979: -- p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type Required
980: --
981: -- End of Comments.
982:

Line 979: -- p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type Required

975: -- Parameters :
976: --
977: -- Update_Rule Parameters:
978: -- p_rule_rec IN AHL_MC_RULE_PVT.Rule_Rec_Type Required
979: -- p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type Required
980: --
981: -- End of Comments.
982:
983: PROCEDURE Update_Rule (

Line 992: p_rule_rec IN AHL_MC_RULE_PVT.Rule_Rec_Type,

988: x_return_status OUT NOCOPY VARCHAR2,
989: x_msg_count OUT NOCOPY NUMBER,
990: x_msg_data OUT NOCOPY VARCHAR2,
991: p_module IN VARCHAR2 := 'JSP',
992: p_rule_rec IN AHL_MC_RULE_PVT.Rule_Rec_Type,
993: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)
994: IS
995: --
996: CURSOR get_rule_rec_csr (p_rule_id IN NUMBER) IS

Line 993: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)

989: x_msg_count OUT NOCOPY NUMBER,
990: x_msg_data OUT NOCOPY VARCHAR2,
991: p_module IN VARCHAR2 := 'JSP',
992: p_rule_rec IN AHL_MC_RULE_PVT.Rule_Rec_Type,
993: p_rule_stmt_tbl IN AHL_MC_RULE_PVT.UI_Rule_Stmt_Tbl_Type)
994: IS
995: --
996: CURSOR get_rule_rec_csr (p_rule_id IN NUMBER) IS
997: SELECT *

Line 1033: l_rule_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;

1029: l_api_name CONSTANT VARCHAR2(30) := 'Update_Rule';
1030: l_junk VARCHAR2(1);
1031: l_status_code VARCHAR2(30);
1032: l_status VARCHAR2(80);
1033: l_rule_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
1034: l_rule_rec AHL_MC_RULE_PVT.Rule_Rec_Type;
1035: l_old_rule_rec Get_rule_rec_csr%ROWTYPE;
1036: l_rule_stmt_id NUMBER;
1037: l_match_flag BOOLEAN;

Line 1034: l_rule_rec AHL_MC_RULE_PVT.Rule_Rec_Type;

1030: l_junk VARCHAR2(1);
1031: l_status_code VARCHAR2(30);
1032: l_status VARCHAR2(80);
1033: l_rule_stmt_tbl AHL_MC_RULE_PVT.Rule_Stmt_Tbl_Type;
1034: l_rule_rec AHL_MC_RULE_PVT.Rule_Rec_Type;
1035: l_old_rule_rec Get_rule_rec_csr%ROWTYPE;
1036: l_rule_stmt_id NUMBER;
1037: l_match_flag BOOLEAN;
1038: --

Line 1770: AHL_MC_RULE_PVT.Delete_Rule (

1766: FETCH get_rule_ids_csr INTO l_rule_rec.rule_id,
1767: l_rule_rec.object_version_number;
1768: EXIT WHEN get_rule_ids_csr%NOTFOUND;
1769:
1770: AHL_MC_RULE_PVT.Delete_Rule (
1771: p_api_version => 1.0,
1772: p_commit => FND_API.G_FALSE,
1773: p_rule_rec => l_rule_rec,
1774: x_return_status => x_return_status,

Line 1993: End AHL_MC_RULE_PVT;

1989: p_encoded => fnd_api.g_false);
1990: --
1991: END Get_Rules_For_Position;
1992:
1993: End AHL_MC_RULE_PVT;