[Home] [Help]
39: -- Forward declaration section....----------------------------------------------------------------
40:
41: -- Serial Processor for LBJ Interface
42: Procedure LBJ_serial_processor ( p_calling_mode IN NUMBER,
43: p_wsm_serial_nums_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
44: p_wip_entity_id IN NUMBER,
45: p_organization_id IN NUMBER,
46: p_inventory_item_id IN NUMBER,
47: x_return_status OUT NOCOPY VARCHAR2,
63: );
64:
65: -- Handles processing (asscoiating, delinking, updating, generation)
66: Procedure process_serial_info ( p_calling_mode IN NUMBER,
67: p_wsm_serial_nums_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
68: p_wip_entity_id IN NUMBER,
69: p_serial_start_flag IN NUMBER,
70: p_organization_id IN NUMBER,
71: p_item_id IN NUMBER,
82: );
83:
84: -- Generate and associate a serial number or else associate if already exisitng
85: Procedure add_assoc_serial_number(p_calling_mode IN NUMBER,
86: p_serial_number_rec IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_REC,
87: p_wip_entity_id IN NUMBER,
88: p_gen_serial_flag IN NUMBER,
89: p_organization_id IN NUMBER,
90: p_inventory_item_id IN NUMBER,
108: );
109:
110:
111: PROCEDURE update_serial_attr ( p_calling_mode IN NUMBER,
112: p_serial_number_rec IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_REC,
113: p_inventory_item_id IN NUMBER,
114: p_organization_id IN NUMBER,
115: p_clear_serial_attr IN NUMBER DEFAULT NULL, -- will be used in case of WLT SpUA to clear the attributes
116: p_wlt_txn_type IN NUMBER DEFAULT NULL,
130:
131: -- Expected i/p is the header id of the Move Transaction...
132: -- All the qty information to be passed in the primary UOM only...
133: Procedure Move_serial_processor ( p_calling_mode IN NUMBER,
134: p_serial_num_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
135: p_move_txn_type IN NUMBER,
136: p_wip_entity_id IN NUMBER,
137: p_organization_id IN NUMBER,
138: p_inventory_item_id IN NUMBER,
159: x_error_count OUT NOCOPY NUMBER
160: );
161:
162: Procedure check_move_serial_qty( p_calling_mode IN NUMBER,
163: p_serial_num_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
164: p_move_txn_type IN NUMBER,
165: p_wip_entity_id IN NUMBER,
166: p_inventory_item_id IN NUMBER,
167: p_organization_id IN NUMBER,
202: x_error_count OUT NOCOPY NUMBER
203: );
204:
205: -- Procedure to dump the serial records' data....
206: Procedure log_serial_data ( p_serial_num_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL ,
207: x_return_status OUT NOCOPY VARCHAR2 ,
208: x_error_msg OUT NOCOPY VARCHAR2 ,
209: x_error_count OUT NOCOPY NUMBER
210: );
319: and msn.current_organization_id (+) = p_organization_id
320: order by nvl(wsti.action_flag,0) desc; -- Code review remark
321: -- first process Delete and then add
322:
323: l_wsm_serial_nums_tbl WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL;
324: l_status_type NUMBER;
325:
326: -- Logging variables.....
327: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
479:
480:
481: -- Expected i/p header_id of the WSM_LOT_JOB_INTERFACE
482: Procedure LBJ_serial_processor ( p_calling_mode IN NUMBER,
483: p_wsm_serial_nums_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
484: p_wip_entity_id IN NUMBER,
485: p_organization_id IN NUMBER,
486: p_inventory_item_id IN NUMBER,
487: x_return_status OUT NOCOPY VARCHAR2,
830: END get_serial_track_info;
831:
832:
833: Procedure process_serial_info ( p_calling_mode IN NUMBER,
834: p_wsm_serial_nums_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
835: p_wip_entity_id IN NUMBER,
836: p_serial_start_flag IN NUMBER,
837: p_organization_id IN NUMBER,
838: p_item_id IN NUMBER,
1277: END process_serial_info;
1278:
1279:
1280: Procedure add_assoc_serial_number(p_calling_mode IN NUMBER,
1281: p_serial_number_rec IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_REC,
1282: p_wip_entity_id IN NUMBER,
1283: p_gen_serial_flag IN NUMBER,
1284: -- will be equal to the 1 in case (Generation..)
1285: p_organization_id IN NUMBER,
2011: --- = 2 --> Non-Interface..
2012: --- update_serial_attr(1)
2013:
2014: PROCEDURE update_serial_attr ( p_calling_mode IN NUMBER,
2015: p_serial_number_rec IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_REC,
2016: p_inventory_item_id IN NUMBER,
2017: p_organization_id IN NUMBER,
2018: p_clear_serial_attr IN NUMBER DEFAULT NULL, -- will be used in case of WLT to clear the attributes
2019: p_wlt_txn_type IN NUMBER DEFAULT NULL,
2928:
2929: -- The addition/deletion of serial numbers will be handled by this procedure...
2930: -- Then it will invoke the main processor whose activities will be common...
2931: Procedure Move_serial_intf_proc(p_header_id IN NUMBER,
2932: p_wsm_serial_nums_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
2933: p_move_txn_type IN NUMBER,
2934: p_wip_entity_id IN NUMBER,
2935: p_organization_id IN NUMBER,
2936: p_inventory_item_id IN NUMBER,
3157: and msn.current_organization_id (+) = p_organization_id
3158: order by nvl(wsti.action_flag,0) desc; -- Code review remark
3159: -- first process Delete and then add
3160:
3161: l_wsm_serial_nums_tbl WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL;
3162: l_serial_tbl t_varchar2;
3163: l_row_updated NUMBER;
3164:
3165: -- Logging variables.....
3498: END Move_serial_intf_proc;
3499:
3500: -- Expected i/p is the header id of the Move Transaction...
3501: Procedure Move_serial_processor ( p_calling_mode IN NUMBER,
3502: p_serial_num_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
3503: p_move_txn_type IN NUMBER,
3504: p_wip_entity_id IN NUMBER,
3505: p_organization_id IN NUMBER,
3506: p_inventory_item_id IN NUMBER,
3788:
3789:
3790: -- check the move qty and ensure that serial no.s are inserted if inadequate...
3791: Procedure check_move_serial_qty( p_calling_mode IN NUMBER,
3792: p_serial_num_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
3793: p_move_txn_type IN NUMBER,
3794: p_wip_entity_id IN NUMBER,
3795: p_inventory_item_id IN NUMBER,
3796: p_organization_id IN NUMBER,
4132:
4133: l_wip_serial_nums_tbl(l_count).ASSEMBLY_SERIAL_NUMBER := p_serial_num_tbl(l_count).serial_number;
4134: -- (Gen_object_id --> assembly_item_id No longer used Instead the column will have gen_object_id)
4135: -- Column not renamed due to
4136: -- i) MES depency through the record defined in the WSM_SERIAL_SUPPORT_GRP package
4137: -- ii) The column is not exposed to the user .. It is an internal column
4138: l_gen_object_id := p_serial_num_tbl(l_count).assembly_item_id;
4139: IF l_gen_object_id IS NULL THEN
4140: -- could be NULL when passed from MES..
4264:
4265: l_wip_serial_nums_tbl(l_count).ASSEMBLY_SERIAL_NUMBER := p_serial_num_tbl(l_count).serial_number;
4266: -- (Gen_object_id --> assembly_item_id No longer used Instead the column will have gen_object_id)
4267: -- Column not renamed due to
4268: -- i) MES depency through the record defined in the WSM_SERIAL_SUPPORT_GRP package
4269: -- ii) The column is not exposed to the user .. It is an internal column
4270: l_gen_object_id := p_serial_num_tbl(l_count).assembly_item_id;
4271: IF l_gen_object_id IS NULL THEN
4272: -- could be NULL when passed from MES..
4536: l_wip_serial_nums_tbl(l_count).TRANSACTION_ID := p_scrap_txn_id;
4537: l_wip_serial_nums_tbl(l_count).ASSEMBLY_SERIAL_NUMBER := p_serial_num_tbl(l_count).serial_number;
4538: -- (Gen_object_id --> assembly_item_id No longer used Instead the column will have gen_object_id)
4539: -- Column not renamed due to
4540: -- i) MES depency through the record defined in the WSM_SERIAL_SUPPORT_GRP package
4541: -- ii) The column is not exposed to the user .. It is an internal column
4542: l_gen_object_id := p_serial_num_tbl(l_count).assembly_item_id;
4543: IF l_gen_object_id IS NULL THEN
4544: -- could be NULL when passed from MES..
5043: p_wip_entity_id IN NUMBER,
5044: p_wip_entity_name IN VARCHAR2,
5045: p_wlt_txn_type IN NUMBER,
5046: p_organization_id IN NUMBER,
5047: x_serial_num_tbl OUT NOCOPY WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
5048: x_return_status OUT NOCOPY VARCHAR2,
5049: x_error_msg OUT NOCOPY VARCHAR2,
5050: x_error_count OUT NOCOPY NUMBER
5051: )
5407: END WLT_serial_intf_proc;
5408:
5409: Procedure fetch_wlt_serials ( p_new_job_name IN VARCHAR2 ,
5410: p_split_txn_job_id IN NUMBER ,
5411: p_serial_num_tbl IN OUT NOCOPY WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
5412: x_return_status OUT NOCOPY VARCHAR2 ,
5413: x_error_msg OUT NOCOPY VARCHAR2 ,
5414: x_error_count OUT NOCOPY NUMBER
5415: )
5649: p_organization_id IN NUMBER,
5650: p_txn_id IN NUMBER,
5651: p_starting_jobs_tbl IN WSM_WIP_LOT_TXN_PVT.WLTX_STARTING_JOBS_TBL_TYPE,
5652: p_resulting_jobs_tbl IN WSM_WIP_LOT_TXN_PVT.WLTX_RESULTING_JOBS_TBL_TYPE,
5653: p_serial_num_tbl IN OUT NOCOPY WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL,
5654: x_return_status OUT NOCOPY VARCHAR2,
5655: x_error_msg OUT NOCOPY VARCHAR2,
5656: x_error_count OUT NOCOPY NUMBER
5657: )
5696: l_parent_job_ser_context MTL_SERIAL_NUMBERS.SERIAL_ATTRIBUTE_CATEGORY%type;
5697: l_child_job_ser_context MTL_SERIAL_NUMBERS.SERIAL_ATTRIBUTE_CATEGORY%type;
5698: l_context MTL_SERIAL_NUMBERS.SERIAL_ATTRIBUTE_CATEGORY%type;
5699:
5700: l_temp_rec WSM_Serial_Support_GRP.WSM_SERIAL_NUM_REC;
5701: l_start_as_res_job NUMBER;
5702: l_serial_start_op NUMBER;
5703: l_serial_num_count NUMBER;
5704: l_rep_job_index NUMBER;
8466: l_cntr NUMBER;
8467:
8468: -- Attributes updation variables...
8469: l_serial_txn_tbl t_number;
8470: l_wsm_serial_attrs_tbl WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL;
8471:
8472: -- Logging variables.....
8473: l_msg_tokens WSM_Log_PVT.token_rec_tbl;
8474: l_log_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9092: where header_id = p_move_txn_id
9093: and transaction_type_id = 2
9094: and action_flag IN (5,6); -- select the move/scrap
9095:
9096: l_wsm_serial_num_tbl WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL;
9097: l_old_scrap_txn_id NUMBER;
9098: l_old_move_txn_id NUMBER;
9099: l_serial_start_op NUMBER;
9100: l_serial_track_flag NUMBER;
9312: );
9313: END Move_forms_serial_proc;
9314:
9315: -- Procedure to dump the serial records' data....
9316: Procedure log_serial_data ( p_serial_num_tbl IN WSM_Serial_Support_GRP.WSM_SERIAL_NUM_TBL ,
9317: x_return_status OUT NOCOPY VARCHAR2 ,
9318: x_error_msg OUT NOCOPY VARCHAR2 ,
9319: x_error_count OUT NOCOPY NUMBER
9320: ) IS