243:
244: IF ((X_Error_Code = 'APP-00000') AND
245: (Attribute_Variable IS NULL)) THEN
246:
247: FND_MESSAGE.Set_Name('INV',
248: 'INV_NULL_ATTRIBUTE_VALUE');
249: Error_Code := 'APP-43041';
250: Error_Flag := 'W';
251: Error_Message := FND_MESSAGE.Get;
247: FND_MESSAGE.Set_Name('INV',
248: 'INV_NULL_ATTRIBUTE_VALUE');
249: Error_Code := 'APP-43041';
250: Error_Flag := 'W';
251: Error_Message := FND_MESSAGE.Get;
252: RETURN;
253: ELSE
254: Attribute_Value := Attribute_Variable;
255:
255:
256: END IF;
257:
258: ELSE
259: FND_MESSAGE.Set_Name('INV', 'INV_INVALID_COLUMN_NAME');
260: Error_Code := 'APP-43043';
261: Error_Flag := 'Y';
262: Error_Message := FND_MESSAGE.Get;
263: RETURN;
258: ELSE
259: FND_MESSAGE.Set_Name('INV', 'INV_INVALID_COLUMN_NAME');
260: Error_Code := 'APP-43043';
261: Error_Flag := 'Y';
262: Error_Message := FND_MESSAGE.Get;
263: RETURN;
264: END IF;
265:
266: ELSE
264: END IF;
265:
266: ELSE
267:
268: FND_MESSAGE.Set_Name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
269: Error_Code := 'APP-43042';
270: Error_Flag := 'Y';
271: Error_Message := FND_MESSAGE.Get;
272: RETURN;
267:
268: FND_MESSAGE.Set_Name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
269: Error_Code := 'APP-43042';
270: Error_Flag := 'Y';
271: Error_Message := FND_MESSAGE.Get;
272: RETURN;
273: END IF;
274:
275: EXCEPTION
275: EXCEPTION
276:
277: WHEN NO_DATA_FOUND THEN
278:
279: FND_MESSAGE.Set_Name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
280: Error_Code := 'APP-43042';
281: Error_Flag := 'Y';
282: Error_Message := FND_MESSAGE.Get;
283: RETURN;
278:
279: FND_MESSAGE.Set_Name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
280: Error_Code := 'APP-43042';
281: Error_Flag := 'Y';
282: Error_Message := FND_MESSAGE.Get;
283: RETURN;
284:
285: WHEN OTHERS THEN
286:
463: IF ( (Y_Customer_Id IS NULL)
464: OR (Y_Organization_Id IS NULL)
465: OR ( (Y_Customer_Item_Id IS NULL) AND
466: (Y_Customer_Item_Number IS NULL) ) ) THEN
467: FND_MESSAGE.Set_Name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
468: X_Error_Flag := 'Y';
469: X_Error_Code := 'APP-43042';
470: X_Error_Message := FND_MESSAGE.Get;
471: RETURN;
466: (Y_Customer_Item_Number IS NULL) ) ) THEN
467: FND_MESSAGE.Set_Name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
468: X_Error_Flag := 'Y';
469: X_Error_Code := 'APP-43042';
470: X_Error_Message := FND_MESSAGE.Get;
471: RETURN;
472: END IF;
473:
474: --rdevakum, fix for bug 466738. variables for item definition level.
484: OPEN RA_Addresses_Cur (Y_Address_Id);
485: FETCH RA_Addresses_Cur
486: INTO l_Customer_Id;
487: IF ( RA_Addresses_Cur%NOTFOUND ) THEN
488: FND_MESSAGE.Set_Name('INV', 'INV_INVALID_CUST_ADDRESS');
489: X_Error_Flag := 'Y';
490: X_Error_Code := 'APP-43099';
491: X_Error_Message := FND_MESSAGE.Get;
492: CLOSE RA_Addresses_Cur;
487: IF ( RA_Addresses_Cur%NOTFOUND ) THEN
488: FND_MESSAGE.Set_Name('INV', 'INV_INVALID_CUST_ADDRESS');
489: X_Error_Flag := 'Y';
490: X_Error_Code := 'APP-43099';
491: X_Error_Message := FND_MESSAGE.Get;
492: CLOSE RA_Addresses_Cur;
493: RETURN;
494: END IF;
495: CLOSE RA_Addresses_Cur;
505: Temp_Item_Definition_Level;
506:
507: IF ((CI_Cur%NOTFOUND) AND (CI_Cur%ROWCOUNT = 0)) THEN
508:
509: FND_MESSAGE.Set_Name('INV', 'INV_NO_CUSTOMER_ITEM');
510: X_Error_Code := 'APP-43037';
511: X_Error_Flag := 'Y';
512: X_Error_Message := FND_MESSAGE.Get;
513: RETURN;
508:
509: FND_MESSAGE.Set_Name('INV', 'INV_NO_CUSTOMER_ITEM');
510: X_Error_Code := 'APP-43037';
511: X_Error_Flag := 'Y';
512: X_Error_Message := FND_MESSAGE.Get;
513: RETURN;
514: --Bug: 5157639 Removed validations based on Inactive flag
515: ELSIF ((Temp_Item_Definition_Level = '3') AND
516: --(Temp_Inactive_Flag = 'N') AND
565: ELSE
566: IF ((Temp_Inactive_Flag = 'Y') AND
567: (CI_Cur%NOTFOUND) AND (CI_Cur%ROWCOUNT > 0)) THEN
568:
569: FND_MESSAGE.Set_Name('INV',
570: 'INV_INACTIVE_CUSTOMER_ITEM');
571: X_Error_Code := 'APP-43039';
572: X_Error_Flag := 'Y';
573: X_Error_Message := FND_MESSAGE.Get;
569: FND_MESSAGE.Set_Name('INV',
570: 'INV_INACTIVE_CUSTOMER_ITEM');
571: X_Error_Code := 'APP-43039';
572: X_Error_Flag := 'Y';
573: X_Error_Message := FND_MESSAGE.Get;
574: Temp_Inactive_Flag := NULL;
575: RETURN;
576: ELSIF ((Temp_Item_Definition_Level = '3') AND
577: (Temp_Address_Id <> Y_Address_Id) AND
576: ELSIF ((Temp_Item_Definition_Level = '3') AND
577: (Temp_Address_Id <> Y_Address_Id) AND
578: (CI_Cur%NOTFOUND) AND (CI_Cur%ROWCOUNT > 0)) THEN
579:
580: FND_MESSAGE.Set_Name('INV',
581: 'INV_INVALID_CUST_ADDRESS');
582: X_Error_Code := 'APP-43099';
583: X_Error_Flag := 'Y';
584: X_Error_Message := FND_MESSAGE.Get;
580: FND_MESSAGE.Set_Name('INV',
581: 'INV_INVALID_CUST_ADDRESS');
582: X_Error_Code := 'APP-43099';
583: X_Error_Flag := 'Y';
584: X_Error_Message := FND_MESSAGE.Get;
585: Temp_Inactive_Flag := NULL;
586: RETURN;
587:
588: END IF;
605: Temp_Inactive_Flag;
606:
607: IF (CI_XREF_Cur%NOTFOUND) THEN
608:
609: FND_MESSAGE.Set_Name('INV',
610: 'INV_NO_CUSTOMER_ITEM_XREF');
611: X_Error_Code := 'APP-43038';
612: X_Error_Flag := 'Y';
613: X_Error_Message := FND_MESSAGE.Get;
609: FND_MESSAGE.Set_Name('INV',
610: 'INV_NO_CUSTOMER_ITEM_XREF');
611: X_Error_Code := 'APP-43038';
612: X_Error_Flag := 'Y';
613: X_Error_Message := FND_MESSAGE.Get;
614: RETURN;
615: --Bug: 5157639 Commented out this code to remove validation based on Incative flag
616: /* ELSIF (Temp_Inactive_Flag = 'Y') THEN
617:
623: Temp_Inactive_Flag;
624:
625: IF (CI_XREF_Cur%NOTFOUND) THEN
626:
627: FND_MESSAGE.Set_Name('INV',
628: 'INV_INACTIVE_CI_XREF');
629: X_Error_Code := 'APP-43040';
630: X_Error_Flag := 'Y';
631: X_Error_Message :=
628: 'INV_INACTIVE_CI_XREF');
629: X_Error_Code := 'APP-43040';
630: X_Error_Flag := 'Y';
631: X_Error_Message :=
632: FND_MESSAGE.Get;
633: Temp_Inactive_Flag := NULL;
634: RETURN;
635:
636: ELSIF (Temp_Inactive_Flag = 'N') THEN