95: l_whse_item_id ic_item_mst.whse_item_id%TYPE;
96: l_user_name fnd_user.user_name%TYPE;
97: l_user_id fnd_user.user_id%TYPE;
98: l_ic_item_mst_rec ic_item_mst%ROWTYPE;
99: l_ic_item_cpg_rec ic_item_cpg%ROWTYPE;
100: l_lot_rec GMI_LOTS_PUB.lot_rec_typ;
101: --B965832(1) Add the following variables
102: l_lot_status ic_item_mst.lot_status%TYPE;
103: l_qc_grade ic_item_mst.qc_grade%TYPE;
374: THEN
375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
376: END IF;
377:
378: -- Set up PL/SQL record and insert item into ic_item_cpg
379:
380: l_ic_item_cpg_rec.item_id := l_item_id;
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
376: END IF;
377:
378: -- Set up PL/SQL record and insert item into ic_item_cpg
379:
380: l_ic_item_cpg_rec.item_id := l_item_id;
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
377:
378: -- Set up PL/SQL record and insert item into ic_item_cpg
379:
380: l_ic_item_cpg_rec.item_id := l_item_id;
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
378: -- Set up PL/SQL record and insert item into ic_item_cpg
379:
380: l_ic_item_cpg_rec.item_id := l_item_id;
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
379:
380: l_ic_item_cpg_rec.item_id := l_item_id;
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
387: l_ic_item_cpg_rec.last_update_login := TO_NUMBER(FND_PROFILE.Value(
380: l_ic_item_cpg_rec.item_id := l_item_id;
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
387: l_ic_item_cpg_rec.last_update_login := TO_NUMBER(FND_PROFILE.Value(
388: 'LOGIN_ID'));
381: l_ic_item_cpg_rec.ic_matr_days := p_item_rec.ic_matr_days;
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
387: l_ic_item_cpg_rec.last_update_login := TO_NUMBER(FND_PROFILE.Value(
388: 'LOGIN_ID'));
389: --B1231196 Don't write record to ic_item_cpg. All parameters, variables etc
382: l_ic_item_cpg_rec.ic_hold_days := p_item_rec.ic_hold_days;
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
387: l_ic_item_cpg_rec.last_update_login := TO_NUMBER(FND_PROFILE.Value(
388: 'LOGIN_ID'));
389: --B1231196 Don't write record to ic_item_cpg. All parameters, variables etc
390: --associated with cpg tables should eventually be removed to save on
383: l_ic_item_cpg_rec.creation_date := SYSDATE;
384: l_ic_item_cpg_rec.last_update_date := SYSDATE;
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
387: l_ic_item_cpg_rec.last_update_login := TO_NUMBER(FND_PROFILE.Value(
388: 'LOGIN_ID'));
389: --B1231196 Don't write record to ic_item_cpg. All parameters, variables etc
390: --associated with cpg tables should eventually be removed to save on
391: --processing time
385: l_ic_item_cpg_rec.created_by := l_user_id;
386: l_ic_item_cpg_rec.last_updated_by := l_user_id;
387: l_ic_item_cpg_rec.last_update_login := TO_NUMBER(FND_PROFILE.Value(
388: 'LOGIN_ID'));
389: --B1231196 Don't write record to ic_item_cpg. All parameters, variables etc
390: --associated with cpg tables should eventually be removed to save on
391: --processing time
392:
393: -- IF NOT GMI_ITEM_PVT.insert_ic_item_cpg(l_ic_item_cpg_rec)
389: --B1231196 Don't write record to ic_item_cpg. All parameters, variables etc
390: --associated with cpg tables should eventually be removed to save on
391: --processing time
392:
393: -- IF NOT GMI_ITEM_PVT.insert_ic_item_cpg(l_ic_item_cpg_rec)
394: -- THEN
395: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
396: -- END IF;
397: --B1231196 End
542: l_msg_count NUMBER;
543: l_msg_data VARCHAR2(2000);
544: l_return_status VARCHAR2(1);
545: l_ic_item_mst_rec ic_item_mst%ROWTYPE;
546: l_ic_item_cpg_rec ic_item_cpg%ROWTYPE;
547: --B965832(1) Add these 2 variables
548: l_lot_status ic_item_mst.lot_status%TYPE;
549: l_qc_grade ic_item_mst.qc_grade%TYPE;
550:
1042: THEN
1043: GMI_GLOBAL_GRP.Get_Item ( p_item_no => p_item_rec.qcitem_no
1044: , x_ic_item_mst => l_ic_item_mst_rec
1045:
1046: , x_ic_item_cpg => l_ic_item_cpg_rec
1047: );
1048: IF (l_ic_item_mst_rec.item_id < 0)
1049: THEN
1050: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1117: IF (p_item_rec.whse_item_no <> ' ' AND p_item_rec.whse_item_no IS NOT NULL)
1118: THEN
1119: GMI_GLOBAL_GRP.Get_Item ( p_item_no => p_item_rec.whse_item_no
1120: , x_ic_item_mst => l_ic_item_mst_rec
1121: , x_ic_item_cpg => l_ic_item_cpg_rec
1122: );
1123: IF (l_ic_item_mst_rec.item_id < 0)
1124: THEN
1125: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;