DBA Data[Home] [Help]

APPS.AHL_PRD_SERN_CHANGE_PVT dependencies on FND_MESSAGE

Line 35: FND_MESSAGE.Set_Name('AHL','AHL__TXNCODE_INVALID');

31: -- get transaction_type_id .
32: OPEN csi_txn_types_csr(p_txn_code);
33: FETCH csi_txn_types_csr INTO l_txn_type_id;
34: IF (csi_txn_types_csr%NOTFOUND) THEN
35: FND_MESSAGE.Set_Name('AHL','AHL__TXNCODE_INVALID');
36: FND_MESSAGE.Set_Token('CODE',p_txn_code);
37: FND_MSG_PUB.ADD;
38: --dbms_output.put_line('Transaction code not found');
39: l_return_val := FALSE;

Line 36: FND_MESSAGE.Set_Token('CODE',p_txn_code);

32: OPEN csi_txn_types_csr(p_txn_code);
33: FETCH csi_txn_types_csr INTO l_txn_type_id;
34: IF (csi_txn_types_csr%NOTFOUND) THEN
35: FND_MESSAGE.Set_Name('AHL','AHL__TXNCODE_INVALID');
36: FND_MESSAGE.Set_Token('CODE',p_txn_code);
37: FND_MSG_PUB.ADD;
38: --dbms_output.put_line('Transaction code not found');
39: l_return_val := FALSE;
40: END IF;

Line 184: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NULL');

180: -- 3 = Dynamic Entry at inventory receipt.)
181: IF (nvl(p_serial_number_control,0) IN (2,5,6)) THEN
182: -- serial number is mandatory.
183: IF (p_Serial_Number IS NULL) OR (p_Serial_Number = FND_API.G_MISS_CHAR) THEN
184: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NULL');
185: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
186: FND_MSG_PUB.ADD;
187: --dbms_output.put_line('Serial Number is null');
188: ELSE

Line 185: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);

181: IF (nvl(p_serial_number_control,0) IN (2,5,6)) THEN
182: -- serial number is mandatory.
183: IF (p_Serial_Number IS NULL) OR (p_Serial_Number = FND_API.G_MISS_CHAR) THEN
184: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NULL');
185: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
186: FND_MSG_PUB.ADD;
187: --dbms_output.put_line('Serial Number is null');
188: ELSE
189: -- If serial tag code = INVENTORY then validate serial number against inventory.

Line 194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');

190: IF (p_serialnum_tag_code = 'INVENTORY') THEN
191: OPEN mtl_serial_numbers_csr(p_Inventory_id,p_Serial_Number);
192: FETCH mtl_serial_numbers_csr INTO l_junk;
193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN
194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');
195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
197: FND_MSG_PUB.ADD;
198: --dbms_output.put_line('Serial Number does not exist in master ');

Line 195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);

191: OPEN mtl_serial_numbers_csr(p_Inventory_id,p_Serial_Number);
192: FETCH mtl_serial_numbers_csr INTO l_junk;
193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN
194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');
195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
197: FND_MSG_PUB.ADD;
198: --dbms_output.put_line('Serial Number does not exist in master ');
199: END IF;

Line 196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);

192: FETCH mtl_serial_numbers_csr INTO l_junk;
193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN
194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');
195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
197: FND_MSG_PUB.ADD;
198: --dbms_output.put_line('Serial Number does not exist in master ');
199: END IF;
200: CLOSE mtl_serial_numbers_csr;

Line 208: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NOTNULL');

204: END IF;
205: ELSE
206: -- if not serialized item, then serial number must be null.
207: IF (p_Serial_Number <> FND_API.G_MISS_CHAR) AND (p_Serial_Number IS NOT NULL) THEN
208: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NOTNULL');
209: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
210: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
211: FND_MSG_PUB.ADD;
212: --dbms_output.put_line('Serial Number is not null');

Line 209: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);

205: ELSE
206: -- if not serialized item, then serial number must be null.
207: IF (p_Serial_Number <> FND_API.G_MISS_CHAR) AND (p_Serial_Number IS NOT NULL) THEN
208: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NOTNULL');
209: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
210: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
211: FND_MSG_PUB.ADD;
212: --dbms_output.put_line('Serial Number is not null');
213: END IF;

Line 210: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);

206: -- if not serialized item, then serial number must be null.
207: IF (p_Serial_Number <> FND_API.G_MISS_CHAR) AND (p_Serial_Number IS NOT NULL) THEN
208: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_NOTNULL');
209: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
210: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
211: FND_MSG_PUB.ADD;
212: --dbms_output.put_line('Serial Number is not null');
213: END IF;
214:

Line 670: FND_MESSAGE.Set_Name('AHL','AHL_COM_REQD_PARAM_MISSING');

666: AND
667: l_serialnum_change_rec.OSP_LINE_ID IS NULL
668: )
669: THEN
670: FND_MESSAGE.Set_Name('AHL','AHL_COM_REQD_PARAM_MISSING');
671: FND_MSG_PUB.ADD;
672: RAISE FND_API.G_EXC_ERROR;
673: END IF;
674:

Line 688: FND_MESSAGE.Set_Name('AHL','AHL_COM_NO_CHANGES_TO_SAVE');

684: L_MODIFIED_FLAG := TRUE;
685: END IF;
686: IF(L_MODIFIED_FLAG = FALSE) THEN
687: IF(VALUES_MODIFIED_CHK.OLD_LOT_NUM = L_SERIALNUM_CHANGE_REC.NEW_LOT_NUMBER OR (VALUES_MODIFIED_CHK.OLD_LOT_NUM IS NULL AND L_SERIALNUM_CHANGE_REC.NEW_LOT_NUMBER IS NULL)) THEN
688: FND_MESSAGE.Set_Name('AHL','AHL_COM_NO_CHANGES_TO_SAVE');
689: FND_MSG_PUB.ADD;
690: RAISE FND_API.G_EXC_ERROR;
691: END IF;
692: END IF;

Line 790: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_MISSING');

786: l_serialnum_change_rec.job_number);
787: FETCH get_workorder_csr INTO l_get_workorder_rec;
788: IF l_get_workorder_rec.workorder_id IS NULL
789: THEN
790: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_MISSING');
791: FND_MESSAGE.Set_Token('JOBNUMBER',l_serialnum_change_rec.job_number);
792: FND_MSG_PUB.ADD;
793: CLOSE get_workorder_csr;
794: RAISE FND_API.G_EXC_ERROR;

Line 791: FND_MESSAGE.Set_Token('JOBNUMBER',l_serialnum_change_rec.job_number);

787: FETCH get_workorder_csr INTO l_get_workorder_rec;
788: IF l_get_workorder_rec.workorder_id IS NULL
789: THEN
790: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_MISSING');
791: FND_MESSAGE.Set_Token('JOBNUMBER',l_serialnum_change_rec.job_number);
792: FND_MSG_PUB.ADD;
793: CLOSE get_workorder_csr;
794: RAISE FND_API.G_EXC_ERROR;
795: END IF;

Line 805: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_SNC_UNTLCKD');

801: p_ue_id => NULL,
802: p_visit_id => NULL,
803: p_item_instance_id => NULL);
804: IF l_return_status = FND_API.G_TRUE THEN
805: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_SNC_UNTLCKD');
806: FND_MSG_PUB.ADD;
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809:

Line 831: FND_MESSAGE.Set_Name('AHL','AHL_PP_INV_ID_REQUIRED');

827: FETCH c_get_inv_item_id INTO l_new_inventory_item_id;
828: CLOSE c_get_inv_item_id;
829: --l_inventory_item_id := l_new_inventory_item_id;
830: ELSE
831: FND_MESSAGE.Set_Name('AHL','AHL_PP_INV_ID_REQUIRED');
832: FND_MSG_PUB.ADD;
833: RAISE FND_API.G_EXC_ERROR;
834: END IF;
835:

Line 846: FND_MESSAGE.Set_Name('AHL','AHL_INVALID_INSTANCE');

842: CLOSE c_instance_details;
843:
844: IF l_instance_dtls_rec.instance_id IS NULL
845: THEN
846: FND_MESSAGE.Set_Name('AHL','AHL_INVALID_INSTANCE');
847: FND_MSG_PUB.ADD;
848: RAISE FND_API.G_EXC_ERROR;
849: END IF;
850:

Line 862: FND_MESSAGE.Set_Name('AHL','AHL_PRD_INST_LOC_INVALID');

858: THEN
859: -- new message that will be seeded.
860: IF (l_instance_dtls_rec.location_type_code IN ('PO','IN-TRANSIT','PROJECT','INVENTORY'))
861: THEN
862: FND_MESSAGE.Set_Name('AHL','AHL_PRD_INST_LOC_INVALID');
863: FND_MSG_PUB.ADD;
864: RAISE FND_API.G_EXC_ERROR;
865: END IF;
866: END IF;

Line 883: FND_MESSAGE.Set_Name('AHL','AHL_PRD_CHG_ITEM_INVALID');

879: FETCH c_is_item_valid INTO l_junk;
880: CLOSE c_is_item_valid;
881: IF l_junk IS NULL
882: THEN
883: FND_MESSAGE.Set_Name('AHL','AHL_PRD_CHG_ITEM_INVALID');
884: -- Source or Destination item should be serial controlled.
885: FND_MSG_PUB.ADD;
886: RAISE FND_API.G_EXC_ERROR;
887: END IF;

Line 902: FND_MESSAGE.Set_Name('AHL','AHL_PRD_ITEM_POS_MISMATCH');

898: p_instance_id => l_serialnum_change_rec.instance_id,
899: x_matches_flag => l_matches_flag);
900: IF l_matches_flag = FND_API.G_FALSE
901: THEN
902: FND_MESSAGE.Set_Name('AHL','AHL_PRD_ITEM_POS_MISMATCH');
903: FND_MESSAGE.Set_Token('ITEM',l_serialnum_change_rec.NEW_ITEM_NUMBER);
904: FND_MSG_PUB.ADD;
905: RAISE FND_API.G_EXC_ERROR;
906: END IF;

Line 903: FND_MESSAGE.Set_Token('ITEM',l_serialnum_change_rec.NEW_ITEM_NUMBER);

899: x_matches_flag => l_matches_flag);
900: IF l_matches_flag = FND_API.G_FALSE
901: THEN
902: FND_MESSAGE.Set_Name('AHL','AHL_PRD_ITEM_POS_MISMATCH');
903: FND_MESSAGE.Set_Token('ITEM',l_serialnum_change_rec.NEW_ITEM_NUMBER);
904: FND_MSG_PUB.ADD;
905: RAISE FND_API.G_EXC_ERROR;
906: END IF;
907: END IF;

Line 928: FND_MESSAGE.Set_Name('AHL','AHL_PRD_TAGMEANING_INVALID');

924: l_serialnum_change_rec.New_Serial_Tag_Mean,
925: l_lookup_code,
926: l_return_val);
927: IF NOT(l_return_val) THEN
928: FND_MESSAGE.Set_Name('AHL','AHL_PRD_TAGMEANING_INVALID');
929: FND_MESSAGE.Set_Token('TAG',l_serialnum_change_rec.New_Serial_Tag_Mean);
930: FND_MSG_PUB.ADD;
931: RAISE FND_API.G_EXC_ERROR;
932: ELSE

Line 929: FND_MESSAGE.Set_Token('TAG',l_serialnum_change_rec.New_Serial_Tag_Mean);

925: l_lookup_code,
926: l_return_val);
927: IF NOT(l_return_val) THEN
928: FND_MESSAGE.Set_Name('AHL','AHL_PRD_TAGMEANING_INVALID');
929: FND_MESSAGE.Set_Token('TAG',l_serialnum_change_rec.New_Serial_Tag_Mean);
930: FND_MSG_PUB.ADD;
931: RAISE FND_API.G_EXC_ERROR;
932: ELSE
933: l_serialnum_change_rec.New_Serial_Tag_Code := l_lookup_code;

Line 1009: FND_MESSAGE.Set_Name('AHL','AHL_ATTRIB_CODE_MISSING');

1005: IF (l_serialnum_change_rec.New_Serial_Tag_Code IS NOT NULL) THEN
1006: -- create extended attributes.
1007: GetCSI_Attribute_ID('AHL_TEMP_SERIAL_NUM',l_attribute_id, l_return_val);
1008: IF NOT(l_return_val) THEN
1009: FND_MESSAGE.Set_Name('AHL','AHL_ATTRIB_CODE_MISSING');
1010: FND_MESSAGE.Set_Token('CODE', 'AHL_TEMP_SERIAL_NUM');
1011: FND_MSG_PUB.ADD;
1012: ELSE
1013: l_csi_extend_attrib_rec1.attribute_id := l_attribute_id;

Line 1010: FND_MESSAGE.Set_Token('CODE', 'AHL_TEMP_SERIAL_NUM');

1006: -- create extended attributes.
1007: GetCSI_Attribute_ID('AHL_TEMP_SERIAL_NUM',l_attribute_id, l_return_val);
1008: IF NOT(l_return_val) THEN
1009: FND_MESSAGE.Set_Name('AHL','AHL_ATTRIB_CODE_MISSING');
1010: FND_MESSAGE.Set_Token('CODE', 'AHL_TEMP_SERIAL_NUM');
1011: FND_MSG_PUB.ADD;
1012: ELSE
1013: l_csi_extend_attrib_rec1.attribute_id := l_attribute_id;
1014: l_csi_extend_attrib_rec1.attribute_value := l_serialnum_change_rec.New_Serial_Tag_Code;