DBA Data[Home] [Help]

APPS.OE_PC_CONSTRAINTS_ADMIN_PVT dependencies on OE_DEBUG_PUB

Line 421: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

417:
418: l_condn_logic_only BOOLEAN;
419:
420: --
421: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
422: --
423: begin
424:
425:

Line 458: oe_debug_pub.add( 'ENTITY ID = VALIDATION ENTITY ID' , 2 ) ;

454: if (p_entity_id = p_validation_entity_id) then
455:
456: --
457: IF l_debug_level > 0 THEN
458: oe_debug_pub.add( 'ENTITY ID = VALIDATION ENTITY ID' , 2 ) ;
459: END IF;
460: --
461: if(l_validation_type = OE_PC_GLOBALS.WF_VALIDATION) then
462: --

Line 464: oe_debug_pub.add( 'VALIDATION TYPE = WF' , 2 ) ;

460: --
461: if(l_validation_type = OE_PC_GLOBALS.WF_VALIDATION) then
462: --
463: IF l_debug_level > 0 THEN
464: oe_debug_pub.add( 'VALIDATION TYPE = WF' , 2 ) ;
465: END IF;
466: --
467:
468: if(l_pk_record_set_flag = OE_PC_GLOBALS.YES_FLAG) then

Line 471: oe_debug_pub.add( 'PK_RECORD_SET_FLAG = Y' , 2 ) ;

467:
468: if(l_pk_record_set_flag = OE_PC_GLOBALS.YES_FLAG) then
469: --
470: IF l_debug_level > 0 THEN
471: oe_debug_pub.add( 'PK_RECORD_SET_FLAG = Y' , 2 ) ;
472: END IF;
473: --------------------------------------------------------------------
474: -- 1. e.g. for entity LINE, validation_type = 'WF' and
475: -- entity = LINE; validation_entity = LINE (SAME)

Line 524: oe_debug_pub.add( 'PK_RECORD_SET_FLAG <> Y' , 2 ) ;

520: else
521:
522: --
523: IF l_debug_level > 0 THEN
524: oe_debug_pub.add( 'PK_RECORD_SET_FLAG <> Y' , 2 ) ;
525: END IF;
526: -- l_pk_record_set_flag <> OE_PC_GLOBALS.YES_FLAG)
527: -- mult record set
528: ---------------------------------------------------------------------

Line 781: oe_debug_pub.add( 'P_ENTITY_ID <> P_VALIDATION_ENTITY_ID' , 2 ) ;

777: end if;
778: else
779: -- p_entity_id <> p_validation_entity_id;
780: IF l_debug_level > 0 THEN
781: oe_debug_pub.add( 'P_ENTITY_ID <> P_VALIDATION_ENTITY_ID' , 2 ) ;
782: END IF;
783: --
784:
785: -- get the driver tbl details

Line 802: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG IS ' || L_DRIVER_ENTITY_FK_FLAG , 2 ) ;

798: Fetch C_DFK into l_driver_entity_fk_flag;
799: CLOSE C_DFK;
800:
801: IF l_debug_level > 0 THEN
802: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG IS ' || L_DRIVER_ENTITY_FK_FLAG , 2 ) ;
803: END IF;
804:
805:
806: if(l_validation_type = OE_PC_GLOBALS.WF_VALIDATION) then

Line 811: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG =Y AND L_VALIDATION_TYPE =WF' , 2 ) ;

807:
808: if(l_driver_entity_fk_flag = 'Y') then
809:
810: IF l_debug_level > 0 THEN
811: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG =Y AND L_VALIDATION_TYPE =WF' , 2 ) ;
812: END IF;
813:
814: ---------------------------------------------------------------------
815: -- 6. e.g. entity = LINE; validation_entity = HEADER (DIFFERENT)

Line 874: oe_debug_pub.add( 'DR DBO: ' || L_DRIVER_DB_OBJECT_NAME || ' VDBO: ' || L_VALIDATION_DB_OBJECT_NAME || ' TYPE: ' || L_DRIVER_DB_OBJECT_TYPE , 2 ) ;

870:
871: -- navigate to the validation table
872: -- note that here the fk is defined on the driver entity
873: IF l_debug_level > 0 THEN
874: oe_debug_pub.add( 'DR DBO: ' || L_DRIVER_DB_OBJECT_NAME || ' VDBO: ' || L_VALIDATION_DB_OBJECT_NAME || ' TYPE: ' || L_DRIVER_DB_OBJECT_TYPE , 2 ) ;
875: END IF;
876:
877: for fk_rec in C_FKCOLS (l_driver_appln_id, l_driver_db_object_name,
878: l_validation_appln_id, l_validation_db_object_name, l_driver_db_object_type) loop

Line 886: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG =N AND L_VALIDATION_TYPE =WF' , 2 ) ;

882:
883: else
884:
885: IF l_debug_level > 0 THEN
886: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG =N AND L_VALIDATION_TYPE =WF' , 2 ) ;
887: END IF;
888:
889: -- l_driver_entity_fk_flag <> OE_PC_GLOBALS.YES_FLAG
890: ---------------------------------------------------------------------

Line 1003: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG =Y AND L_VALIDATION_TYPE =COL' , 2 ) ;

999:
1000: if(l_driver_entity_fk_flag = 'Y') then
1001: --
1002: IF l_debug_level > 0 THEN
1003: oe_debug_pub.add( 'L_DRIVER_ENTITY_FK_FLAG =Y AND L_VALIDATION_TYPE =COL' , 2 ) ;
1004: END IF;
1005: --
1006: ---------------------------------------------------------------------
1007: -- 9. e.g. for p_validation_type = 'COL' and

Line 1034: oe_debug_pub.add( 'VALIDATION OBJ: '||L_VALIDATION_DB_OBJECT_NAME , 2 ) ;

1030: -- return;
1031: ---------------------------------------------------------------------
1032:
1033: IF l_debug_level > 0 THEN
1034: oe_debug_pub.add( 'VALIDATION OBJ: '||L_VALIDATION_DB_OBJECT_NAME , 2 ) ;
1035: END IF;
1036:
1037: -- make the validation sql
1038: l_vc_sql := ' FROM '|| l_validation_db_object_name ||' a ' || OE_PC_GLOBALS.NEWLINE;

Line 1064: oe_debug_pub.add( 'DRIVER_ENTITY_FK_FLAG =N AND L_VALIDATION_TYPE =COL' , 2 ) ;

1060:
1061: else
1062: ---------------------------------------------------------------------
1063: IF l_debug_level > 0 THEN
1064: oe_debug_pub.add( 'DRIVER_ENTITY_FK_FLAG =N AND L_VALIDATION_TYPE =COL' , 2 ) ;
1065: END IF;
1066:
1067: -- 9. e.g. for p_validation_type = 'COL' and
1068: -- entity <> validation_entity (DIFFERENT)

Line 1110: oe_debug_pub.add( 'VALIDATION OBJ NAME: '||L_VALIDATION_DB_OBJECT_NAME , 2 ) ;

1106: -- return;
1107: ---------------------------------------------------------------------
1108:
1109: IF l_debug_level > 0 THEN
1110: oe_debug_pub.add( 'VALIDATION OBJ NAME: '||L_VALIDATION_DB_OBJECT_NAME , 2 ) ;
1111: END IF;
1112:
1113: -- first let's make the record set sql
1114: l_rs_sql := ' FROM ' || l_validation_db_object_name ||' a ' || OE_PC_GLOBALS.NEWLINE;

Line 1161: oe_debug_pub.add( 'NOT PK RECORD SET' ) ;

1157: end loop;
1158:
1159: if l_pk_record_set_flag = 'N' then
1160: IF l_debug_level > 0 THEN
1161: oe_debug_pub.add( 'NOT PK RECORD SET' ) ;
1162: END IF;
1163: -- add logic to select the record set
1164: l_vc_sql := l_vc_sql || ' AND ('||l_vc_pk_list||') IN ( SELECT '||
1165: l_rs_pk_list|| OE_PC_GLOBALS.NEWLINE;

Line 1202: oe_debug_pub.add( 'VALID COUNT CURSOR: '||X_VALID_COUNT_CURSOR , 2 ) ;

1198: ' SELECT count(*) ' || OE_PC_GLOBALS.NEWLINE || l_rs_sql || ';';
1199: END IF;
1200:
1201: IF l_debug_level > 0 THEN
1202: oe_debug_pub.add( 'VALID COUNT CURSOR: '||X_VALID_COUNT_CURSOR , 2 ) ;
1203: oe_debug_pub.add( 'VALIDATION STMT: '||X_VALIDATION_STMT ) ;
1204: oe_debug_pub.add( 'SET COUNT CURSOR: '||X_SET_COUNT_CURSOR ) ;
1205: oe_debug_pub.add( 'BIND VAR STMT :'||X_BIND_VAR_STMT);
1206: oe_debug_pub.add( 'RETURNING FROM MAKE_VALIDATION_CURSORS' , 2 ) ;

Line 1203: oe_debug_pub.add( 'VALIDATION STMT: '||X_VALIDATION_STMT ) ;

1199: END IF;
1200:
1201: IF l_debug_level > 0 THEN
1202: oe_debug_pub.add( 'VALID COUNT CURSOR: '||X_VALID_COUNT_CURSOR , 2 ) ;
1203: oe_debug_pub.add( 'VALIDATION STMT: '||X_VALIDATION_STMT ) ;
1204: oe_debug_pub.add( 'SET COUNT CURSOR: '||X_SET_COUNT_CURSOR ) ;
1205: oe_debug_pub.add( 'BIND VAR STMT :'||X_BIND_VAR_STMT);
1206: oe_debug_pub.add( 'RETURNING FROM MAKE_VALIDATION_CURSORS' , 2 ) ;
1207: END IF;

Line 1204: oe_debug_pub.add( 'SET COUNT CURSOR: '||X_SET_COUNT_CURSOR ) ;

1200:
1201: IF l_debug_level > 0 THEN
1202: oe_debug_pub.add( 'VALID COUNT CURSOR: '||X_VALID_COUNT_CURSOR , 2 ) ;
1203: oe_debug_pub.add( 'VALIDATION STMT: '||X_VALIDATION_STMT ) ;
1204: oe_debug_pub.add( 'SET COUNT CURSOR: '||X_SET_COUNT_CURSOR ) ;
1205: oe_debug_pub.add( 'BIND VAR STMT :'||X_BIND_VAR_STMT);
1206: oe_debug_pub.add( 'RETURNING FROM MAKE_VALIDATION_CURSORS' , 2 ) ;
1207: END IF;
1208:

Line 1205: oe_debug_pub.add( 'BIND VAR STMT :'||X_BIND_VAR_STMT);

1201: IF l_debug_level > 0 THEN
1202: oe_debug_pub.add( 'VALID COUNT CURSOR: '||X_VALID_COUNT_CURSOR , 2 ) ;
1203: oe_debug_pub.add( 'VALIDATION STMT: '||X_VALIDATION_STMT ) ;
1204: oe_debug_pub.add( 'SET COUNT CURSOR: '||X_SET_COUNT_CURSOR ) ;
1205: oe_debug_pub.add( 'BIND VAR STMT :'||X_BIND_VAR_STMT);
1206: oe_debug_pub.add( 'RETURNING FROM MAKE_VALIDATION_CURSORS' , 2 ) ;
1207: END IF;
1208:
1209: End Make_Validation_Cursors;

Line 1206: oe_debug_pub.add( 'RETURNING FROM MAKE_VALIDATION_CURSORS' , 2 ) ;

1202: oe_debug_pub.add( 'VALID COUNT CURSOR: '||X_VALID_COUNT_CURSOR , 2 ) ;
1203: oe_debug_pub.add( 'VALIDATION STMT: '||X_VALIDATION_STMT ) ;
1204: oe_debug_pub.add( 'SET COUNT CURSOR: '||X_SET_COUNT_CURSOR ) ;
1205: oe_debug_pub.add( 'BIND VAR STMT :'||X_BIND_VAR_STMT);
1206: oe_debug_pub.add( 'RETURNING FROM MAKE_VALIDATION_CURSORS' , 2 ) ;
1207: END IF;
1208:
1209: End Make_Validation_Cursors;
1210:

Line 1238: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1234: COMMA varchar2(1) := ',';
1235: Q varchar2(1) := '''';
1236:
1237: --
1238: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1239: --
1240: Begin
1241:
1242: OPEN C;

Line 1353: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1349: -- Bug 3739681
1350: l_bind_var_stmt long;
1351:
1352: --
1353: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1354: --
1355: BEGIN
1356: --
1357: IF l_debug_level > 0 THEN

Line 1358: oe_debug_pub.add( ' ' , 2 ) ;

1354: --
1355: BEGIN
1356: --
1357: IF l_debug_level > 0 THEN
1358: oe_debug_pub.add( ' ' , 2 ) ;
1359: oe_debug_pub.add( 'BEING : MAKE_VALIDATION_PKG' , 2 ) ;
1360: oe_debug_pub.add( 'VALIDATION TMPLT = ' || P_VALIDATION_TMPLT_ID , 2 ) ;
1361: oe_debug_pub.add( 'RECORD SET = ' || P_RECORD_SET_ID , 2 ) ;
1362: END IF;

Line 1359: oe_debug_pub.add( 'BEING : MAKE_VALIDATION_PKG' , 2 ) ;

1355: BEGIN
1356: --
1357: IF l_debug_level > 0 THEN
1358: oe_debug_pub.add( ' ' , 2 ) ;
1359: oe_debug_pub.add( 'BEING : MAKE_VALIDATION_PKG' , 2 ) ;
1360: oe_debug_pub.add( 'VALIDATION TMPLT = ' || P_VALIDATION_TMPLT_ID , 2 ) ;
1361: oe_debug_pub.add( 'RECORD SET = ' || P_RECORD_SET_ID , 2 ) ;
1362: END IF;
1363: --

Line 1360: oe_debug_pub.add( 'VALIDATION TMPLT = ' || P_VALIDATION_TMPLT_ID , 2 ) ;

1356: --
1357: IF l_debug_level > 0 THEN
1358: oe_debug_pub.add( ' ' , 2 ) ;
1359: oe_debug_pub.add( 'BEING : MAKE_VALIDATION_PKG' , 2 ) ;
1360: oe_debug_pub.add( 'VALIDATION TMPLT = ' || P_VALIDATION_TMPLT_ID , 2 ) ;
1361: oe_debug_pub.add( 'RECORD SET = ' || P_RECORD_SET_ID , 2 ) ;
1362: END IF;
1363: --
1364:

Line 1361: oe_debug_pub.add( 'RECORD SET = ' || P_RECORD_SET_ID , 2 ) ;

1357: IF l_debug_level > 0 THEN
1358: oe_debug_pub.add( ' ' , 2 ) ;
1359: oe_debug_pub.add( 'BEING : MAKE_VALIDATION_PKG' , 2 ) ;
1360: oe_debug_pub.add( 'VALIDATION TMPLT = ' || P_VALIDATION_TMPLT_ID , 2 ) ;
1361: oe_debug_pub.add( 'RECORD SET = ' || P_RECORD_SET_ID , 2 ) ;
1362: END IF;
1363: --
1364:
1365: -- the package name

Line 1416: oe_debug_pub.add( 'MAKE_VALIDATION_CURSORS COMPLETE' , 2 ) ;

1412: ,x_bind_var_stmt => l_bind_var_stmt
1413: );
1414: --
1415: IF l_debug_level > 0 THEN
1416: oe_debug_pub.add( 'MAKE_VALIDATION_CURSORS COMPLETE' , 2 ) ;
1417: END IF;
1418: --
1419:
1420: l_pkg_body := l_pkg_body || ' ' || OE_PC_GLOBALS.NEWLINE;

Line 1494: oe_debug_pub.add( 'EXCEPTION IN MAKE_VALIDATION_PKG' ) ;

1490: EXCEPTION
1491: WHEN OTHERS THEN
1492: x_return_status := fnd_api.G_RET_STS_ERROR;
1493: IF l_debug_level > 0 THEN
1494: oe_debug_pub.add( 'EXCEPTION IN MAKE_VALIDATION_PKG' ) ;
1495: END IF;
1496:
1497:
1498: END Make_Validation_Pkg;

Line 1546: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1542: )
1543: )
1544: ORDER BY c.column_name, c.on_operation_action;
1545: --
1546: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1547: --
1548: BEGIN
1549:
1550: l_index := (p_entity_id)*G_MAX_CONSTRAINTS + 1;

Line 1564: oe_debug_pub.add( 'CHECK ON INSERT-ADDTOCACHE , COLUMN:' ||T_COLUMN_NAMES(i) ) ;

1560: CLOSE c_check_on_insert_op;
1561:
1562: FOR i IN 1..t_constraint_ids.count LOOP
1563: IF l_debug_level > 0 THEN
1564: oe_debug_pub.add( 'CHECK ON INSERT-ADDTOCACHE , COLUMN:' ||T_COLUMN_NAMES(i) ) ;
1565: END IF;
1566: G_Check_On_Insert_Cache(l_index).entity_id := p_entity_id;
1567: G_Check_On_Insert_Cache(l_index).column_name := t_column_names(i);
1568: G_Check_On_Insert_Cache(l_index).constraint_id := t_constraint_ids(i);

Line 1587: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1583: )
1584: RETURN BOOLEAN IS
1585: l_index PLS_INTEGER; -- for bug 6473618 NUMBER;
1586: --
1587: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1588: --
1589: BEGIN
1590:
1591: l_index := (p_entity_id)*G_MAX_CONSTRAINTS + 1;

Line 1644: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1640: ORDER BY c.group_number;
1641:
1642: l_index PLS_INTEGER; -- for bug 6473618 NUMBER;
1643: --
1644: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1645: --
1646: BEGIN
1647:
1648: l_index := (mod(p_constraint_id,100000) * G_MAX_CONDITIONS) + 1; --added mod for bug 3603559

Line 1700: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1696: IS
1697: l_index PLS_INTEGER; -- for bug 6473618 NUMBER;
1698: l_result NUMBER := -1;
1699: --
1700: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1701: --
1702: BEGIN
1703:
1704: l_index := (p_validation_tmplt_id*G_MAX_CONDITIONS) + 1;

Line 1716: oe_debug_pub.add( 'VALIDATION TMPLT :'||P_VALIDATION_TMPLT_ID ||' CACHED RESULT :'||L_RESULT , 5 ) ;

1712: AND G_Result_Cache(l_index).scope_op = p_scope_op
1713: THEN
1714: l_result := G_Result_Cache(l_index).result;
1715: IF l_debug_level > 0 THEN
1716: oe_debug_pub.add( 'VALIDATION TMPLT :'||P_VALIDATION_TMPLT_ID ||' CACHED RESULT :'||L_RESULT , 5 ) ;
1717: END IF;
1718: EXIT;
1719: END IF;
1720:

Line 1746: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1742: )
1743: IS
1744: l_index PLS_INTEGER; -- for bug 6473618 NUMBER;
1745: --
1746: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1747: --
1748: BEGIN
1749:
1750: l_index := (p_validation_tmplt_id*G_MAX_CONDITIONS) + 1;

Line 1777: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1773: )
1774: IS
1775: l_index BINARY_INTEGER;
1776: --
1777: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1778: --
1779: BEGIN
1780:
1781: IF p_validation_entity_id IS NULL THEN

Line 1840: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1836: l_currGrpNumber number;
1837: l_currGrpResult boolean;
1838: l_index PLS_INTEGER; -- for bug 6473618 number;
1839: --
1840: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1841: --
1842: BEGIN
1843:
1844: IF l_debug_level > 0 THEN

Line 1845: oe_debug_pub.add( 'CONSTRAINT ID:'||P_CONSTRAINT_ID , 5 ) ;

1841: --
1842: BEGIN
1843:
1844: IF l_debug_level > 0 THEN
1845: oe_debug_pub.add( 'CONSTRAINT ID:'||P_CONSTRAINT_ID , 5 ) ;
1846: END IF;
1847:
1848: l_ConstrainedStatus := OE_PC_GLOBALS.NO;
1849: l_rule_count := 0;

Line 1951: oe_debug_pub.add( 'VALIDATION PKG :'||L_CONSTRAINTRULEREC.VALIDATION_PKG ||' RESULT :'||L_RESULT_01 ) ;

1947: IN l_constraintRuleRec.scope_op,
1948: OUT l_result_01;
1949:
1950: IF l_debug_level > 0 THEN
1951: oe_debug_pub.add( 'VALIDATION PKG :'||L_CONSTRAINTRULEREC.VALIDATION_PKG ||' RESULT :'||L_RESULT_01 ) ;
1952: END IF;
1953:
1954: IF (p_use_cached_results = 'Y'
1955: AND (l_constraintRuleRec.validation_entity_id

Line 2165: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

2161: l_column_name VARCHAR2(30);
2162: l_index PLS_INTEGER; -- for bug 6473618 NUMBER;
2163:
2164: --
2165: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2166: --
2167: BEGIN
2168:
2169: IF l_debug_level > 0 THEN

Line 2170: oe_debug_pub.add( 'ENTER OE_PC_CONSTRAINTS_ADMIN_PVT.IS_OP_CONSTRAINED , COLUMN:' || P_COLUMN_NAME , 1 ) ;

2166: --
2167: BEGIN
2168:
2169: IF l_debug_level > 0 THEN
2170: oe_debug_pub.add( 'ENTER OE_PC_CONSTRAINTS_ADMIN_PVT.IS_OP_CONSTRAINED , COLUMN:' || P_COLUMN_NAME , 1 ) ;
2171: END IF;
2172:
2173: l_validation_result := OE_PC_GLOBALS.NO;
2174:

Line 2328: oe_debug_pub.add( 'ADD CONSTRAINT MESSAGE' ) ;

2324: FROM oe_ak_objects_ext
2325: WHERE entity_id = p_entity_id;
2326:
2327: IF l_debug_level > 0 THEN
2328: oe_debug_pub.add( 'ADD CONSTRAINT MESSAGE' ) ;
2329: END IF;
2330: -- l_column_name is the name of the column on the constraint
2331: -- This maybe NULL if update on all columns is constrained
2332: -- (even if p_column_name is not null)

Line 2346: oe_debug_pub.add( 'EXIT OE_PC_CONSTRAINTS_ADMIN_PVT.IS_OP_CONSTRAINED , RESULT:' ||L_VALIDATION_RESULT , 1 ) ;

2342:
2343: END IF;
2344:
2345: IF l_debug_level > 0 THEN
2346: oe_debug_pub.add( 'EXIT OE_PC_CONSTRAINTS_ADMIN_PVT.IS_OP_CONSTRAINED , RESULT:' ||L_VALIDATION_RESULT , 1 ) ;
2347: END IF;
2348: RETURN l_validation_result;
2349:
2350: EXCEPTION