[Home] [Help]
23:
24: PROCEDURE Calendar_Check_Unique (x_calendar_code VARCHAR2) IS
25: dummy NUMBER;
26: BEGIN
27: select 1 into dummy from DUAL where not exists
28: (select 1 from BOM_CALENDARS
29: where calendar_code = x_calendar_code
30: );
31:
104: PROCEDURE Cal_Exception_Check_Unique (x_calendar_code VARCHAR2,
105: x_exception_date DATE) IS
106: dummy NUMBER;
107: BEGIN
108: select 1 into dummy from DUAL where not exists
109: (select 1 from BOM_CALENDAR_EXCEPTIONS
110: where calendar_code = x_calendar_code
111: and exception_date = x_exception_date
112: );
124: PROCEDURE Shift_Check_Unique (x_calendar_code VARCHAR2,
125: x_shift_num NUMBER) IS
126: dummy NUMBER;
127: BEGIN
128: select 1 into dummy from DUAL where not exists
129: (select 1 from BOM_CALENDAR_SHIFTS
130: where calendar_code = x_calendar_code
131: and shift_num = x_shift_num
132: );
144: x_shift_num NUMBER,
145: x_exception_date DATE) IS
146: dummy NUMBER;
147: BEGIN
148: select 1 into dummy from DUAL where not exists
149: (select 1 from BOM_SHIFT_EXCEPTIONS
150: where calendar_code = x_calendar_code
151: and shift_num = x_shift_num
152: and exception_date = x_exception_date
167: x_start_time NUMBER,
168: x_end_time NUMBER) IS
169: dummy NUMBER;
170: BEGIN
171: select 1 into dummy from DUAL where not exists
172: (select 1 from BOM_SHIFT_TIMES
173: where calendar_code = x_calendar_code
174: and shift_num = x_shift_num
175: and from_time = x_start_time
198: x_flag NUMBER) RETURN NUMBER IS
199: dummy NUMBER := 0;
200: BEGIN
201: if x_flag = 1 then
202: select count(*) into dummy from dual where not exists
203: (select 1 from BOM_SHIFT_TIMES
204: where calendar_code = x_calendar_code
205: and shift_num = x_shift_num
206: and from_time < to_time
213: and from_time > to_time
214: and (x_start_time > from_time or x_start_time < to_time)
215: );
216: elsif x_flag = 2 then
217: select count(*) into dummy from dual where not exists
218: (select 1 from BOM_SHIFT_TIMES
219: where calendar_code = x_calendar_code
220: and shift_num = x_shift_num
221: and from_time < to_time
236: return (0);
237: end if;
238:
239: if x_flag = 1 then
240: select count(*) into dummy from DUAL where not exists
241: (select 1 from BOM_SHIFT_TIMES
242: where calendar_code = x_calendar_code
243: and shift_num = x_shift_num
244: and from_time < to_time
251: and from_time > to_time
252: and (x_end_time < to_time or x_end_time > from_time)
253: );
254: elsif x_flag = 2 then
255: select count(*) into dummy from DUAL where not exists
256: (select 1 from BOM_SHIFT_TIMES
257: where calendar_code = x_calendar_code
258: and shift_num = x_shift_num
259: and from_time < to_time
274: return (0);
275: end if;
276:
277: if x_flag = 1 then
278: select count(*) into dummy from DUAL where not exists
279: (select 1 from BOM_SHIFT_TIMES
280: where calendar_code = x_calendar_code
281: and shift_num = x_shift_num
282: and from_time < to_time
292: and x_start_time > from_time
293: and x_end_time < to_time
294: );
295: elsif x_flag = 2 then
296: select count(*) into dummy from DUAL where not exists
297: (select 1 from BOM_SHIFT_TIMES
298: where calendar_code = x_calendar_code
299: and shift_num = x_shift_num
300: and from_time < to_time
318: return (0);
319: end if;
320:
321: if x_flag = 1 then
322: select count(*) into dummy from DUAL where not exists
323: (select 1 from BOM_SHIFT_TIMES
324: where calendar_code = x_calendar_code
325: and shift_num = x_shift_num
326: and from_time > to_time
336: and x_start_time > from_time
337: and x_end_time < to_time
338: );
339: elsif x_flag = 2 then
340: select count(*) into dummy from DUAL where not exists
341: (select 1 from BOM_SHIFT_TIMES
342: where calendar_code = x_calendar_code
343: and shift_num = x_shift_num
344: and from_time > to_time