172: g_err_code := -1;
173: g_err_buff := l_module || ' :When others error: ' || sqlerrm;
174: END get_ussgl_acct_num;
175: -------------------------------------------------------------------------------
176: --Checks whether a passed value exists in fv_gtas_attributes.fed_non_fed1
177: --2 or 3 columns
178: PROCEDURE CHECK_FED_NONFED(p_account_number IN VARCHAR2,
179: p_fed_nonfed_type IN VARCHAR2,
180: p_code_exists OUT NOCOPY VARCHAR2) IS
178: PROCEDURE CHECK_FED_NONFED(p_account_number IN VARCHAR2,
179: p_fed_nonfed_type IN VARCHAR2,
180: p_code_exists OUT NOCOPY VARCHAR2) IS
181: l_module VARCHAR2(80) := g_module || 'CHECK_FED_NONFED';
182: l_fednonfed_code fv_gtas_attributes.fed_non_fed1%TYPE;
183: l_fednonfed_code_tmp fv_gtas_attributes.fed_non_fed1%TYPE;
184: l_fednonfed_select VARCHAR2(200);
185: l_fednonfed_code_count NUMBER;
186: BEGIN
179: p_fed_nonfed_type IN VARCHAR2,
180: p_code_exists OUT NOCOPY VARCHAR2) IS
181: l_module VARCHAR2(80) := g_module || 'CHECK_FED_NONFED';
182: l_fednonfed_code fv_gtas_attributes.fed_non_fed1%TYPE;
183: l_fednonfed_code_tmp fv_gtas_attributes.fed_non_fed1%TYPE;
184: l_fednonfed_select VARCHAR2(200);
185: l_fednonfed_code_count NUMBER;
186: BEGIN
187:
189: log(l_module, 'p_account_number: ' || p_account_number);
190:
191: SELECT 'Y'
192: INTO p_code_exists
193: FROM fv_gtas_attributes
194: WHERE gtas_acct_number = p_account_number
195: AND set_of_books_id = g_sob_id
196: AND (fed_non_fed1 = p_fed_nonfed_type OR
197: fed_non_fed2 = p_fed_nonfed_type OR
478: WHERE set_of_books_id = v_sob_id
479: AND account_number = v_acct_number
480: AND fiscal_year = g_fiscal_year - 1;
481:
482: l_temp_acct_num fv_gtas_attributes.gtas_acct_number%TYPE;
483: l_ussgl_acct_number fv_gtas_attributes.ussgl_acct_number%TYPE;
484: l_fed_non_fed VARCHAR2(1);
485: l_aid VARCHAR2(3);
486: l_main_account VARCHAR2(4);
479: AND account_number = v_acct_number
480: AND fiscal_year = g_fiscal_year - 1;
481:
482: l_temp_acct_num fv_gtas_attributes.gtas_acct_number%TYPE;
483: l_ussgl_acct_number fv_gtas_attributes.ussgl_acct_number%TYPE;
484: l_fed_non_fed VARCHAR2(1);
485: l_aid VARCHAR2(3);
486: l_main_account VARCHAR2(4);
487: l_prev_sob_id NUMBER;
505:
506: log(l_module, 'Account_number: ' || fed_acct_rec.account_number);
507:
508: --Get the gtas attributes for the account
509: --if it exists in fv gtas attributes
510: --If not, then get the ussgl account and get its attributes
511: l_temp_acct_num := NULL;
512:
513: BEGIN
512:
513: BEGIN
514: SELECT gtas_acct_number
515: INTO l_temp_acct_num
516: FROM fv_gtas_attributes
517: WHERE set_of_books_id = fed_acct_rec.set_of_books_id
518: AND gtas_acct_number = fed_acct_rec.account_number;
519:
520: EXCEPTION
533:
534: BEGIN
535: SELECT ussgl_acct_number
536: INTO l_temp_acct_num
537: FROM fv_gtas_attributes
538: WHERE set_of_books_id = fed_acct_rec.set_of_books_id
539: AND gtas_acct_number = l_ussgl_acct_number;
540:
541: EXCEPTION
668: AND account = v_acct_number
669: AND fiscal_year = g_fiscal_year - 1;
670:
671: l_prev_sob_id NUMBER;
672: l_temp_acct_num fv_gtas_attributes.gtas_acct_number%TYPE;
673: l_ussgl_acct_number fv_gtas_attributes.ussgl_acct_number%TYPE;
674: l_fed_non_fed VARCHAR2(1);
675: l_aid VARCHAR2(3);
676: l_main_account VARCHAR2(4);
669: AND fiscal_year = g_fiscal_year - 1;
670:
671: l_prev_sob_id NUMBER;
672: l_temp_acct_num fv_gtas_attributes.gtas_acct_number%TYPE;
673: l_ussgl_acct_number fv_gtas_attributes.ussgl_acct_number%TYPE;
674: l_fed_non_fed VARCHAR2(1);
675: l_aid VARCHAR2(3);
676: l_main_account VARCHAR2(4);
677: l_authority_type_code fv_facts_attributes.authority_type%TYPE;
730: END;
731: END IF;
732:
733: --Get the gtas attributes for the account
734: --if it exists in fv gtas attributes
735: --If not, then get the ussgl account and get its attributes
736: l_temp_acct_num := NULL;
737:
738: BEGIN
737:
738: BEGIN
739: SELECT gtas_acct_number
740: INTO l_temp_acct_num
741: FROM fv_gtas_attributes
742: WHERE set_of_books_id = fed_acct_rec.set_of_books_id
743: AND gtas_acct_number = fed_acct_rec.account_number;
744:
745: EXCEPTION
753:
754: BEGIN
755: SELECT ussgl_acct_number
756: INTO l_temp_acct_num
757: FROM fv_gtas_attributes
758: WHERE set_of_books_id = fed_acct_rec.set_of_books_id
759: AND gtas_acct_number = l_ussgl_acct_number;
760:
761: EXCEPTION
898: l_fund_value fv_gtas_ending_balances.fund_value%TYPE;
899: l_account_number fv_gtas_ending_balances.account_number%TYPE;
900: l_amount NUMBER;
901:
902: l_temp_acct_num fv_gtas_attributes.gtas_acct_number%TYPE;
903: l_ussgl_acct_number fv_gtas_attributes.ussgl_acct_number%TYPE;
904: l_fed_non_fed VARCHAR2(1);
905: l_aid VARCHAR2(3);
906: l_main_account VARCHAR2(4);
899: l_account_number fv_gtas_ending_balances.account_number%TYPE;
900: l_amount NUMBER;
901:
902: l_temp_acct_num fv_gtas_attributes.gtas_acct_number%TYPE;
903: l_ussgl_acct_number fv_gtas_attributes.ussgl_acct_number%TYPE;
904: l_fed_non_fed VARCHAR2(1);
905: l_aid VARCHAR2(3);
906: l_main_account VARCHAR2(4);
907: l_code_exists VARCHAR2(1);
964: 'ccid: ' || l_ccid || ' fund: ' || l_fund_value ||
965: ' account: ' || l_account_number);
966:
967: --Get the gtas attributes for the account
968: --if it exists in fv gtas attributes
969: --If not, then get the ussgl account and get its attributes
970: l_temp_acct_num := NULL;
971:
972: BEGIN
971:
972: BEGIN
973: SELECT gtas_acct_number
974: INTO l_temp_acct_num
975: FROM fv_gtas_attributes
976: WHERE set_of_books_id = g_sob_id
977: AND gtas_acct_number = l_account_number;
978:
979: EXCEPTION
986:
987: BEGIN
988: SELECT ussgl_acct_number
989: INTO l_temp_acct_num
990: FROM fv_gtas_attributes
991: WHERE set_of_books_id = g_sob_id
992: AND gtas_acct_number = l_ussgl_acct_number;
993:
994: EXCEPTION
1009: IF l_code_exists = 'Y' THEN
1010: SELECT COUNT(*)
1011: INTO l_fednonfed_count
1012: FROM (SELECT fed_non_fed1
1013: FROM fv_gtas_attributes
1014: WHERE gtas_acct_number = l_temp_acct_num
1015: AND fed_non_fed1 IS NOT NULL
1016: AND set_of_books_id = g_sob_id
1017: UNION
1015: AND fed_non_fed1 IS NOT NULL
1016: AND set_of_books_id = g_sob_id
1017: UNION
1018: SELECT fed_non_fed2
1019: FROM fv_gtas_attributes
1020: WHERE gtas_acct_number = l_temp_acct_num
1021: AND fed_non_fed2 IS NOT NULL
1022: AND set_of_books_id = g_sob_id
1023: UNION
1021: AND fed_non_fed2 IS NOT NULL
1022: AND set_of_books_id = g_sob_id
1023: UNION
1024: SELECT fed_non_fed3
1025: FROM fv_gtas_attributes
1026: WHERE gtas_acct_number = l_temp_acct_num
1027: AND fed_non_fed3 IS NOT NULL
1028: AND set_of_books_id = g_sob_id);
1029: