91: IF p_currency = 'ANY' OR p_currency IS NULL
92: THEN
93: IF p_exchange_rate_type = 'User'
94: THEN
95: fnd_message.set_name ('SQLAP', 'AP_EXCHANGE_RATE_TYPE');
96: lc_exchange_rate_type := fnd_message.get;
97: RAISE ex_exchange_rate_type;
98: ELSE
99: gc_currency := ' AND 1 = 1';
92: THEN
93: IF p_exchange_rate_type = 'User'
94: THEN
95: fnd_message.set_name ('SQLAP', 'AP_EXCHANGE_RATE_TYPE');
96: lc_exchange_rate_type := fnd_message.get;
97: RAISE ex_exchange_rate_type;
98: ELSE
99: gc_currency := ' AND 1 = 1';
100: END IF;
132: AND gdr.conversion_date = p_as_of_date;
133: EXCEPTION
134: WHEN NO_DATA_FOUND
135: THEN
136: fnd_message.set_name ('SQLAP', 'AP_EXCHANGE_RATE');
137: fnd_message.set_token ('P_EXCHANGE_RATE_TYPE',
138: p_exchange_rate_type
139: );
140: fnd_message.set_token ('CURRENCY', currency);
133: EXCEPTION
134: WHEN NO_DATA_FOUND
135: THEN
136: fnd_message.set_name ('SQLAP', 'AP_EXCHANGE_RATE');
137: fnd_message.set_token ('P_EXCHANGE_RATE_TYPE',
138: p_exchange_rate_type
139: );
140: fnd_message.set_token ('CURRENCY', currency);
141: fnd_message.set_token ('P_AS_OF_DATE', p_as_of_date);
136: fnd_message.set_name ('SQLAP', 'AP_EXCHANGE_RATE');
137: fnd_message.set_token ('P_EXCHANGE_RATE_TYPE',
138: p_exchange_rate_type
139: );
140: fnd_message.set_token ('CURRENCY', currency);
141: fnd_message.set_token ('P_AS_OF_DATE', p_as_of_date);
142: lc_exchange_rate_type := fnd_message.get;
143: fnd_file.put_line (fnd_file.LOG, lc_exchange_rate_type);
144: raise_application_error (-20101, lc_exchange_rate_type);
137: fnd_message.set_token ('P_EXCHANGE_RATE_TYPE',
138: p_exchange_rate_type
139: );
140: fnd_message.set_token ('CURRENCY', currency);
141: fnd_message.set_token ('P_AS_OF_DATE', p_as_of_date);
142: lc_exchange_rate_type := fnd_message.get;
143: fnd_file.put_line (fnd_file.LOG, lc_exchange_rate_type);
144: raise_application_error (-20101, lc_exchange_rate_type);
145: END;
138: p_exchange_rate_type
139: );
140: fnd_message.set_token ('CURRENCY', currency);
141: fnd_message.set_token ('P_AS_OF_DATE', p_as_of_date);
142: lc_exchange_rate_type := fnd_message.get;
143: fnd_file.put_line (fnd_file.LOG, lc_exchange_rate_type);
144: raise_application_error (-20101, lc_exchange_rate_type);
145: END;
146: ELSE