1618: END IF;
1619:
1620: /* Validate the transaction date */
1621:
1622: l_return_val := GMICCAL.trans_date_validate
1623: (l_tran_rec.trans_date,
1624: l_ic_whse_mst_rec.orgn_code,
1625: l_ic_whse_mst_rec.whse_code
1626: );
1626: );
1627:
1628: IF l_return_val <> 0 THEN
1629:
1630: IF l_return_val = GMICCAL.INVCAL_FISCALYR_ERR THEN
1631: FND_MESSAGE.SET_NAME('GMI','IC_CAL_FISCALYR_ERR');
1632: FND_MSG_PUB.Add;
1633: ELSIF l_return_val = GMICCAL.INVCAL_PERIOD_ERR THEN
1634: FND_MESSAGE.SET_NAME('GMI','IC_CAL_CLOSED_IND_ERR');
1629:
1630: IF l_return_val = GMICCAL.INVCAL_FISCALYR_ERR THEN
1631: FND_MESSAGE.SET_NAME('GMI','IC_CAL_FISCALYR_ERR');
1632: FND_MSG_PUB.Add;
1633: ELSIF l_return_val = GMICCAL.INVCAL_PERIOD_ERR THEN
1634: FND_MESSAGE.SET_NAME('GMI','IC_CAL_CLOSED_IND_ERR');
1635: FND_MSG_PUB.Add;
1636: ELSIF l_return_val = GMICCAL.INVCAL_ORGN_PARM_ERR THEN
1637: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_ORGN_ERR');
1632: FND_MSG_PUB.Add;
1633: ELSIF l_return_val = GMICCAL.INVCAL_PERIOD_ERR THEN
1634: FND_MESSAGE.SET_NAME('GMI','IC_CAL_CLOSED_IND_ERR');
1635: FND_MSG_PUB.Add;
1636: ELSIF l_return_val = GMICCAL.INVCAL_ORGN_PARM_ERR THEN
1637: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_ORGN_ERR');
1638: FND_MSG_PUB.Add;
1639: ELSIF l_return_val = GMICCAL.INVCAL_CO_ERR THEN
1640: FND_MESSAGE.SET_NAME('GMI','IC_COCODEERR');
1635: FND_MSG_PUB.Add;
1636: ELSIF l_return_val = GMICCAL.INVCAL_ORGN_PARM_ERR THEN
1637: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_ORGN_ERR');
1638: FND_MSG_PUB.Add;
1639: ELSIF l_return_val = GMICCAL.INVCAL_CO_ERR THEN
1640: FND_MESSAGE.SET_NAME('GMI','IC_COCODEERR');
1641: FND_MSG_PUB.Add;
1642: ELSIF l_return_val = GMICCAL.INVCAL_WHSE_PARM_ERR THEN
1643: FND_MESSAGE.SET_NAME('GMI','IC_BLANKWHSE');
1638: FND_MSG_PUB.Add;
1639: ELSIF l_return_val = GMICCAL.INVCAL_CO_ERR THEN
1640: FND_MESSAGE.SET_NAME('GMI','IC_COCODEERR');
1641: FND_MSG_PUB.Add;
1642: ELSIF l_return_val = GMICCAL.INVCAL_WHSE_PARM_ERR THEN
1643: FND_MESSAGE.SET_NAME('GMI','IC_BLANKWHSE');
1644: FND_MSG_PUB.Add;
1645: ELSIF l_return_val = GMICCAL.INVCAL_WHSE_ERR THEN
1646: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_WHSE_CODE');
1641: FND_MSG_PUB.Add;
1642: ELSIF l_return_val = GMICCAL.INVCAL_WHSE_PARM_ERR THEN
1643: FND_MESSAGE.SET_NAME('GMI','IC_BLANKWHSE');
1644: FND_MSG_PUB.Add;
1645: ELSIF l_return_val = GMICCAL.INVCAL_WHSE_ERR THEN
1646: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_WHSE_CODE');
1647: FND_MESSAGE.SET_TOKEN('WHSE_CODE',l_ic_whse_mst_rec.whse_code);
1648: FND_MSG_PUB.Add;
1649: ELSIF l_return_val IN (GMICCAL.INVCAL_PERIOD_CLOSED,
1645: ELSIF l_return_val = GMICCAL.INVCAL_WHSE_ERR THEN
1646: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_WHSE_CODE');
1647: FND_MESSAGE.SET_TOKEN('WHSE_CODE',l_ic_whse_mst_rec.whse_code);
1648: FND_MSG_PUB.Add;
1649: ELSIF l_return_val IN (GMICCAL.INVCAL_PERIOD_CLOSED,
1650: GMICCAL.INVCAL_WHSE_CLOSED) THEN
1651:
1652: FND_MESSAGE.SET_NAME('GMI','IC_API_TXN_POST_CLOSED');
1653: FND_MESSAGE.SET_TOKEN('DATE',l_tran_rec.trans_date);
1646: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_WHSE_CODE');
1647: FND_MESSAGE.SET_TOKEN('WHSE_CODE',l_ic_whse_mst_rec.whse_code);
1648: FND_MSG_PUB.Add;
1649: ELSIF l_return_val IN (GMICCAL.INVCAL_PERIOD_CLOSED,
1650: GMICCAL.INVCAL_WHSE_CLOSED) THEN
1651:
1652: FND_MESSAGE.SET_NAME('GMI','IC_API_TXN_POST_CLOSED');
1653: FND_MESSAGE.SET_TOKEN('DATE',l_tran_rec.trans_date);
1654: FND_MESSAGE.SET_TOKEN('WAREH',l_ic_whse_mst_rec.whse_code);