APPS.GMIVDX dependencies on GMIGUTL

Line 349: IF (NOT GMIGUTL.SETUP(FND_GLOBAL.USER_NAME)) THEN

345: x_return_status :=FND_API.G_RET_STS_SUCCESS;
346:
347: --this call will set up the profiles needed by the create lot engine
348: --and transaction engine in OPM.
349: IF (NOT GMIGUTL.SETUP(FND_GLOBAL.USER_NAME)) THEN
350: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
351: log_msg('Failed call to GMIGUTL.SETUP');
352: END IF;
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 351: log_msg('Failed call to GMIGUTL.SETUP');

347: --this call will set up the profiles needed by the create lot engine
348: --and transaction engine in OPM.
349: IF (NOT GMIGUTL.SETUP(FND_GLOBAL.USER_NAME)) THEN
350: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
351: log_msg('Failed call to GMIGUTL.SETUP');
352: END IF;
353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
354: END IF;
355:

Line 880: IF (nvl(p_line_rec_tbl(i).opm_location,GMIGUTL.IC$DEFAULT_LOCT) <> GMIGUTL.IC$DEFAULT_LOCT) THEN

876: --Lets Validate the locations in OPM
877: IF ( (x_ic_whse_mst_row.loct_ctl = 0)
878: OR (x_ic_item_mst_row.loct_ctl = 0)
879: ) THEN
880: IF (nvl(p_line_rec_tbl(i).opm_location,GMIGUTL.IC$DEFAULT_LOCT) <> GMIGUTL.IC$DEFAULT_LOCT) THEN
881: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
882: log_msg('Failed while validating OPM location. Item and/or warehouse are not location controlled');
883: END IF;
884: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_LOCATION');

Line 891: p_line_rec_tbl(i).opm_location := GMIGUTL.IC$DEFAULT_LOCT;

887: FND_MESSAGE.SET_TOKEN('WHSE_CODE',p_line_rec_tbl(i).opm_whse_code);
888: FND_MSG_PUB.Add;
889: RAISE FND_API.G_EXC_ERROR;
890: END IF;
891: p_line_rec_tbl(i).opm_location := GMIGUTL.IC$DEFAULT_LOCT;
892: ELSIF ( (x_ic_whse_mst_row.loct_ctl = 1)
893: AND (x_ic_item_mst_row.loct_ctl = 1)
894: ) THEN
895: SELECT count(1) INTO l_count

Line 899: AND location <> GMIGUTL.IC$DEFAULT_LOCT;

895: SELECT count(1) INTO l_count
896: FROM ic_loct_mst
897: WHERE whse_code = p_line_rec_tbl(i).opm_whse_code
898: AND location = p_line_rec_tbl(i).opm_location
899: AND location <> GMIGUTL.IC$DEFAULT_LOCT;
900:
901: IF (l_count = 0) THEN
902: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
903: log_msg('Failed while validating OPM location. Item and warehouse are validated location controlled');

Line 919: AND location <> GMIGUTL.IC$DEFAULT_LOCT;

915: SELECT count(1) INTO l_count
916: FROM ic_loct_inv
917: WHERE whse_code = p_line_rec_tbl(i).opm_whse_code
918: AND location = p_line_rec_tbl(i).opm_location
919: AND location <> GMIGUTL.IC$DEFAULT_LOCT;
920:
921: --we could have non validated locations in OPM when transfer is from discrete to process.
922: IF (l_count = 0) AND (p_hdr_rec.transfer_type = 0) THEN
923: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN