[Home] [Help]
24: --| HISTORY |
25: --| 25-FEB-1999 M.Godfrey Upgrade to R11 |
26: --| 20/AUG/1999 H.Verdding Bug 951828 Change GMS package Calls to GMA |
27: --| 27/OCT/1999 H.Verdding Bug 1042739 added l_trans_rec.orgn_code To |
28: --| GMA_VALID_GRP.Validate_doc_no |
29: --| |
30: --| 02/JAN/2000 Liz Enstone Bug 1159223 Change message names from SY_ |
31: -- to IC_
32: --+==========================================================================+
172: l_trans_rec := p_trans_rec;
173: l_trans_type := p_trans_rec.trans_type;
174:
175: -- Validate transaction type in the range 1 - 5
176: IF NOT GMA_VALID_GRP.NumRangeCheck(1,5,l_trans_type)
177: THEN
178: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_TRANS_TYPE');
179: FND_MESSAGE.SET_TOKEN('TRANS_TYPE',l_trans_type);
180: FND_MSG_PUB.Add;
299:
300: -- Validate Journal number
301: -- Added orgn_code to function call
302: -- H.Verdding Bug 1042739
303: IF NOT GMA_VALID_GRP.Validate_doc_no('JRNL',l_trans_rec.journal_no
304: ,l_trans_rec.orgn_code)
305: THEN
306: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_JOURNAL_NO');
307: FND_MESSAGE.SET_TOKEN('JOURNAL_NO',l_trans_rec.journal_no);
776: END IF;
777: END IF;
778:
779: -- Check Primary UoM
780: IF NOT GMA_VALID_GRP.Validate_um(l_trans_rec.item_um)
781: THEN
782: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
783: FND_MESSAGE.SET_TOKEN('ITEM_NO',l_trans_rec.item_no);
784: FND_MESSAGE.SET_TOKEN('UOM',l_trans_rec.item_um);
1096: END IF;
1097: END IF;
1098:
1099: -- Validate Company Code
1100: IF NOT GMA_VALID_GRP.Validate_co_code(l_trans_rec.co_code)
1101: THEN
1102: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_CO_CODE');
1103: FND_MESSAGE.SET_TOKEN('CO_CODE',l_trans_rec.co_code);
1104: FND_MSG_PUB.Add;
1105: RAISE FND_API.G_EXC_ERROR;
1106: END IF;
1107:
1108: -- Validate Organisation Code belongs to Company Code
1109: IF NOT GMA_VALID_GRP.Validate_orgn_for_company ( l_trans_rec.orgn_code
1110: , l_trans_rec.co_code
1111: )
1112: THEN
1113: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ORGN_CODE');