[Home] [Help]
190: FND_MESSAGE.SET_TOKEN('CLEANUP_TO_DATE',P_CLEANUP_TO_DATE);
191: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_dvc_intg_pvt.temp_data_cleanup', FALSE);
192: end if;
193:
194: DELETE FROM GMO_DEVICE_RESPONSES_T WHERE REQUEST_ID IN
195: (SELECT REQUEST_ID FROM GMO_DEVICE_REQUESTS_T
196: WHERE CREATION_DATE < l_cleanup_to_date );
197:
198: DELETE FROM GMO_DEVICE_REQUESTS_T WHERE CREATION_DATE < l_cleanup_to_date;
225: IS PRAGMA AUTONOMOUS_TRANSACTION;
226: BEGIN
227:
228: IF (P_ACTION = ACTION_INSERT_RESPONSE) then
229: insert into gmo_device_responses_t
230: (
231: RESPONSE_ID,
232: REQUEST_ID,
233: RESP_COMP_CODE,
237: LAST_UPDATED_BY,
238: LAST_UPDATE_LOGIN,
239: LAST_UPDATE_DATE
240: ) values(
241: GMO_DEVICE_RESPONSES_T_S.nextval,
242: P_REQUEST_ID,
243: P_RESP_COMP_CODE,
244: P_RESP_COMP_CODE_VALUE,
245: FND_GLOBAL.USER_ID,
249: sysdate
250: );
251: ELSIF (P_ACTION = ACTION_UPDATE_RESPONSE) then
252:
253: update gmo_device_responses_t set
254: RESP_COMP_CODE_VALUE = P_RESP_COMP_CODE_VALUE,
255: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
256: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID,
257: LAST_UPDATE_DATE = sysdate
597:
598: l_no_msg_components_err exception;
599: cursor c_get_org_details is select organization_code from mtl_parameters where organization_id = P_ORGANIZATION_ID;
600: cursor c_get_device_details is select output_method, output_method_id, name, subinventory_code from wms_devices_vl where device_id = P_DEVICE_ID;
601: cursor c_get_device_response is select RESP_COMP_CODE_VALUE from gmo_device_responses_t where request_id = l_request_id and RESP_COMP_CODE = l_response_code;
602:
603:
604:
605: BEGIN