848: x_valid OUT NOCOPY BOOLEAN
849: )
850:
851: IS
852: l_ccid gl_code_combinations.Code_Combination_Id%TYPE;
853:
854: BEGIN
855: x_valid := TRUE;
856:
858:
859: Begin
860: SELECT GCC.code_combination_id
861: INTO l_ccid
862: FROM GL_CODE_COMBINATIONS GCC, GL_SETS_OF_BOOKS GSOB
863: WHERE GCC.code_combination_id = p_ccid
864: AND GCC.account_type = 'L'
865: AND GCC.enabled_flag = 'Y'
866: AND GCC.detail_posting_allowed_flag = 'Y'
879: ELSE
880: Begin
881: SELECT GCC.code_combination_id
882: INTO l_ccid
883: FROM GL_CODE_COMBINATIONS GCC, GL_SETS_OF_BOOKS GSOB
884: WHERE GCC.code_combination_id = p_ccid
885: AND GCC.enabled_flag = 'Y'
886: AND GCC.detail_posting_allowed_flag = 'Y'
887: AND GCC.chart_of_accounts_id = GSOB.chart_of_accounts_id