[Home] [Help]
9: -- This is the global cache table used to store the crossdock criteria records
10: -- encountered during crossdock pegging. This is defined solely in the package body
11: -- so only the procedures and functions in this package can access it directly.
12: -- Set, Get, Delete, and Clear functions will be provided for outside callers.
13: TYPE crossdock_criteria_tb IS TABLE OF wms_crossdock_criteria%ROWTYPE
14: INDEX BY BINARY_INTEGER;
15: g_crossdock_criteria_tb crossdock_criteria_tb;
16:
17: -- For Wave Planning Crossdocking Simulation
120: -- Test setting the crossdock criteria record for a crossdock criterion that
121: -- has not yet been cached. }}
122: SELECT *
123: INTO g_crossdock_criteria_tb(p_criterion_id)
124: FROM wms_crossdock_criteria
125: WHERE criterion_id = p_criterion_id;
126: RETURN TRUE;
127: END IF;
128: EXCEPTION
132:
133:
134: -- This function will retrieve the crossdock criteria record inputted from the cache
135: FUNCTION get_crossdock_criteria
136: (p_criterion_id IN NUMBER) RETURN wms_crossdock_criteria%ROWTYPE
137: IS
138: BEGIN
139: IF (p_criterion_id IS NULL) THEN
140: RETURN NULL;
145: -- Test retrieving a crossdock criteria record for a crossdock criterion that
146: -- has not yet been cached. }}
147: SELECT *
148: INTO g_crossdock_criteria_tb(p_criterion_id)
149: FROM wms_crossdock_criteria
150: WHERE criterion_id = p_criterion_id;
151: END IF;
152: -- {{
153: -- Test retrieving a crossdock criteria record for a crossdock criterion that