5: --
6: PROCEDURE LOG (p_device_id IN NUMBER, p_data IN VARCHAR2);
7:
8: /*
9: * Call WMS_Task_Dispatch_Device.get_device_info
10: * And if the return status is "A" then it means that this device is already signed on.
11: * Throw an error WMS_DEVICE_ALREADY_SIGNED. And make the x_return_status of the Open API "E"
12: *
13: * If the return status is "S" then this device is valid.
10: * And if the return status is "A" then it means that this device is already signed on.
11: * Throw an error WMS_DEVICE_ALREADY_SIGNED. And make the x_return_status of the Open API "E"
12: *
13: * If the return status is "S" then this device is valid.
14: * Call WMS_Task_Dispatch_Device. PROCEDURE insert_device
15: * And make the x_return_status of the Open API "S"
16: */
17: PROCEDURE call_workflow
18: (
40: x_return_status := FND_API.G_RET_STS_ERROR;
41:
42: IF (l_debug = 1) THEN
43: log
44: (p_device_id, 'In DEVICE_SIGN_ON. Calling WMS_Task_Dispatch_Device.get_device_info with params...');
45: log
46: (p_device_id, 'p_organization_id='
47: || p_organization_id
48: || ', p_device_name='
51: || p_employee_id
52: );
53: END IF;
54:
55: --Call WMS_Task_Dispatch_Device.get_device_info
56: WMS_Task_Dispatch_Device.get_device_info
57: (p_organization_id => p_organization_id,
58: p_device_name => p_device_name,
59: x_return_status => x_return_status,
52: );
53: END IF;
54:
55: --Call WMS_Task_Dispatch_Device.get_device_info
56: WMS_Task_Dispatch_Device.get_device_info
57: (p_organization_id => p_organization_id,
58: p_device_name => p_device_name,
59: x_return_status => x_return_status,
60: x_device_id => l_device_id,
99: END IF;
100:
101: IF (l_debug = 1) THEN
102: log
103: (p_device_id, 'Device is not signed on. Calling WMS_Task_Dispatch_Device.insert_device.');
104: END IF;
105:
106: WMS_Task_Dispatch_Device.insert_device
107: (p_Employee_Id => p_employee_id,
102: log
103: (p_device_id, 'Device is not signed on. Calling WMS_Task_Dispatch_Device.insert_device.');
104: END IF;
105:
106: WMS_Task_Dispatch_Device.insert_device
107: (p_Employee_Id => p_employee_id,
108: p_device_id => p_device_id,
109: p_org_id => p_organization_id,
110: x_return_status => x_return_status);
131: (p_device_id, 'Unexpected error in DEVICE_SIGN_ON : '||SQLERRM);
132: END IF;
133: END DEVICE_SIGN_ON;
134:
135: --Wrapper call on WMS_Task_Dispatch_Device.cleanup_device_and_tasks
136: PROCEDURE DEVICE_SIGN_OFF
137: (p_Employee_Id IN NUMBER,
138: p_org_id IN NUMBER,
139: x_return_status OUT NOCOPY VARCHAR2,
146: x_return_status := FND_API.G_RET_STS_ERROR;
147:
148: IF (l_debug = 1) THEN
149: log
150: (NULL, 'In DEVICE_SIGN_OFF. Calling WMS_Task_Dispatch_Device.cleanup_device_and_tasks with params...');
151: log
152: (NULL, 'p_Employee_Id='
153: || p_Employee_Id
154: || ', p_org_id='
154: || ', p_org_id='
155: || p_org_id);
156: END IF;
157:
158: --Call WMS_Task_Dispatch_Device.cleanup_device_and_tasks
159: WMS_Task_Dispatch_Device.cleanup_device_and_tasks
160: (p_Employee_Id => p_Employee_Id,
161: p_org_id => p_org_id,
162: x_return_status => x_return_status,
155: || p_org_id);
156: END IF;
157:
158: --Call WMS_Task_Dispatch_Device.cleanup_device_and_tasks
159: WMS_Task_Dispatch_Device.cleanup_device_and_tasks
160: (p_Employee_Id => p_Employee_Id,
161: p_org_id => p_org_id,
162: x_return_status => x_return_status,
163: x_msg_count => x_msg_count,
186: END IF;
187: END DEVICE_SIGN_OFF;
188:
189:
190: --Wrapper call on overloaded WMS_Task_Dispatch_Device.cleanup_device_and_tasks
191: PROCEDURE SINGLE_DEVICE_SIGN_OFF
192: (p_Employee_Id IN NUMBER,
193: p_org_id IN NUMBER,
194: p_device_id IN NUMBER,
202: x_return_status := FND_API.G_RET_STS_ERROR;
203:
204: IF (l_debug = 1) THEN
205: log
206: (NULL, 'In SINGLE_DEVICE_SIGN_OFF. Calling overloaded WMS_Task_Dispatch_Device.cleanup_device_and_tasks with params...');
207: log
208: (NULL, 'p_Employee_Id='
209: || p_Employee_Id
210: || ', p_org_id='
212: || ', p_device_id='
213: || p_device_id);
214: END IF;
215:
216: --Call overloaded WMS_Task_Dispatch_Device.cleanup_device_and_tasks
217: WMS_Task_Dispatch_Device.cleanup_device_and_tasks
218: (p_Employee_Id => p_Employee_Id,
219: p_org_id => p_org_id,
220: p_device_id => p_device_id,
213: || p_device_id);
214: END IF;
215:
216: --Call overloaded WMS_Task_Dispatch_Device.cleanup_device_and_tasks
217: WMS_Task_Dispatch_Device.cleanup_device_and_tasks
218: (p_Employee_Id => p_Employee_Id,
219: p_org_id => p_org_id,
220: p_device_id => p_device_id,
221: x_return_status => x_return_status,