DBA Data[Home] [Help]

APPS.GMIVQTY dependencies on GMIGUTL

Line 330: AND l_from_location <> GMIGUTL.IC$DEFAULT_LOCT

326: l_to_location := p_qty_rec.from_location;
327: END IF;
328:
329: IF l_from_loct_ctl = 1
330: AND l_from_location <> GMIGUTL.IC$DEFAULT_LOCT
331: THEN
332: SELECT 1
333: INTO l_count
334: FROM ic_loct_mst

Line 341: AND l_to_location <> GMIGUTL.IC$DEFAULT_LOCT

337: AND delete_mark = 0;
338: END IF;
339:
340: IF l_to_loct_ctl = 1
341: AND l_to_location <> GMIGUTL.IC$DEFAULT_LOCT
342: THEN
343: SELECT 1
344: INTO l_count
345: FROM ic_loct_mst

Line 670: OR p_ic_item_mst_row.inactive_ind =1 AND GMIGUTL.IC$API_ALLOW_INACTIVE=0

666: /* one which can be used */
667: IF p_ic_item_mst_row.item_id = 0
668: OR p_ic_item_mst_row.delete_mark = 1
669: OR p_ic_item_mst_row.noninv_ind = 1
670: OR p_ic_item_mst_row.inactive_ind =1 AND GMIGUTL.IC$API_ALLOW_INACTIVE=0
671: THEN
672: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ITEM_NO');
673: FND_MESSAGE.SET_TOKEN('ITEM_NO',l_qty_rec.item_no);
674: FND_MSG_PUB.Add;

Line 689: IF NVL(l_qty_rec.lot_no,GMIGUTL.IC$DEFAULT_LOT)=GMIGUTL.IC$DEFAULT_LOT

685: /* blocked. */
686:
687: IF p_ic_item_mst_row.lot_ctl > 0
688: THEN
689: IF NVL(l_qty_rec.lot_no,GMIGUTL.IC$DEFAULT_LOT)=GMIGUTL.IC$DEFAULT_LOT
690: OR p_ic_lots_mst_row.delete_mark = 1
691: OR p_ic_lots_mst_row.inactive_ind = 1 AND GMIGUTL.IC$API_ALLOW_INACTIVE = 0
692: THEN
693: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_LOT_NO');

Line 691: OR p_ic_lots_mst_row.inactive_ind = 1 AND GMIGUTL.IC$API_ALLOW_INACTIVE = 0

687: IF p_ic_item_mst_row.lot_ctl > 0
688: THEN
689: IF NVL(l_qty_rec.lot_no,GMIGUTL.IC$DEFAULT_LOT)=GMIGUTL.IC$DEFAULT_LOT
690: OR p_ic_lots_mst_row.delete_mark = 1
691: OR p_ic_lots_mst_row.inactive_ind = 1 AND GMIGUTL.IC$API_ALLOW_INACTIVE = 0
692: THEN
693: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_LOT_NO');
694: FND_MESSAGE.SET_TOKEN('ITEM_NO',l_qty_rec.item_no);
695: FND_MESSAGE.SET_TOKEN('LOT_NO',l_qty_rec.lot_no);

Line 701: l_qty_rec.lot_no := GMIGUTL.IC$DEFAULT_LOT;

697: FND_MSG_PUB.Add;
698: RAISE FND_API.G_EXC_ERROR;
699: END IF;
700: ELSE
701: l_qty_rec.lot_no := GMIGUTL.IC$DEFAULT_LOT;
702: l_qty_rec.sublot_no := NULL;
703: END IF;
704:
705:

Line 762: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;

758: /* even if we're given one, it is flattened. */
759:
760: IF l_trans_type IN (5,10)
761: THEN
762: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
763: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
764: ELSE
765: IF NVL(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
766: THEN

Line 763: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;

759:
760: IF l_trans_type IN (5,10)
761: THEN
762: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
763: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
764: ELSE
765: IF NVL(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
766: THEN
767: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;

Line 765: IF NVL(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT

761: THEN
762: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
763: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
764: ELSE
765: IF NVL(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
766: THEN
767: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
768: END IF;
769:

Line 767: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;

763: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
764: ELSE
765: IF NVL(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
766: THEN
767: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
768: END IF;
769:
770: IF NVL(l_qty_rec.to_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
771: THEN

Line 770: IF NVL(l_qty_rec.to_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT

766: THEN
767: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
768: END IF;
769:
770: IF NVL(l_qty_rec.to_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
771: THEN
772: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
773: END IF;
774:

Line 772: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;

768: END IF;
769:
770: IF NVL(l_qty_rec.to_location,GMIGUTL.IC$DEFAULT_LOCT)=GMIGUTL.IC$DEFAULT_LOCT
771: THEN
772: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
773: END IF;
774:
775: l_bad_location := 0;
776:

Line 780: l_qty_rec.from_location=GMIGUTL.IC$DEFAULT_LOCT

776:
777: IF p_ic_item_mst_row.loct_ctl > 0
778: THEN
779: IF l_from_loct_ctl > 0 AND
780: l_qty_rec.from_location=GMIGUTL.IC$DEFAULT_LOCT
781: OR l_trans_type in (3,4,8,9) AND
782: l_to_loct_ctl>0 AND
783: l_qty_rec.to_location=GMIGUTL.IC$DEFAULT_LOCT
784: OR l_trans_type IN (3,8) AND

Line 783: l_qty_rec.to_location=GMIGUTL.IC$DEFAULT_LOCT

779: IF l_from_loct_ctl > 0 AND
780: l_qty_rec.from_location=GMIGUTL.IC$DEFAULT_LOCT
781: OR l_trans_type in (3,4,8,9) AND
782: l_to_loct_ctl>0 AND
783: l_qty_rec.to_location=GMIGUTL.IC$DEFAULT_LOCT
784: OR l_trans_type IN (3,8) AND
785: l_qty_rec.from_whse_code=l_qty_rec.to_whse_code AND
786: l_qty_rec.from_location=l_qty_rec.to_location
787: THEN l_bad_location := 1;

Line 806: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;

802: END IF;
803: -- END BUG#2340824
804: END IF;
805: ELSE
806: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
807: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
808: END IF;
809: END IF;
810:

Line 807: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;

803: -- END BUG#2340824
804: END IF;
805: ELSE
806: l_qty_rec.from_location := GMIGUTL.IC$DEFAULT_LOCT;
807: l_qty_rec.to_location := GMIGUTL.IC$DEFAULT_LOCT;
808: END IF;
809: END IF;
810:
811:

Line 820: IF GMIGUTL.v_qc_grade(l_qty_rec.qc_grade, l_qc_grad_mst_row)

816: IF (l_trans_type IN (5,10))
817: THEN
818: IF l_qty_rec.qc_grade <> p_ic_lots_mst_row.qc_grade
819: THEN
820: IF GMIGUTL.v_qc_grade(l_qty_rec.qc_grade, l_qc_grad_mst_row)
821: THEN
822: /* Check for unposted journals with different QC grade */
823: IF Check_unposted_jnl_qc_grade
824: ( p_item_id => p_ic_item_mst_row.item_id

Line 894: IF GMIGUTL.v_reason_code

890: /* on the code must be checked against the quantity given. */
891: /* Note that there is no correlation between document */
892: /* types and reason codes. */
893:
894: IF GMIGUTL.v_reason_code
895: ( p_reason_code => l_qty_rec.reason_code
896: , x_sy_reas_cds_row=> l_sy_reas_cds_row
897: )
898: THEN

Line 959: GMIGUTL.get_loct_inv

955: /* for lot_status and qc_grade appropriate to the transaction. */
956:
957: IF l_trans_type in (1,2,4,6,7,9)
958: THEN
959: GMIGUTL.get_loct_inv
960: ( p_item_id => p_ic_item_mst_row.item_id
961: , p_whse_code =>l_qty_rec.from_whse_code
962: , p_lot_id =>p_ic_lots_mst_row.lot_id
963: , p_location =>l_qty_rec.from_location

Line 976: GMIGUTL.get_loct_inv

972: l_onhand2 := l_ic_loct_inv_row_from.loct_onhand2;
973: END IF;
974: ELSIF l_trans_type IN (3,8)
975: THEN
976: GMIGUTL.get_loct_inv
977: ( p_item_id => p_ic_item_mst_row.item_id
978: , p_whse_code =>l_qty_rec.from_whse_code
979: , p_lot_id =>p_ic_lots_mst_row.lot_id
980: , p_location =>l_qty_rec.from_location

Line 983: GMIGUTL.get_loct_inv

979: , p_lot_id =>p_ic_lots_mst_row.lot_id
980: , p_location =>l_qty_rec.from_location
981: , x_ic_loct_inv_row =>l_ic_loct_inv_row_from
982: );
983: GMIGUTL.get_loct_inv
984: ( p_item_id => p_ic_item_mst_row.item_id
985: , p_whse_code =>l_qty_rec.to_whse_code
986: , p_lot_id =>p_ic_lots_mst_row.lot_id
987: , p_location =>l_qty_rec.to_location

Line 1083: IF GMIGUTL.IC$MOVEDIFFSTAT =0 THEN

1079: --END BUG#3171345
1080: -- BEGIN BUG#2354190/2354168 Sastry/Ravi
1081: -- Modified the code to handle different cases when profile
1082: -- option IC$MOVEDIFFSTAT is set to different values.
1083: IF GMIGUTL.IC$MOVEDIFFSTAT =0 THEN
1084: IF (l_ic_loct_inv_row_to.loct_onhand IS NULL)
1085: or (NVL(l_ic_loct_inv_row_from.lot_status,' ') = NVL(l_ic_loct_inv_row_to.lot_status,' ')) THEN
1086: l_qty_rec.lot_status := l_ic_loct_inv_row_from.lot_status;
1087: ELSE

Line 1095: ELSIF GMIGUTL.IC$MOVEDIFFSTAT = 1 THEN

1091: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_qty_rec.sublot_no);
1092: FND_MSG_PUB.Add;
1093: RAISE FND_API.G_EXC_ERROR;
1094: END IF;
1095: ELSIF GMIGUTL.IC$MOVEDIFFSTAT = 1 THEN
1096: IF (l_ic_loct_inv_row_to.loct_onhand IS NULL) THEN
1097: l_qty_rec.lot_status := l_ic_loct_inv_row_FROM.lot_status;
1098: ELSE
1099: l_qty_rec.lot_status := l_ic_loct_inv_row_TO.lot_status;

Line 1101: ELSIF GMIGUTL.IC$MOVEDIFFSTAT =2 THEN

1097: l_qty_rec.lot_status := l_ic_loct_inv_row_FROM.lot_status;
1098: ELSE
1099: l_qty_rec.lot_status := l_ic_loct_inv_row_TO.lot_status;
1100: END IF;
1101: ELSIF GMIGUTL.IC$MOVEDIFFSTAT =2 THEN
1102: IF (nvl(l_ic_loct_inv_row_to.loct_onhand,0) = 0)
1103: or (NVL(l_ic_loct_inv_row_from.lot_status,' ') = NVL(l_ic_loct_inv_row_to.lot_status,' ')) THEN
1104: l_qty_rec.lot_status := l_ic_loct_inv_row_from.lot_status;
1105: ELSE

Line 1140: IF GMIGUTL.v_lot_status (l_qty_rec.lot_status, l_ic_lots_sts_row)

1136: ELSIF l_qty_rec.lot_status = p_ic_item_mst_row.lot_status
1137: THEN
1138: NULL;
1139: ELSE
1140: IF GMIGUTL.v_lot_status (l_qty_rec.lot_status, l_ic_lots_sts_row)
1141: THEN
1142: NULL;
1143: ELSE
1144: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_LOT_STATUS');

Line 1410: IF (GMIGUTL.IC$ALLOWNEGINV = '0') THEN

1406: l_qty_rec.item_um2 := NULL;
1407: l_qty_rec.trans_qty2 := NULL;
1408: END IF;
1409: /* Check location inventory for becoming negative */
1410: IF (GMIGUTL.IC$ALLOWNEGINV = '0') THEN
1411: /* ******************************************************
1412: For ADJR/TRNR transactions check for other lines also
1413: ****************************************************** */
1414: IF ( (l_trans_type IN (7,8))

Line 1432: AND a.location = nvl(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT);

1428: AND a.line_type <> -1
1429: AND a.item_id = p_ic_item_mst_row.item_id
1430: AND a.lot_id = nvl(p_ic_lots_mst_row.lot_id,0)
1431: AND a.whse_code = l_qty_rec.from_whse_code
1432: AND a.location = nvl(l_qty_rec.from_location,GMIGUTL.IC$DEFAULT_LOCT);
1433: END IF;-- ( (l_trans_type IN (7,8))
1434: -- Bug 2946031
1435: -- Display negative qty not allowed message correctly if
1436: -- l_ic_loct_inv_row_from.loct_onhand is null.