93:
94: FOR l_temp IN get_cod_temp
95: LOOP
96: IF l_temp.LEVEL_CODE = 'CR' THEN
97: DELETE IGF_SL_CR_RESP_DTLS WHERE DOCUMENT_ID_TXT = l_temp.REC_ID;
98: ELSIF l_temp.LEVEL_CODE = 'RS' THEN
99: DELETE IGF_SL_RS_RESP_DTLS WHERE REP_SCHL_RESP_ID = l_temp.REC_ID;
100: ELSIF l_temp.LEVEL_CODE = 'AS' THEN
101: DELETE IGF_SL_AS_RESP_DTLS WHERE ATD_SCHL_RESP_ID = l_temp.REC_ID;
1764: DEST_ENTITY_ID_TXT,
1765: DOC_TYPE_CODE,
1766: DOC_STATUS_CODE,
1767: PROCESS_DATE
1768: FROM IGF_SL_CR_RESP_DTLS
1769: WHERE DOCUMENT_ID_TXT = cp_doc_id;
1770: l_get_cr_resp get_cr_resp%ROWTYPE;
1771:
1772: CURSOR get_rs_resp ( cp_doc_id VARCHAR2) IS
1855: END IF;
1856: FOR l_temp IN get_cod_temp
1857: LOOP
1858: IF l_temp.LEVEL_CODE = 'CR' THEN
1859: UPDATE IGF_SL_CR_RESP_DTLS
1860: SET DOC_TYPE_CODE = l_temp.DOC_TYPE_CODE,
1861: DOC_STATUS_CODE = l_temp.DOC_STATUS_CODE,
1862: PROCESS_DATE = l_temp.PROCESS_DATE
1863: WHERE DOCUMENT_ID_TXT = l_temp.REC_ID;
2614: BEGIN
2615: get_datetime(p_receipt_date, lv_receipt_date);
2616: ld_receipt_date := TO_DATE(SUBSTR(lv_receipt_date, 1, 8), 'YYYY/MM/DD');
2617:
2618: UPDATE IGF_SL_CR_RESP_DTLS
2619: SET RECEIPT_DATE = ld_receipt_date
2620: WHERE DOCUMENT_ID_TXT = p_doc_id;
2621:
2622: END;