103: SELECT COUNT(1)
104: FROM gr_document_print dp
105: WHERE dp.disclosure_code_country = delete_disclosure;
106:
107: /* Cursor to call disclosure code out of GR_RECIPIENT_INFO */
108: CURSOR recip_disclosure_cursor
109: IS
110: SELECT COUNT(1)
111: FROM gr_recipient_info ri
107: /* Cursor to call disclosure code out of GR_RECIPIENT_INFO */
108: CURSOR recip_disclosure_cursor
109: IS
110: SELECT COUNT(1)
111: FROM gr_recipient_info ri
112: WHERE ri.disclosure_code = delete_disclosure;
113:
114: BEGIN
115:
162: END IF;
163:
164: /* Check the Recipient Info table for the Disclosure Code */
165:
166: l_table_name := 'GR_RECIPIENT_INFO';
167:
168: OPEN recip_disclosure_cursor;
169: FETCH recip_disclosure_cursor INTO l_count;
170: CLOSE recip_disclosure_cursor;