The following lines contain the word 'select', 'insert', 'update' or 'delete':
(l_ic_item_mst_rec.delete_mark = 1)
THEN
FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ITEM_NO');
IF (l_ic_lots_mst_rec.delete_mark = 1) OR
(l_ic_lots_mst_rec.inactive_ind = 1)
THEN
FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_LOT_NO');
(l_ic_whse_mst_rec.delete_mark = 1)
THEN
FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_WHSE_CODE');
(l_ic_whse_mst_rec.delete_mark = 1)
THEN
FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_WHSE_CODE');
FUNCTION Insert_Ic_Jrnl_Mst
( p_ic_jrnl_mst_rec IN ic_jrnl_mst%ROWTYPE)
RETURN BOOLEAN
IS
BEGIN
INSERT INTO ic_jrnl_mst
( journal_id
, journal_no
, journal_comment
, posting_id
, print_cnt
, posted_ind
, orgn_code
, creation_date
, last_update_date
, created_by
, last_updated_by
, delete_mark
, text_code
, in_use
)
VALUES
( p_ic_jrnl_mst_rec.journal_id
, p_ic_jrnl_mst_rec.journal_no
, p_ic_jrnl_mst_rec.journal_comment
, p_ic_jrnl_mst_rec.posting_id
, p_ic_jrnl_mst_rec.print_cnt
, p_ic_jrnl_mst_rec.posted_ind
, p_ic_jrnl_mst_rec.orgn_code
, p_ic_jrnl_mst_rec.creation_date
, p_ic_jrnl_mst_rec.last_update_date
, p_ic_jrnl_mst_rec.created_by
, p_ic_jrnl_mst_rec.last_updated_by
, p_ic_jrnl_mst_rec.delete_mark
, p_ic_jrnl_mst_rec.text_code
, p_ic_jrnl_mst_rec.in_use
);
, 'Insert_IC_JRNL_MST'
);
END Insert_Ic_Jrnl_Mst;
FUNCTION Insert_Ic_Adjs_Jnl
( p_ic_adjs_jnl_rec IN ic_adjs_jnl%ROWTYPE)
RETURN BOOLEAN
IS
BEGIN
INSERT INTO ic_adjs_jnl
( trans_type
, trans_flag
, doc_id
, doc_line
, journal_id
, completed_ind
, whse_code
, reason_code
, doc_date
, item_id
, item_um
, item_um2
, lot_id
, location
, qty
, qty2
, qc_grade
, lot_status
, line_type
, line_id
, co_code
, orgn_code
, no_inv
, no_trans
, creation_date
, created_by
, last_update_date
, trans_cnt
, last_updated_by
)
VALUES
( p_ic_adjs_jnl_rec.trans_type
, p_ic_adjs_jnl_rec.trans_flag
, p_ic_adjs_jnl_rec.doc_id
, p_ic_adjs_jnl_rec.doc_line
, p_ic_adjs_jnl_rec.journal_id
, p_ic_adjs_jnl_rec.completed_ind
, p_ic_adjs_jnl_rec.whse_code
, p_ic_adjs_jnl_rec.reason_code
, p_ic_adjs_jnl_rec.doc_date
, p_ic_adjs_jnl_rec.item_id
, p_ic_adjs_jnl_rec.item_um
, p_ic_adjs_jnl_rec.item_um2
, p_ic_adjs_jnl_rec.lot_id
, p_ic_adjs_jnl_rec.location
, p_ic_adjs_jnl_rec.qty
, p_ic_adjs_jnl_rec.qty2
, p_ic_adjs_jnl_rec.qc_grade
, p_ic_adjs_jnl_rec.lot_status
, p_ic_adjs_jnl_rec.line_type
, p_ic_adjs_jnl_rec.line_id
, p_ic_adjs_jnl_rec.co_code
, p_ic_adjs_jnl_rec.orgn_code
, p_ic_adjs_jnl_rec.no_inv
, p_ic_adjs_jnl_rec.no_trans
, p_ic_adjs_jnl_rec.creation_date
, p_ic_adjs_jnl_rec.created_by
, p_ic_adjs_jnl_rec.last_update_date
, p_ic_adjs_jnl_rec.trans_cnt
, p_ic_adjs_jnl_rec.last_updated_by
);
, 'Insert_IC_ADJS_JNL'
);
END Insert_Ic_Adjs_Jnl;
SELECT
count(*)
FROM
ic_adjs_jnl a, ic_jrnl_mst j
WHERE
a.item_id = p_item_id AND
a.lot_id = p_lot_id AND
a.whse_code = p_whse_code AND
a.location = p_location AND
a.journal_id = j.journal_id AND
j.posted_ind = 0 AND
j.delete_mark = 0 AND
p_lot_status <> a.lot_status;
SELECT
count(*)
FROM
ic_adjs_jnl a, ic_jrnl_mst j
WHERE
a.item_id = p_item_id AND
a.lot_id = p_lot_id AND
a.journal_id = j.journal_id AND
j.posted_ind = 0 AND
j.delete_mark = 0 AND
p_qc_grade <> a.qc_grade;