19: CURSOR CYCLE_DESC(CYCLE_ID_1 number) IS
20: SELECT
21: CYCLE_NO
22: FROM
23: IC_CYCL_HDR
24: WHERE CYCLE_ID = CYCLE_ID_1;
25: CURSOR CURSOR_00007(CYCLE_ID_1 number) IS
26: SELECT
27: MIN(COUNT_NO)
57: SELECT
58: PRINT_FORMAT
59: INTO PRN_FOR
60: FROM
61: IC_CYCL_HDR
62: WHERE IC_CYCL_HDR.WHSE_CODE = WHSE
63: AND IC_CYCL_HDR.CYCLE_ID = CYCLE_ID_1;
64: IF PRN_FOR = 0 THEN
65: IF (SORT_BY = 'ITEM,LOT,LOCATION') THEN
58: PRINT_FORMAT
59: INTO PRN_FOR
60: FROM
61: IC_CYCL_HDR
62: WHERE IC_CYCL_HDR.WHSE_CODE = WHSE
63: AND IC_CYCL_HDR.CYCLE_ID = CYCLE_ID_1;
64: IF PRN_FOR = 0 THEN
65: IF (SORT_BY = 'ITEM,LOT,LOCATION') THEN
66: F_ORDER_BY := 'ITEM_NO,LOT_NO,SUBLOT_NO,LOCATION ASC';
59: INTO PRN_FOR
60: FROM
61: IC_CYCL_HDR
62: WHERE IC_CYCL_HDR.WHSE_CODE = WHSE
63: AND IC_CYCL_HDR.CYCLE_ID = CYCLE_ID_1;
64: IF PRN_FOR = 0 THEN
65: IF (SORT_BY = 'ITEM,LOT,LOCATION') THEN
66: F_ORDER_BY := 'ITEM_NO,LOT_NO,SUBLOT_NO,LOCATION ASC';
67: END IF;
142: CYCLE_NO,
143: CYCLE_SOURCE
144: INTO CYCLE_NO,PHYSICAL_OR_CYCLE
145: FROM
146: IC_CYCL_HDR
147: WHERE CYCLE_ID = CYCLE_ID_1;
148: RETURN (CYCLE_NO);
149: RETURN NULL;
150: EXCEPTION