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