2128:
2129: cursor c_ou_curr_code_fcst (l_org_id Number)
2130: is
2131: SELECT FC.Currency_Code
2132: FROM FND_CURRENCIES FC,
2133: GL_SETS_OF_BOOKS GB,
2134: PA_IMPLEMENTATIONS_ALL IMP
2135: WHERE FC.Currency_Code = DECODE(IMP.Set_Of_Books_ID, Null, Null,GB.CURRENCY_CODE)
2136: AND GB.Set_Of_Books_ID = IMP.Set_Of_Books_ID
2227: x_compute_flag IN OUT NOCOPY PA_PLSQL_DATATYPES.Char1TabTyp,
2228: x_error_code IN OUT NOCOPY PA_PLSQL_DATATYPES.Char30TabTyp
2229: )
2230: IS
2231: l_acct_currency_code FND_CURRENCIES.CURRENCY_CODE%TYPE ; /** Added for Org Forecasting **/
2232: BEGIN
2233: pa_debug.Set_err_stack ('Validate_Array');
2234: pa_debug.G_Err_Stage := 'Starting Validate_Array';
2235: IF g1_debug_mode = 'Y' THEN