2: /* $Header: IGSUC66B.pls 120.5 2006/09/15 01:38:11 jbaber noship $ */
3:
4: g_success_rec_cnt NUMBER;
5: g_error_rec_cnt NUMBER;
6: g_error_code igs_uc_ccontrl_ints.error_code%TYPE;
7: g_crnt_institute igs_uc_defaults.current_inst_code%TYPE;
8:
9:
10: PROCEDURE common_data_setup (errbuf OUT NOCOPY VARCHAR2,
80: ***************************************************************** */
81:
82: l_rowcnt NUMBER ;
83: l_rowid VARCHAR2(26) ;
84: g_error_code igs_uc_ccontrl_ints.error_code%TYPE;
85:
86: CURSOR int_uinst_cur IS
87: SELECT uinst.rowid,
88: uinst.*