190: from FND_APPLICATION
191: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME;
192:
193: select ALERT_ID into l_alert_id 194: from ALR_ALERTS 195: where APPLICATION_ID = l_app_id
196: and ALERT_NAME = X_ALERT_NAME;
197:
198: if (X_PROGRAM_APPLICATION_NAME is not null) then