eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.BOM_VALIDATE_OP_RES dependencies on ERROR_HANDLER

Line 147: Error_Handler.Write_Debug('Check if the rev op resource is valid in Eco by Prod. . .' );

143: l_to_wip_entity_id := BOM_Rtg_Globals.Get_To_Wip_Entity_Id;
144: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;
145:
146: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
147: Error_Handler.Write_Debug('Check if the rev op resource is valid in Eco by Prod. . .' );
148: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
149: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
150: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
151: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );

Line 148: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );

144: l_from_cum_qty := BOM_Rtg_Globals.Get_From_Cum_Qty;
145:
146: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
147: Error_Handler.Write_Debug('Check if the rev op resource is valid in Eco by Prod. . .' );
148: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
149: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
150: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
151: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
152: END IF;

Line 149: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );

145:
146: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
147: Error_Handler.Write_Debug('Check if the rev op resource is valid in Eco by Prod. . .' );
148: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
149: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
150: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
151: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
152: END IF;
153:

Line 150: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );

146: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
147: Error_Handler.Write_Debug('Check if the rev op resource is valid in Eco by Prod. . .' );
148: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
149: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
150: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
151: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
152: END IF;
153:
154:

Line 151: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );

147: Error_Handler.Write_Debug('Check if the rev op resource is valid in Eco by Prod. . .' );
148: Error_Handler.Write_Debug('Lot Number in parent rev item : ' || l_lot_number );
149: Error_Handler.Write_Debug('From WIP Entity Id in parent rev item : ' || to_char(l_from_wip_entity_id) );
150: Error_Handler.Write_Debug('To WIP Entity Id in parent rev item : ' || to_char(l_to_wip_entity_id) );
151: Error_Handler.Write_Debug('Cum Qty in parent rev item : ' || to_char(l_from_cum_qty) );
152: END IF;
153:
154:
155: -- Check if Op Seq Num is exist in ECO by Lot

Line 172: Error_Handler.Write_Debug('Resource Seq Num : ' || to_char(p_resource_seq_num) );

168: )
169: LOOP
170:
171: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
172: Error_Handler.Write_Debug('Resource Seq Num : ' || to_char(p_resource_seq_num) );
173: Error_Handler.Write_Debug('Op Seq Num : ' || to_char(p_operation_seq_num) );
174: Error_Handler.Write_Debug('In Eco by Lot Number, this rev op res is invalid. . .' );
175: END IF;
176: l_ret_status := FALSE ;

Line 173: Error_Handler.Write_Debug('Op Seq Num : ' || to_char(p_operation_seq_num) );

169: LOOP
170:
171: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
172: Error_Handler.Write_Debug('Resource Seq Num : ' || to_char(p_resource_seq_num) );
173: Error_Handler.Write_Debug('Op Seq Num : ' || to_char(p_operation_seq_num) );
174: Error_Handler.Write_Debug('In Eco by Lot Number, this rev op res is invalid. . .' );
175: END IF;
176: l_ret_status := FALSE ;
177: END LOOP ;

Line 174: Error_Handler.Write_Debug('In Eco by Lot Number, this rev op res is invalid. . .' );

170:
171: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
172: Error_Handler.Write_Debug('Resource Seq Num : ' || to_char(p_resource_seq_num) );
173: Error_Handler.Write_Debug('Op Seq Num : ' || to_char(p_operation_seq_num) );
174: Error_Handler.Write_Debug('In Eco by Lot Number, this rev op res is invalid. . .' );
175: END IF;
176: l_ret_status := FALSE ;
177: END LOOP ;
178:

Line 539: Error_Handler.Write_Debug ('Usage : ' || to_char(p_usage_rate_or_amount) );

535:
536: x_return_status := FND_API.G_RET_STS_SUCCESS ;
537:
538: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
539: Error_Handler.Write_Debug ('Usage : ' || to_char(p_usage_rate_or_amount) );
540: Error_Handler.Write_Debug ('Usage Inv : ' || to_char(p_usage_rate_or_amount_inverse ) );
541: END IF ;
542:
543: --

Line 540: Error_Handler.Write_Debug ('Usage Inv : ' || to_char(p_usage_rate_or_amount_inverse ) );

536: x_return_status := FND_API.G_RET_STS_SUCCESS ;
537:
538: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
539: Error_Handler.Write_Debug ('Usage : ' || to_char(p_usage_rate_or_amount) );
540: Error_Handler.Write_Debug ('Usage Inv : ' || to_char(p_usage_rate_or_amount_inverse ) );
541: END IF ;
542:
543: --
544: -- Bug 2624883

Line 1201: x_return_status := Error_Handler.G_STATUS_ERROR;

1197: BEGIN
1198: x_return_status := FND_API.G_RET_STS_SUCCESS;
1199:
1200: FOR c1 in c_same_sgn LOOP
1201: x_return_status := Error_Handler.G_STATUS_ERROR;
1202: END LOOP;
1203:
1204: END Val_Schedule_Seq_Num;
1205:

Line 1209: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1205:
1206:
1207: PROCEDURE Val_Sgn_Order
1208: ( p_op_seq_id IN NUMBER
1209: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1210: , x_return_status IN OUT NOCOPY VARCHAR2
1211: )
1212: IS
1213: Cursor Check1 is

Line 1253: Error_Handler.Add_Error_Token

1249: AND nvl(i.mn_ssn1, i.mn_rsn1) > temp_inner THEN
1250: FOR j IN Check2(i.substitute_group_num) LOOP
1251: IF j.mn_ssn2 <= temp_inner
1252: OR j.mn_ssn2 <= temp_outer THEN
1253: Error_Handler.Add_Error_Token
1254: ( p_Message_Name => 'BOM_LARGE_SGN_SSN'
1255: , p_mesg_token_tbl => x_mesg_token_tbl
1256: , x_mesg_token_tbl => x_mesg_token_tbl
1257: --, p_Token_Tbl => l_token_tbl

Line 1259: x_return_status := Error_Handler.G_STATUS_ERROR;

1255: , p_mesg_token_tbl => x_mesg_token_tbl
1256: , x_mesg_token_tbl => x_mesg_token_tbl
1257: --, p_Token_Tbl => l_token_tbl
1258: ) ;
1259: x_return_status := Error_Handler.G_STATUS_ERROR;
1260: return;
1261: END IF; --nvl(j)
1262: temp_inner := nvl(j.mx_ssn2, 0);
1263: END LOOP;

Line 1265: Error_Handler.Add_Error_Token

1261: END IF; --nvl(j)
1262: temp_inner := nvl(j.mx_ssn2, 0);
1263: END LOOP;
1264: ELSE
1265: Error_Handler.Add_Error_Token
1266: ( p_Message_Name => 'BOM_LARGE_SGN_SSN'
1267: , p_mesg_token_tbl => x_mesg_token_tbl
1268: , x_mesg_token_tbl => x_mesg_token_tbl
1269: --, p_Token_Tbl => l_token_tbl

Line 1271: x_return_status := Error_Handler.G_STATUS_ERROR;

1267: , p_mesg_token_tbl => x_mesg_token_tbl
1268: , x_mesg_token_tbl => x_mesg_token_tbl
1269: --, p_Token_Tbl => l_token_tbl
1270: ) ;
1271: x_return_status := Error_Handler.G_STATUS_ERROR;
1272: return;
1273: END IF; --nvl(i)
1274: temp_outer := nvl(i.mx_ssn1, i.mx_rsn1);
1275: ELSE

Line 1304: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1300: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1301: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1302: , x_old_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1303: , x_old_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1304: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1305: , x_return_status IN OUT NOCOPY VARCHAR2
1306: )
1307:
1308: IS

Line 1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1365: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1366: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1367: , x_old_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1368: , x_old_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1370: , x_return_status IN OUT NOCOPY VARCHAR2
1371: )
1372: IS
1373: l_Token_Tbl Error_Handler.Token_Tbl_Type;

Line 1373: l_Token_Tbl Error_Handler.Token_Tbl_Type;

1369: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1370: , x_return_status IN OUT NOCOPY VARCHAR2
1371: )
1372: IS
1373: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1374: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
1375: l_return_status VARCHAR2(1);
1376:
1377: BEGIN

Line 1374: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

1370: , x_return_status IN OUT NOCOPY VARCHAR2
1371: )
1372: IS
1373: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1374: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
1375: l_return_status VARCHAR2(1);
1376:
1377: BEGIN
1378:

Line 1397: Error_Handler.Add_Error_Token

1393: ) ;
1394:
1395: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
1396: p_rev_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
1397: Error_Handler.Add_Error_Token
1398: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
1399: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1400: , p_message_name => 'BOM_RES_ALREADY_EXISTS'
1401: , p_token_tbl => l_token_tbl

Line 1409: Error_Handler.Add_Error_Token

1405: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
1406: p_rev_op_resource_rec.transaction_type IN
1407: ( BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
1408: THEN
1409: Error_Handler.Add_Error_Token
1410: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
1411: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1412: , p_message_name => 'BOM_RES_DOESNOT_EXIST'
1413: , p_token_tbl => l_token_tbl

Line 1419: Error_Handler.Add_Error_Token

1415: l_return_status := FND_API.G_RET_STS_ERROR ;
1416:
1417: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1418: THEN
1419: Error_Handler.Add_Error_Token
1420: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
1421: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1422: , p_message_name => NULL
1423: , p_message_text => 'Unexpected error while existence verification of '

Line 1454: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1450: PROCEDURE Check_NonRefEvent
1451: ( p_operation_sequence_id IN NUMBER
1452: , p_operation_type IN NUMBER
1453: , p_entity_processed IN VARCHAR2
1454: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1455: , x_return_status IN OUT NOCOPY VARCHAR2
1456: )
1457: IS
1458:

Line 1460: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

1456: )
1457: IS
1458:
1459:
1460: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
1461: l_return_status VARCHAR2(1);
1462: l_err_text VARCHAR2(2000) ;
1463:
1464: -- Get ref flag and operation type

Line 1519: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1515: EXCEPTION
1516: -- Added for eAM enhancement
1517: WHEN EAM_SUB_RES_NOT_ACCESS THEN
1518:
1519: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1520: ('Maintenance routings do not support sub operation resources fanctionality') ;
1521: END IF ;
1522:
1523: -- Return the 'EAM'.

Line 1533: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1529: x_return_status := FND_API.G_RET_STS_ERROR ;
1530:
1531:
1532: WHEN OTHERS THEN
1533: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1534: ('Some unknown error in Check non-ref operation . . .' || SQLERRM );
1535: END IF ;
1536:
1537:

Line 1543: Error_Handler.Add_Error_Token

1539: || substrb(SQLERRM,1,200);
1540:
1541: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
1542:
1543: Error_Handler.Add_Error_Token
1544: ( p_message_name => NULL
1545: , p_message_text => l_err_text
1546: , p_mesg_token_tbl => l_mesg_token_tbl
1547: , x_mesg_token_tbl => l_mesg_token_tbl

Line 1572: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1568: ********************************************************************/
1569: PROCEDURE Check_Attributes
1570: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1571: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1572: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1573: , x_return_status IN OUT NOCOPY VARCHAR2
1574: )
1575: IS
1576:

Line 1620: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1616: *********************************************************************/
1617: PROCEDURE Check_Attributes
1618: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1619: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1620: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1621: , x_return_status IN OUT NOCOPY VARCHAR2
1622: )
1623: IS
1624:

Line 1627: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

1623: IS
1624:
1625: l_return_status VARCHAR2(1) ;
1626: l_err_text VARCHAR2(2000) ;
1627: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
1628: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
1629:
1630: BEGIN
1631:

Line 1628: l_Token_Tbl Error_Handler.Token_Tbl_Type ;

1624:
1625: l_return_status VARCHAR2(1) ;
1626: l_err_text VARCHAR2(2000) ;
1627: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
1628: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
1629:
1630: BEGIN
1631:
1632: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1647: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1643:
1644: IF p_rev_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1645: THEN
1646:
1647: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1648: ('Operation Resource Attr Validation: Missing Value. . . ' || l_return_status) ;
1649: END IF;
1650:
1651: -- Resource Code

Line 1654: Error_Handler.Add_Error_Token

1650:
1651: -- Resource Code
1652: IF p_rev_op_resource_rec.resource_code = FND_API.G_MISS_CHAR
1653: THEN
1654: Error_Handler.Add_Error_Token
1655: ( p_Message_Name => 'BOM_RES_RESCODE_MISSING'
1656: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1657: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1658: , p_Token_Tbl => l_Token_Tbl

Line 1667: Error_Handler.Add_Error_Token

1663:
1664: -- Standard Rate Flag
1665: IF p_rev_op_resource_rec.standard_rate_flag = FND_API.G_MISS_NUM
1666: THEN
1667: Error_Handler.Add_Error_Token
1668: ( p_Message_Name => 'BOM_RES_STD_RATE_MISSING'
1669: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1670: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1671: , p_Token_Tbl => l_Token_Tbl

Line 1680: Error_Handler.Add_Error_Token

1676:
1677: -- Assigned Units
1678: IF p_rev_op_resource_rec.assigned_units = FND_API.G_MISS_NUM
1679: THEN
1680: Error_Handler.Add_Error_Token
1681: ( p_Message_Name => 'BOM_RES_ASSIGNED_UNITS_MISSING'
1682: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1683: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1684: , p_Token_Tbl => l_Token_Tbl

Line 1693: Error_Handler.Add_Error_Token

1689:
1690: -- Usage Rate or Amount
1691: IF p_rev_op_resource_rec.usage_rate_or_amount = FND_API.G_MISS_NUM
1692: THEN
1693: Error_Handler.Add_Error_Token
1694: ( p_Message_Name => 'BOM_RES_RATE_AMT_MISSING'
1695: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1696: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1697: , p_Token_Tbl => l_Token_Tbl

Line 1705: Error_Handler.Add_Error_Token

1701:
1702: -- Usage Rate or Amount Inverse
1703: IF p_rev_op_resource_rec.usage_rate_or_amount_inverse = FND_API.G_MISS_NUM
1704: THEN
1705: Error_Handler.Add_Error_Token
1706: ( p_Message_Name => 'BOM_RES_RATE_AMT_INVRS_MISSING'
1707: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1708: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1709: , p_Token_Tbl => l_Token_Tbl

Line 1717: Error_Handler.Add_Error_Token

1713:
1714: -- Basis Type
1715: IF p_rev_op_resource_rec.basis_type = FND_API.G_MISS_NUM
1716: THEN
1717: Error_Handler.Add_Error_Token
1718: ( p_Message_Name => 'BOM_RES_BASISTYPE_MISSING'
1719: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1720: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1721: , p_Token_Tbl => l_Token_Tbl

Line 1730: Error_Handler.Add_Error_Token

1726:
1727: -- Schedule Flag
1728: IF p_rev_op_resource_rec.schedule_flag = FND_API.G_MISS_NUM
1729: THEN
1730: Error_Handler.Add_Error_Token
1731: ( p_Message_Name => 'BOM_RES_SCHEDULEFLAG_MISSING'
1732: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1733: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1734: , p_Token_Tbl => l_Token_Tbl

Line 1743: Error_Handler.Add_Error_Token

1739:
1740: -- Autocharge Type
1741: IF p_rev_op_resource_rec.autocharge_type = FND_API.G_MISS_NUM
1742: THEN
1743: Error_Handler.Add_Error_Token
1744: ( p_Message_Name => 'BOM_RES_ACHARGE_TYPE_MISSING'
1745: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1746: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1747: , p_Token_Tbl => l_Token_Tbl

Line 1759: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1755: -- Check if the user is trying to create/update a record with
1756: -- invalid value.
1757: --
1758:
1759: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1760: ('Operation Resource Attr Validation: Invalid Value. . . ' || l_return_status) ;
1761: END IF;
1762:
1763: -- Resource Code or Resource Id

Line 1770: Error_Handler.Add_Error_Token

1766: AND ( p_rev_op_res_unexp_rec.resource_id IS NULL
1767: OR p_rev_op_res_unexp_rec.resource_id = FND_API.G_MISS_NUM)
1768: THEN
1769:
1770: Error_Handler.Add_Error_Token
1771: ( p_Message_Name => 'BOM_RES_RESCODE_NULL'
1772: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1773: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1774: , p_Token_Tbl => l_Token_Tbl

Line 1785: Error_Handler.Add_Error_Token

1781: IF p_rev_op_resource_rec.standard_rate_flag IS NOT NULL AND
1782: p_rev_op_resource_rec.standard_rate_flag NOT IN (1,2)
1783: AND p_rev_op_resource_rec.standard_rate_flag <> FND_API.G_MISS_NUM
1784: THEN
1785: Error_Handler.Add_Error_Token
1786: ( p_Message_Name => 'BOM_RES_STD_RATE_INVALID'
1787: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1788: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1789: , p_Token_Tbl => l_Token_Tbl

Line 1800: Error_Handler.Add_Error_Token

1796: IF p_rev_op_resource_rec.principle_flag IS NOT NULL AND
1797: p_rev_op_resource_rec.principle_flag NOT IN (1,2)
1798: AND p_rev_op_resource_rec.principle_flag <> FND_API.G_MISS_NUM
1799: THEN
1800: Error_Handler.Add_Error_Token
1801: ( p_Message_Name => 'BOM_RES_PCLFLAG_INVALID'
1802: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1803: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1804: , p_Token_Tbl => l_Token_Tbl

Line 1817: Error_Handler.Add_Error_Token

1813: AND p_rev_op_resource_rec.resource_offset_percent <> FND_API.G_MISS_NUM
1814: THEN
1815: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1816: THEN
1817: Error_Handler.Add_Error_Token
1818: ( p_Message_Name => 'BOM_RES_OFFSET_PCT_INVALID'
1819: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1820: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1821: , p_Token_Tbl => l_Token_Tbl

Line 1833: Error_Handler.Add_Error_Token

1829: IF p_rev_op_resource_rec.assigned_units IS NOT NULL AND
1830: p_rev_op_resource_rec.assigned_units <= 0.00001
1831: AND p_rev_op_resource_rec.assigned_units <> FND_API.G_MISS_NUM
1832: THEN
1833: Error_Handler.Add_Error_Token
1834: ( p_Message_Name => 'BOM_RES_ASSIGNED_UNITS_INVALID'
1835: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1836: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1837: , p_Token_Tbl => l_Token_Tbl

Line 1848: Error_Handler.Add_Error_Token

1844: IF p_rev_op_resource_rec.basis_type IS NOT NULL AND
1845: p_rev_op_resource_rec.basis_type NOT IN (1,2)
1846: AND p_rev_op_resource_rec.basis_type <> FND_API.G_MISS_NUM
1847: THEN
1848: Error_Handler.Add_Error_Token
1849: ( p_Message_Name => 'BOM_RES_BASISTYPE_INVALID'
1850: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1851: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1852: , p_Token_Tbl => l_Token_Tbl

Line 1863: Error_Handler.Add_Error_Token

1859: IF p_rev_op_resource_rec.schedule_flag IS NOT NULL AND
1860: p_rev_op_resource_rec.schedule_flag NOT IN (1,2,3,4)
1861: AND p_rev_op_resource_rec.schedule_flag <> FND_API.G_MISS_NUM
1862: THEN
1863: Error_Handler.Add_Error_Token
1864: ( p_Message_Name => 'BOM_RES_SCHEDULEFLAG_INVALID'
1865: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1866: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1867: , p_Token_Tbl => l_Token_Tbl

Line 1878: Error_Handler.Add_Error_Token

1874: IF p_rev_op_resource_rec.autocharge_type IS NOT NULL AND
1875: p_rev_op_resource_rec.autocharge_type NOT IN (1,2,3,4)
1876: AND p_rev_op_resource_rec.autocharge_type <> FND_API.G_MISS_NUM
1877: THEN
1878: Error_Handler.Add_Error_Token
1879: ( p_Message_Name => 'BOM_RES_ACHARGE_TYPE_INVALID'
1880: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1881: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1882: , p_Token_Tbl => l_Token_Tbl

Line 1906: Error_Handler.Add_Error_Token

1902: ELSE
1903: l_token_tbl(2).token_value := '' ;
1904: END IF ;
1905:
1906: Error_Handler.Add_Error_Token
1907: ( p_Message_Name => 'BOM_RES_ACD_TYPE_INVALID'
1908: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1909: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1910: , p_Token_Tbl => l_Token_Tbl

Line 1918: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1914:
1915:
1916:
1917: -- Done validating attributes
1918: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1919: ('Operation Resource Attr Validation completed with return_status: ' || l_return_status) ;
1920: END IF;
1921:
1922: x_return_status := l_return_status;

Line 1927: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1923: x_mesg_token_tbl := l_Mesg_Token_Tbl;
1924:
1925: EXCEPTION
1926: WHEN OTHERS THEN
1927: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1928: ('Some unknown error in Attribute Validation . . .' || SQLERRM );
1929: END IF ;
1930:
1931:

Line 1936: Error_Handler.Add_Error_Token

1932: l_err_text := G_PKG_NAME || ' Validation (Attr. Validation) '
1933: || substrb(SQLERRM,1,200);
1934: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
1935:
1936: Error_Handler.Add_Error_Token
1937: ( p_message_name => NULL
1938: , p_message_text => l_err_text
1939: , p_mesg_token_tbl => l_mesg_token_tbl
1940: , x_mesg_token_tbl => l_mesg_token_tbl

Line 1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1968: , p_old_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
1969: , p_old_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1970: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
1971: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
1972: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1973: , x_return_status IN OUT NOCOPY VARCHAR2
1974: )
1975: IS
1976: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;

Line 2047: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

2043: , p_old_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2044: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
2045: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
2046: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
2047: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2048: , x_return_status IN OUT NOCOPY VARCHAR2
2049: )
2050: IS
2051:

Line 2067: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

2063:
2064: -- Error Handlig Variables
2065: l_return_status VARCHAR2(1);
2066: l_err_text VARCHAR2(2000) ;
2067: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
2068: l_token_tbl Error_Handler.Token_Tbl_Type;
2069:
2070: l_get_setups NUMBER; --APS Enhancement for Routings
2071: l_batchable NUMBER; --APS Enhancement for Routings

Line 2068: l_token_tbl Error_Handler.Token_Tbl_Type;

2064: -- Error Handlig Variables
2065: l_return_status VARCHAR2(1);
2066: l_err_text VARCHAR2(2000) ;
2067: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
2068: l_token_tbl Error_Handler.Token_Tbl_Type;
2069:
2070: l_get_setups NUMBER; --APS Enhancement for Routings
2071: l_batchable NUMBER; --APS Enhancement for Routings
2072: /* Added below two variables for fixing bug 6074930*/

Line 2208: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2204: l_rev_op_res_unexp_rec := p_rev_op_res_unexp_rec ;
2205: l_return_status := FND_API.G_RET_STS_SUCCESS ;
2206: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2207:
2208: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2209: ('Performing Op Resource Check Entity Validation . . .') ;
2210: END IF ;
2211:
2212: --

Line 2223: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2219: -- The ECO can be updated but a warning needs to be generated and
2220: -- scheduled revised items need to be update to Open
2221: -- and the ECO status need to be changed to Not Submitted for Approval
2222:
2223: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2224: ('Check if ECO has been approved and has a workflow process. . . ' || l_return_status) ;
2225: END IF ;
2226:
2227: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

Line 2253: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2249: -- Performing Entity Validation in Revised Op Resource(ECO BO)
2250: --
2251: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
2252: THEN
2253: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2254: ('Performing Entitity Validation for Eco Routing :ACD Type. . .') ;
2255: END IF ;
2256:
2257: --

Line 2275: Error_Handler.Add_Error_Token

2271: LOOP
2272: l_token_tbl(2).token_name := 'OP_SEQ_NUMBER';
2273: l_token_tbl(2).token_value := l_rev_op_resource_rec.operation_sequence_number ;
2274:
2275: Error_Handler.Add_Error_Token
2276: ( p_message_name => 'BOM_RES_DISABLE_RES_NOT_FOUND'
2277: , p_mesg_token_tbl => l_Mesg_Token_Tbl
2278: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2279: , p_token_tbl => l_token_tbl

Line 2306: Error_Handler.Add_Error_Token

2302: THEN
2303: l_token_tbl(2).token_name := 'OP_SEQ_NUMBER';
2304: l_token_tbl(2).token_value := l_rev_op_resource_rec.operation_sequence_number ;
2305:
2306: Error_Handler.Add_Error_Token
2307: ( p_message_name => 'BOM_RES_ACD_NOT_COMPATIBLE'
2308: , p_mesg_token_tbl => l_Mesg_Token_Tbl
2309: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2310: , p_token_tbl => l_token_tbl

Line 2335: Error_Handler.Add_Error_Token

2331: , p_old_rev_op_res_unexp_rec => p_old_rev_op_res_unexp_rec )
2332: THEN
2333: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2334: THEN
2335: Error_Handler.Add_Error_Token
2336: ( p_message_name => 'BOM_RES_NOT_UPDATE_IN_CHANGE'
2337: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2338: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2339: , p_token_tbl => l_token_tbl

Line 2355: Error_Handler.Add_Error_Token

2351: AND l_rev_op_resource_rec.acd_type <> p_old_rev_op_resource_rec.acd_type
2352: THEN
2353: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2354: THEN
2355: Error_Handler.Add_Error_Token
2356: ( p_message_name => 'BOM_RES_ACD_TYPENOT_UPDATEABLE'
2357: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2358: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2359: , p_token_tbl => l_token_tbl

Line 2379: Error_Handler.Add_Error_Token

2375: FROM bom_resources
2376: WHERE resource_id = p_rev_op_res_unexp_rec.resource_id;
2377: IF (l_get_setups IS NOT NULL or l_batchable = 1) THEN
2378: IF p_rev_op_resource_rec.assigned_units <> 1 THEN
2379: Error_Handler.Add_Error_Token
2380: ( p_Message_Name => 'BOM_RES_ASSIGNED_UNIT_INCORRECT'
2381: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2382: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2383: , p_Token_Tbl => l_Token_Tbl

Line 2408: Error_Handler.Add_Error_Token

2404: THEN
2405: l_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
2406: l_token_tbl(2).token_value := p_rev_op_resource_rec.revised_item_name;
2407:
2408: Error_Handler.Add_Error_Token
2409: ( p_message_name => 'BOM_RES_RIT_ECO_WO_EFF_INVALID'
2410: , p_mesg_token_tbl => l_Mesg_Token_Tbl
2411: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2412: , p_token_tbl => l_token_tbl

Line 2425: Error_Handler.Write_Debug ('Validating the Assigned Units for a Batchable Resource . . .') ;

2421:
2422:
2423: -- Modified validation for Assigned Units
2424: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN
2425: Error_Handler.Write_Debug ('Validating the Assigned Units for a Batchable Resource . . .') ;
2426: END IF;
2427:
2428: IF l_rev_op_resource_rec.transaction_type IN
2429: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)

Line 2448: Error_Handler.Add_Error_Token

2444: IF p_rev_op_resource_rec.assigned_units <> 1 THEN
2445: l_Token_Tbl(2).token_name := 'RES_SEQ_NUMBER';
2446: --l_Token_Tbl(2).token_value := p_rev_op_resource_rec.Resource_Code;
2447: l_Token_Tbl(2).token_value := p_rev_op_resource_rec.Resource_Sequence_Number;
2448: Error_Handler.Add_Error_Token
2449: ( p_Message_Name => 'BOM_RES_ASSIGNED_UNITS_WRONG'
2450: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2451: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2452: , p_Token_Tbl => l_Token_Tbl

Line 2486: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2482: <> p_old_rev_op_res_unexp_rec.substitute_group_number ))
2483: AND p_old_rev_op_resource_rec.schedule_flag = l_NEXT
2484: THEN
2485:
2486: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2487: ('Check if you can update Next or Prior Schedule Res to others. . . . ' || l_return_status) ;
2488: END IF ;
2489:
2490: FOR l_subres_schedule_rec IN l_subres_schedule_csr

Line 2498: Error_Handler.Add_Error_Token

2494: LOOP
2495:
2496: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2497: THEN
2498: Error_Handler.Add_Error_Token
2499: ( p_message_name => 'BOM_RES_NEXTPRIOR_NOT_UPDATE'
2500: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2501: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2502: , p_Token_Tbl => l_Token_Tbl

Line 2521: Error_Handler.Add_Error_Token

2517: LOOP
2518:
2519: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2520: THEN
2521: Error_Handler.Add_Error_Token
2522: ( p_message_name => 'BOM_RES_NEXTPRIOR_NOT_UPDATE'
2523: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2524: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2525: , p_Token_Tbl => l_Token_Tbl

Line 2547: Error_Handler.Add_Error_Token

2543: LOOP
2544:
2545: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2546: THEN
2547: Error_Handler.Add_Error_Token
2548: ( p_message_name => 'BOM_RES_NEXTPRIOR_NOT_UPDATE'
2549: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2550: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2551: , p_Token_Tbl => l_Token_Tbl

Line 2570: Error_Handler.Add_Error_Token

2566: LOOP
2567:
2568: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2569: THEN
2570: Error_Handler.Add_Error_Token
2571: ( p_message_name => 'BOM_RES_NEXTPRIOR_NOT_UPDATE'
2572: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2573: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2574: , p_Token_Tbl => l_Token_Tbl

Line 2599: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2595: <> p_old_rev_op_res_unexp_rec.substitute_group_number ))
2596: AND p_old_rev_op_resource_rec.autocharge_type = l_PO_MOVE
2597: THEN
2598:
2599: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2600: ('Check if you can update PO Move to others. . . . ' || l_return_status) ;
2601: END IF ;
2602:
2603: FOR l_subres_pomove_rec IN l_subres_pomove_csr

Line 2611: Error_Handler.Add_Error_Token

2607: LOOP
2608:
2609: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2610: THEN
2611: Error_Handler.Add_Error_Token
2612: ( p_message_name => 'BOM_RES_POMOVE_NOT_UPDATE'
2613: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2614: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2615: , p_Token_Tbl => l_Token_Tbl

Line 2635: Error_Handler.Add_Error_Token

2631: LOOP
2632:
2633: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2634: THEN
2635: Error_Handler.Add_Error_Token
2636: ( p_message_name => 'BOM_RES_POMOVE_NOT_UPDATE'
2637: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2638: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2639: , p_Token_Tbl => l_Token_Tbl

Line 2654: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2650: -- Schedule Sequence Number and Sub Group Num
2651: -- Check if there are associated sub resources to OLD
2652: -- Substitute Group Number
2653: --
2654: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2655: ('Check if you can change Schedule Seq Num. . . . ' || l_return_status) ;
2656: END IF ;
2657:
2658: IF ( nvl(l_rev_op_resource_rec.substitute_group_number, l_rev_op_res_unexp_rec.substitute_group_number)

Line 2671: Error_Handler.Add_Error_Token

2667: LOOP
2668:
2669: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2670: THEN
2671: Error_Handler.Add_Error_Token
2672: ( p_message_name => 'BOM_RES_SUBRES_EXIST'
2673: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2674: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2675: , p_Token_Tbl => l_Token_Tbl

Line 2695: Error_Handler.Add_Error_Token

2691: LOOP
2692:
2693: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2694: THEN
2695: Error_Handler.Add_Error_Token
2696: ( p_message_name => 'BOM_RES_SUBRES_EXIST'
2697: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2698: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2699: , p_Token_Tbl => l_Token_Tbl

Line 2713: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2709:
2710: END IF ; -- Transation: UPDATE
2711:
2712:
2713: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2714: ('End of Validation specific to the Transaction Type of Update : ' || l_return_status) ;
2715: END IF ;
2716:
2717: --

Line 2724: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2720: IF l_rev_op_resource_rec.transaction_type IN
2721: (BOM_Rtg_Globals.G_OPR_CREATE, BOM_Rtg_Globals.G_OPR_UPDATE)
2722: THEN
2723:
2724: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2725: ('Common Validateion for Transaction Type : Create and Update . . . . ' || l_return_status) ;
2726: END IF ;
2727:
2728: --

Line 2749: Error_Handler.Add_Error_Token

2745: IF l_temp_status = FND_API.G_RET_STS_ERROR
2746: THEN
2747: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2748: THEN
2749: Error_Handler.Add_Error_Token
2750: ( p_message_name => 'BOM_RES_RESID_INVALID'
2751: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2752: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2753: , p_Token_Tbl => l_Token_Tbl

Line 2761: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2757: l_return_status := FND_API.G_RET_STS_ERROR ;
2758:
2759: END IF ;
2760:
2761: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2762: ('Check if Resource is valid. . . . ' || l_return_status) ;
2763: END IF ;
2764:
2765: END IF ;

Line 2781: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2777: AND ( l_rev_op_res_unexp_rec.activity_id IS NOT NULL AND
2778: l_rev_op_res_unexp_rec.activity_id <> FND_API.G_MISS_NUM )
2779: THEN
2780:
2781: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2782: ('Activity_Id : ' || to_char(l_rev_op_res_unexp_rec.activity_id)) ;
2783: END IF ;
2784:
2785: /* Call Val_Activity_Id */

Line 2796: Error_Handler.Add_Error_Token

2792: IF l_temp_status = FND_API.G_RET_STS_ERROR
2793: THEN
2794: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2795: THEN
2796: Error_Handler.Add_Error_Token
2797: ( p_message_name => 'BOM_RES_ACTID_INVALID'
2798: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2799: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2800: , p_Token_Tbl => l_Token_Tbl

Line 2808: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2804: l_return_status := FND_API.G_RET_STS_ERROR ;
2805:
2806: END IF ;
2807:
2808: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2809: ('Check if Activity is valid. . . . ' || l_return_status) ;
2810: END IF ;
2811:
2812: END IF ;

Line 2829: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2825: AND ( l_rev_op_res_unexp_rec.setup_id IS NOT NULL AND
2826: l_rev_op_res_unexp_rec.setup_id <> FND_API.G_MISS_NUM )
2827: THEN
2828:
2829: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2830: ('Setup Id : ' || to_char(l_rev_op_res_unexp_rec.setup_id)) ;
2831: END IF ;
2832:
2833: /* Call Val_Activity_Id */

Line 2853: Error_Handler.Add_Error_Token

2849: l_token_tbl(3).token_name := 'RESOURCE_CODE';
2850: l_token_tbl(3).token_value :=
2851: l_rev_op_resource_rec.resource_code ;
2852:
2853: Error_Handler.Add_Error_Token
2854: ( p_message_name => 'BOM_RES_SETUP_ID_INVALID'
2855: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2856: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2857: , p_Token_Tbl => l_Token_Tbl

Line 2868: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2864: l_return_status := FND_API.G_RET_STS_ERROR ;
2865:
2866: END IF ;
2867:
2868: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2869: ('Check if Setup is valid. . . . ' || l_return_status) ;
2870: END IF ;
2871:
2872: END IF ;

Line 2915: Error_Handler.Add_Error_Token

2911: IF l_temp_status = FND_API.G_RET_STS_ERROR
2912: THEN
2913: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2914: THEN
2915: Error_Handler.Add_Error_Token
2916: ( p_message_name => 'BOM_RES_SCHEDULE_MUSTBE_NO'
2917: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2918: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2919: , p_Token_Tbl => l_Token_Tbl

Line 2927: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2923: l_return_status := FND_API.G_RET_STS_ERROR ;
2924:
2925: END IF ;
2926:
2927: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2928: ('Check if Schedule flag is valid. . . . ' || l_return_status) ;
2929: END IF ;
2930:
2931: END IF ;

Line 2958: Error_Handler.Add_Error_Token

2954: AND FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2955: THEN
2956: IF p_rev_op_resource_rec.schedule_flag = l_YES_SCHEDULE -- 1: Yes
2957: THEN
2958: Error_Handler.Add_Error_Token
2959: ( p_message_name => 'BOM_RES_YES_INVALID'
2960: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2961: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2962: , p_Token_Tbl => l_Token_Tbl

Line 2966: Error_Handler.Add_Error_Token

2962: , p_Token_Tbl => l_Token_Tbl
2963: ) ;
2964: ELSIF p_rev_op_resource_rec.schedule_flag = l_PRIOR -- 3: Prior
2965: THEN
2966: Error_Handler.Add_Error_Token
2967: ( p_message_name => 'BOM_RES_PRIOR_INVALID'
2968: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2969: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2970: , p_Token_Tbl => l_Token_Tbl

Line 2974: Error_Handler.Add_Error_Token

2970: , p_Token_Tbl => l_Token_Tbl
2971: ) ;
2972: ELSIF p_rev_op_resource_rec.schedule_flag = l_NEXT -- 4: Next
2973: THEN
2974: Error_Handler.Add_Error_Token
2975: ( p_message_name => 'BOM_RES_NEXT_INVALID'
2976: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2977: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2978: , p_Token_Tbl => l_Token_Tbl

Line 2984: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2980: END IF ;
2981: l_return_status := FND_API.G_RET_STS_ERROR ;
2982: END IF ; -- If Error
2983:
2984: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2985: ('Check next or prior scheduled resource. . . . ' || l_return_status) ;
2986: END IF ;
2987:
2988: END IF ;

Line 3012: Error_Handler.Add_Error_Token

3008: IF l_temp_status = FND_API.G_RET_STS_ERROR
3009: THEN
3010: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3011: THEN
3012: Error_Handler.Add_Error_Token
3013: ( p_message_name => 'BOM_RES_PO_ATHARGE_LOC_INVALID'
3014: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3015: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3016: , p_Token_Tbl => l_Token_Tbl

Line 3024: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3020: l_return_status := FND_API.G_RET_STS_ERROR ;
3021:
3022: END IF ;
3023:
3024: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3025: ('Check if Autocharge type is valid. . . . ' || l_return_status) ;
3026: END IF ;
3027:
3028: END IF ;

Line 3055: Error_Handler.Add_Error_Token

3051: IF l_temp_status = FND_API.G_RET_STS_ERROR
3052: THEN
3053: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3054: THEN
3055: Error_Handler.Add_Error_Token
3056: ( p_message_name => 'BOM_RES_ATCHRG_CSTCODE_INVALID'
3057: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3058: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3059: , p_Token_Tbl => l_Token_Tbl

Line 3067: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3063: l_return_status := FND_API.G_RET_STS_ERROR ;
3064:
3065: END IF ;
3066:
3067: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3068: ('Check if resource is OSP resource when autocharge is PO Move or PO Receipt. . . . ' || l_return_status) ;
3069: END IF ;
3070:
3071: END IF ;

Line 3096: Error_Handler.Add_Error_Token

3092: THEN
3093:
3094: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3095: THEN
3096: Error_Handler.Add_Error_Token
3097: ( p_message_name => 'BOM_RES_POMOVE_INVALID'
3098: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3099: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3100: , p_Token_Tbl => l_Token_Tbl

Line 3108: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3104: l_return_status := FND_API.G_RET_STS_ERROR ;
3105: END IF ;
3106:
3107:
3108: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3109: ('Check if parent operation can have the Po Move resource . . . . ' || l_return_status) ;
3110: END IF ;
3111:
3112: END IF ;

Line 3140: Error_Handler.Add_Error_Token

3136: IF l_temp_status = FND_API.G_RET_STS_ERROR
3137: THEN
3138: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3139: THEN
3140: Error_Handler.Add_Error_Token
3141: ( p_message_name => 'BOM_RES_RATEORAMOUNT_INVALID'
3142: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3143: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3144: , p_Token_Tbl => l_Token_Tbl

Line 3152: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3148: l_return_status := FND_API.G_RET_STS_ERROR ;
3149:
3150: END IF ;
3151:
3152: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3153: ('Check round value for Usage Rate or Amount and the Inverse . . . ' || l_return_status) ;
3154: END IF ;
3155:
3156: END IF ;

Line 3209: Error_Handler.Add_Error_Token

3205: IF l_temp_status = FND_API.G_RET_STS_ERROR
3206: THEN
3207: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3208: THEN
3209: Error_Handler.Add_Error_Token
3210: ( p_message_name => 'BOM_RES_NEGATIVE_USAGE_INVALID'
3211: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3212: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3213: , p_Token_Tbl => l_Token_Tbl

Line 3221: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3217: l_return_status := FND_API.G_RET_STS_ERROR ;
3218:
3219: END IF ;
3220:
3221: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3222: ('Check negative usage rate. . . . ' || l_return_status) ;
3223: END IF ;
3224:
3225: END IF ;

Line 3261: Error_Handler.Add_Error_Token

3257: THEN
3258: --dbms_output.put_line('found error in principal flag for resources');
3259: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3260: THEN
3261: Error_Handler.Add_Error_Token
3262: ( p_message_name => 'BOM_RES_PCFLAG_DUPLICATE'
3263: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3264: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3265: , p_Token_Tbl => l_Token_Tbl

Line 3273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3269: l_return_status := FND_API.G_RET_STS_ERROR ;
3270:
3271: END IF ;
3272:
3273: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3274: ('Check principal flag . . . . ' || l_return_status) ;
3275: END IF ;
3276:
3277: END IF ;

Line 3307: Error_Handler.Add_Error_Token

3303:
3304: l_Token_Tbl(1).Token_Name := 'VALUE';
3305: l_Token_Tbl(1).Token_Value := l_rev_op_resource_rec.schedule_sequence_number;
3306:
3307: Error_Handler.Add_Error_Token
3308: ( p_message_name => 'BOM_SAME_SUB_GRP_NUM'
3309: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3310: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3311: , p_Token_Tbl => l_Token_Tbl

Line 3360: Error_Handler.Add_Error_Token

3356: l_Token_Tbl(2).Token_Value := l_rev_op_resource_rec.schedule_sequence_number;
3357: l_Token_Tbl(3).Token_Name := 'OP_SEQ_NUM';
3358: l_Token_Tbl(3).Token_Value := l_rev_op_resource_rec.operation_sequence_number;
3359:
3360: Error_Handler.Add_Error_Token
3361: ( p_message_name => 'BOM_RES_SSN_ALREADY_EXISTS'
3362: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3363: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3364: , p_Token_Tbl => l_Token_Tbl

Line 3420: Error_Handler.Add_Error_Token

3416: l_Token_Tbl(2).Token_Value:= l_res_code_2;
3417: l_Token_Tbl(3).Token_Name := 'OP_SEQ';
3418: l_Token_Tbl(3).Token_Value := l_rev_op_resource_rec.operation_sequence_number;
3419:
3420: Error_Handler.Add_Error_Token
3421: ( p_message_name => 'BOM_SIM_RES_SAME_PRIOR_NEXT'
3422: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3423: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3424: , p_Token_Tbl => l_Token_Tbl

Line 3435: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3431:
3432: END IF ; -- Transaction Type : Create and Update
3433:
3434:
3435: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3436: ('Entity Validation was processed. . . ' || l_return_status);
3437: END IF ;
3438:
3439:

Line 3455: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

3451:
3452:
3453: EXCEPTION
3454: WHEN OTHERS THEN
3455: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
3456: ('Some unknown error in Entity Validation . . .' || SQLERRM );
3457: END IF ;
3458:
3459:

Line 3464: Error_Handler.Add_Error_Token

3460: l_err_text := G_PKG_NAME || ' Validation (Entity Validation) '
3461: || substrb(SQLERRM,1,200);
3462: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
3463:
3464: Error_Handler.Add_Error_Token
3465: ( p_message_name => NULL
3466: , p_message_text => l_err_text
3467: , p_mesg_token_tbl => l_mesg_token_tbl
3468: , x_mesg_token_tbl => l_mesg_token_tbl

Line 3502: x_return_status := Error_Handler.G_STATUS_ERROR;

3498: AND RESOURCE_ID = p_resource_id
3499: AND OPERATION_SEQUENCE_ID = p_op_seq_id ;
3500:
3501: IF ( l_same_rsc_ssn > 0 ) THEN
3502: x_return_status := Error_Handler.G_STATUS_ERROR;
3503: END IF;
3504:
3505: EXCEPTION
3506: WHEN NO_DATA_FOUND THEN

Line 3557: x_return_status := Error_Handler.G_STATUS_ERROR;

3553:
3554: /* Return error status if violation occurs */
3555: IF l_sch_res_cur%FOUND THEN
3556: p_ret_res_id := l_resource_id;
3557: x_return_status := Error_Handler.G_STATUS_ERROR;
3558: END IF;
3559:
3560: IF l_sch_res_cur%ISOPEN THEN
3561: CLOSE l_sch_res_cur;

Line 3574: x_return_status := Error_Handler.G_STATUS_ERROR;

3570:
3571: /* Return error status if violation occurs */
3572: IF l_sch_sub_res_cur%FOUND THEN
3573: p_ret_res_id := l_resource_id;
3574: x_return_status := Error_Handler.G_STATUS_ERROR;
3575: END IF;
3576:
3577: IF l_sch_sub_res_cur%ISOPEN THEN
3578: CLOSE l_sch_sub_res_cur;