[Home] [Help]
1291: END IF;
1292: --
1293: -- Delete all the interface items for this order
1294: --
1295: DELETE igs_as_ord_itm_int
1296: WHERE order_number = p_order_number;
1297: END delete_order_and_items;
1298: --
1299: --
2657: RETURN;
2658: END IF;
2659: END LOOP;
2660: --Delete all the interface items for this order
2661: DELETE igs_as_ord_itm_int
2662: WHERE item_number = p_item_number;
2663: -- Initialize API return status to success.
2664: p_return_status := fnd_api.g_ret_sts_success;
2665: -- Standard call to get message count and if count is 1, get message info
2815: TYPE rec IS REF CURSOR;
2816: v rec;
2817: v1 rec;
2818: encert VARCHAR2 (2000)
2819: := 'SELECT 1 FROM igs_as_ord_itm_int WHERE document_type = ''ENCERT'' AND item_number IN ('
2820: || p_item_numbers
2821: || ')';
2822: trns VARCHAR2 (2000)
2823: := 'SELECT 1 FROM igs_as_ord_itm_int WHERE document_type = ''TRANSCRIPT'' AND item_number IN ('
2819: := 'SELECT 1 FROM igs_as_ord_itm_int WHERE document_type = ''ENCERT'' AND item_number IN ('
2820: || p_item_numbers
2821: || ')';
2822: trns VARCHAR2 (2000)
2823: := 'SELECT 1 FROM igs_as_ord_itm_int WHERE document_type = ''TRANSCRIPT'' AND item_number IN ('
2824: || p_item_numbers
2825: || ')';
2826: CURSOR c_doc (cp_doc_type igs_as_ord_itm_int.document_type%TYPE, cp_item_numbers VARCHAR2) IS
2827: SELECT 1
2822: trns VARCHAR2 (2000)
2823: := 'SELECT 1 FROM igs_as_ord_itm_int WHERE document_type = ''TRANSCRIPT'' AND item_number IN ('
2824: || p_item_numbers
2825: || ')';
2826: CURSOR c_doc (cp_doc_type igs_as_ord_itm_int.document_type%TYPE, cp_item_numbers VARCHAR2) IS
2827: SELECT 1
2828: FROM igs_as_ord_itm_int
2829: WHERE document_type = cp_doc_type
2830: AND item_number IN (cp_item_numbers);
2824: || p_item_numbers
2825: || ')';
2826: CURSOR c_doc (cp_doc_type igs_as_ord_itm_int.document_type%TYPE, cp_item_numbers VARCHAR2) IS
2827: SELECT 1
2828: FROM igs_as_ord_itm_int
2829: WHERE document_type = cp_doc_type
2830: AND item_number IN (cp_item_numbers);
2831: l_encert NUMBER (1) := 0;
2832: l_trns NUMBER (1) := 0;
3206: AND l_return_status = fnd_api.g_ret_sts_success THEN
3207: l_one_item_created := TRUE;
3208: END IF;
3209: --If docs are to be produced, create order Interface table item here so that report can pick it up
3210: INSERT INTO igs_as_ord_itm_int
3211: (order_number, person_id, document_type, document_sub_type, item_number, item_status, date_produced,
3212: num_of_copies, programs_on_file, comments, recip_pers_name, recip_inst_name, recip_addr_line_1,
3213: recip_addr_line_2, recip_addr_line_3, recip_addr_line_4, recip_city,
3214: recip_postal_code, recip_state, recip_province, recip_county,