464: OPEN C;
465: FETCH C INTO Recinfo;
466: if (C%NOTFOUND) then
467: CLOSE C;
468: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
469: APP_EXCEPTION.RAISE_EXCEPTION;
470: end if;
471: CLOSE C;
472: if (
568: AND (X_Shutdown_Type IS NULL)))
569: ) then
570: return;
571: else
572: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
573: APP_EXCEPTION.RAISE_EXCEPTION;
574: end if;
575: END Lock_Row;
576:
722: OPEN C;
723: FETCH C INTO Recinfo;
724: if (C%NOTFOUND) then
725: CLOSE C;
726: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
727: APP_EXCEPTION.RAISE_EXCEPTION;
728: end if;
729: CLOSE C;
730: if (
871:
872: ) then
873: return;
874: else
875: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
876: APP_EXCEPTION.RAISE_EXCEPTION;
877: end if;
878: END Lock_Row;
879:
1215: End If;
1216:
1217: EXCEPTION
1218: WHEN NO_DATA_FOUND THEN
1219: FND_MESSAGE.SET_NAME('BOM', 'BOM_ALREADY_EXISTS');
1220: if (( X_Operation_type =1) and (X_Line_Id is null )) then
1221: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD OPERATION_CAP', TRUE);
1222: elsif (X_Operation_type =3) then
1223: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD LINE_OP_CAP', TRUE);
1217: EXCEPTION
1218: WHEN NO_DATA_FOUND THEN
1219: FND_MESSAGE.SET_NAME('BOM', 'BOM_ALREADY_EXISTS');
1220: if (( X_Operation_type =1) and (X_Line_Id is null )) then
1221: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD OPERATION_CAP', TRUE);
1222: elsif (X_Operation_type =3) then
1223: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD LINE_OP_CAP', TRUE);
1224: elsif (X_Operation_type =2) then
1225: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD PROCESS_CAP', TRUE);
1219: FND_MESSAGE.SET_NAME('BOM', 'BOM_ALREADY_EXISTS');
1220: if (( X_Operation_type =1) and (X_Line_Id is null )) then
1221: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD OPERATION_CAP', TRUE);
1222: elsif (X_Operation_type =3) then
1223: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD LINE_OP_CAP', TRUE);
1224: elsif (X_Operation_type =2) then
1225: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD PROCESS_CAP', TRUE);
1226: else
1227: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD EVENT_CAP', TRUE);
1221: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD OPERATION_CAP', TRUE);
1222: elsif (X_Operation_type =3) then
1223: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD LINE_OP_CAP', TRUE);
1224: elsif (X_Operation_type =2) then
1225: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD PROCESS_CAP', TRUE);
1226: else
1227: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD EVENT_CAP', TRUE);
1228: end if;
1229: FND_MESSAGE.SET_TOKEN('ENTITY2', X_Operation_Code);
1223: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD LINE_OP_CAP', TRUE);
1224: elsif (X_Operation_type =2) then
1225: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD PROCESS_CAP', TRUE);
1226: else
1227: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD EVENT_CAP', TRUE);
1228: end if;
1229: FND_MESSAGE.SET_TOKEN('ENTITY2', X_Operation_Code);
1230: APP_EXCEPTION.RAISE_EXCEPTION;
1231: END Check_Unique;
1225: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD PROCESS_CAP', TRUE);
1226: else
1227: FND_MESSAGE.SET_TOKEN('ENTITY1', 'STANDARD EVENT_CAP', TRUE);
1228: end if;
1229: FND_MESSAGE.SET_TOKEN('ENTITY2', X_Operation_Code);
1230: APP_EXCEPTION.RAISE_EXCEPTION;
1231: END Check_Unique;
1232:
1233:
1254:
1255: EXCEPTION
1256: WHEN NO_DATA_FOUND THEN
1257: SELECT LINE_CODE into x_line_code from WIP_LINES where LINE_ID = X_Line_id;
1258: FND_MESSAGE.SET_NAME('BOM', 'BOM_ALREADY_EXISTS');
1259: FND_MESSAGE.SET_TOKEN('ENTITY1', X_Sequence_Num);
1260: FND_MESSAGE.SET_TOKEN('ENTITY2', x_line_code);
1261: APP_EXCEPTION.RAISE_EXCEPTION;
1262: END Check_Unique_Seq;
1255: EXCEPTION
1256: WHEN NO_DATA_FOUND THEN
1257: SELECT LINE_CODE into x_line_code from WIP_LINES where LINE_ID = X_Line_id;
1258: FND_MESSAGE.SET_NAME('BOM', 'BOM_ALREADY_EXISTS');
1259: FND_MESSAGE.SET_TOKEN('ENTITY1', X_Sequence_Num);
1260: FND_MESSAGE.SET_TOKEN('ENTITY2', x_line_code);
1261: APP_EXCEPTION.RAISE_EXCEPTION;
1262: END Check_Unique_Seq;
1263:
1256: WHEN NO_DATA_FOUND THEN
1257: SELECT LINE_CODE into x_line_code from WIP_LINES where LINE_ID = X_Line_id;
1258: FND_MESSAGE.SET_NAME('BOM', 'BOM_ALREADY_EXISTS');
1259: FND_MESSAGE.SET_TOKEN('ENTITY1', X_Sequence_Num);
1260: FND_MESSAGE.SET_TOKEN('ENTITY2', x_line_code);
1261: APP_EXCEPTION.RAISE_EXCEPTION;
1262: END Check_Unique_Seq;
1263:
1264:
1273: );
1274:
1275: EXCEPTION
1276: WHEN NO_DATA_FOUND THEN
1277: FND_MESSAGE.SET_NAME('BOM', 'BOM_STD_OP_IN_USE');
1278: FND_MESSAGE.SET_TOKEN('ENTITY', X_Operation_Code);
1279: APP_EXCEPTION.RAISE_EXCEPTION;
1280: END Check_References;
1281:
1274:
1275: EXCEPTION
1276: WHEN NO_DATA_FOUND THEN
1277: FND_MESSAGE.SET_NAME('BOM', 'BOM_STD_OP_IN_USE');
1278: FND_MESSAGE.SET_TOKEN('ENTITY', X_Operation_Code);
1279: APP_EXCEPTION.RAISE_EXCEPTION;
1280: END Check_References;
1281:
1282: PROCEDURE Delete_Details(X_Standard_Operation_Id NUMBER) IS
1328: );
1329:
1330: EXCEPTION
1331: WHEN NO_DATA_FOUND THEN
1332: FND_MESSAGE.SET_NAME('BOM', 'BOM_SETUP_STD_OP_IN_USE');
1333: FND_MESSAGE.SET_TOKEN('ENTITY', P_Operation_Code);
1334: APP_EXCEPTION.RAISE_EXCEPTION;
1335: END Check_Setup_Std_Op_Ref;
1336:
1329:
1330: EXCEPTION
1331: WHEN NO_DATA_FOUND THEN
1332: FND_MESSAGE.SET_NAME('BOM', 'BOM_SETUP_STD_OP_IN_USE');
1333: FND_MESSAGE.SET_TOKEN('ENTITY', P_Operation_Code);
1334: APP_EXCEPTION.RAISE_EXCEPTION;
1335: END Check_Setup_Std_Op_Ref;
1336:
1337: END B_STD_OP_PKG;