38:
39: PROCEDURE Populate_Error_Records(
40: p_interface_id IN NUMBER,
41: p_interface_table_name IN VARCHAR2,
42: x_interface_errors_rec_tab IN OUT NOCOPY WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_tab,
43: x_return_status OUT NOCOPY VARCHAR2 );
44: --
45: --=============================================================================
46: -- PUBLIC PROCEDURE :
774: -- OE_ORDER_GRP.Process_Order to Create/Update/Cancel Sales Order.
775: -- Attributes related to shipping are validated, If PO group api returns
776: -- success.
777: -- If PO group api returns error then corresponding error messages are
778: -- logged in Wsh_Interface_Errors table.
779: --=============================================================================
780: --
781: PROCEDURE Process_Shipment_Request (
782: p_transaction_rec IN WSH_TRANSACTIONS_HISTORY_PKG.Txns_History_Record_Type,
911:
912: l_lpn_in_sync_comm_rec WSH_GLBL_VAR_STRCT_GRP.lpn_sync_comm_in_rec_type;
913: l_lpn_out_sync_comm_rec WSH_GLBL_VAR_STRCT_GRP.lpn_sync_comm_out_rec_type;
914:
915: interface_error_rec WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_type;
916: interface_error_tab WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_tab;
917: l_dummy WSH_UTIL_CORE.Id_Tab_Type;
918: -- LSP PROJECT : begin
919: l_modify_otm_flag VARCHAR2(1);
912: l_lpn_in_sync_comm_rec WSH_GLBL_VAR_STRCT_GRP.lpn_sync_comm_in_rec_type;
913: l_lpn_out_sync_comm_rec WSH_GLBL_VAR_STRCT_GRP.lpn_sync_comm_out_rec_type;
914:
915: interface_error_rec WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_type;
916: interface_error_tab WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_tab;
917: l_dummy WSH_UTIL_CORE.Id_Tab_Type;
918: -- LSP PROJECT : begin
919: l_modify_otm_flag VARCHAR2(1);
920: l_modify_oe_iface_flag VARCHAR2(1);
1123:
1124: --
1125: IF l_debug_on THEN
1126: WSH_DEBUG_SV.logmsg(l_module_name, 'Locked '||SQL%ROWCOUNT||' wsh_del_details_interface, wsh_del_assgn_interface Records');
1127: WSH_DEBUG_SV.logmsg(l_module_name, 'Locking wsh_interface_errors Records (For Delivery Interface)');
1128: END IF;
1129: --
1130:
1131: SELECT wie.interface_error_id
1129: --
1130:
1131: SELECT wie.interface_error_id
1132: BULK COLLECT INTO l_del_interface_error_tbl
1133: FROM wsh_interface_errors wie,
1134: wsh_transactions_history wth
1135: WHERE wie.interface_table_name = 'WSH_NEW_DEL_INTERFACE'
1136: AND wie.interface_action_code = g_interface_action_code
1137: AND wth.transaction_status in ( 'IP', 'AP', 'ER' )
1143: FOR UPDATE NOWAIT;
1144:
1145: --
1146: IF l_debug_on THEN
1147: WSH_DEBUG_SV.logmsg(l_module_name, 'Locked '||SQL%ROWCOUNT||' wsh_interface_errors Records (For Delivery Interface)');
1148: WSH_DEBUG_SV.logmsg(l_module_name, 'Locking wsh_interface_errors Records (For Detail Interface)');
1149: END IF;
1150: --
1151:
1144:
1145: --
1146: IF l_debug_on THEN
1147: WSH_DEBUG_SV.logmsg(l_module_name, 'Locked '||SQL%ROWCOUNT||' wsh_interface_errors Records (For Delivery Interface)');
1148: WSH_DEBUG_SV.logmsg(l_module_name, 'Locking wsh_interface_errors Records (For Detail Interface)');
1149: END IF;
1150: --
1151:
1152: SELECT wie.interface_error_id
1150: --
1151:
1152: SELECT wie.interface_error_id
1153: BULK COLLECT INTO l_det_interface_error_tbl
1154: FROM wsh_interface_errors wie
1155: WHERE interface_table_name = 'WSH_DEL_DETAILS_INTERFACE'
1156: AND interface_action_code = g_interface_action_code
1157: AND interface_id in
1158: ( select wddi.delivery_detail_interface_id
1170: AND wdai.delivery_interface_id = to_number(wth.entity_number) )
1171: FOR UPDATE NOWAIT;
1172:
1173: IF l_debug_on THEN
1174: WSH_DEBUG_SV.logmsg(l_module_name, 'Locked '||SQL%ROWCOUNT||' wsh_interface_errors Records (For Detail Interface)');
1175: END IF;
1176:
1177: EXCEPTION
1178: WHEN RECORD_LOCKED THEN
2346: END IF;
2347:
2348: --
2349: IF l_debug_on THEN
2350: WSH_DEBUG_SV.log(l_module_name, 'Querying wsh_interface_errors Records (For Delivery Interface)', l_entity_number);
2351: END IF;
2352: --
2353:
2354: --Flushing following arrays since it contains interface errors of Current/Existing document revisions
2357:
2358: --Querying interface errors of Current processing document revision - Start
2359: SELECT wie.interface_error_id
2360: BULK COLLECT INTO l_del_interface_error_tbl
2361: FROM wsh_interface_errors wie
2362: WHERE wie.interface_table_name = 'WSH_NEW_DEL_INTERFACE'
2363: AND wie.interface_action_code = g_interface_action_code
2364: AND wie.interface_id = l_entity_number;
2365:
2364: AND wie.interface_id = l_entity_number;
2365:
2366: --
2367: IF l_debug_on THEN
2368: WSH_DEBUG_SV.logmsg(l_module_name, 'Queried '||SQL%ROWCOUNT||' wsh_interface_errors Records (For Delivery Interface)');
2369: WSH_DEBUG_SV.log(l_module_name, 'Querying wsh_interface_errors Records (For Detail Interface)', l_entity_number);
2370: END IF;
2371: --
2372:
2365:
2366: --
2367: IF l_debug_on THEN
2368: WSH_DEBUG_SV.logmsg(l_module_name, 'Queried '||SQL%ROWCOUNT||' wsh_interface_errors Records (For Delivery Interface)');
2369: WSH_DEBUG_SV.log(l_module_name, 'Querying wsh_interface_errors Records (For Detail Interface)', l_entity_number);
2370: END IF;
2371: --
2372:
2373: SELECT wie.interface_error_id
2371: --
2372:
2373: SELECT wie.interface_error_id
2374: BULK COLLECT INTO l_det_interface_error_tbl
2375: FROM wsh_interface_errors wie
2376: WHERE interface_table_name = 'WSH_DEL_DETAILS_INTERFACE'
2377: AND interface_action_code = g_interface_action_code
2378: AND interface_id in
2379: ( select wddi.delivery_detail_interface_id
2384: AND wddi.delivery_detail_interface_id = wdai.delivery_detail_interface_id
2385: AND wdai.delivery_interface_id = l_entity_number );
2386:
2387: IF l_debug_on THEN
2388: WSH_DEBUG_SV.logmsg(l_module_name, 'Queried '||SQL%ROWCOUNT||' wsh_interface_errors Records (For Detail Interface)');
2389: END IF;
2390: --Querying interface errors of Current processing document revision - End
2391:
2392: --
2438: --
2439: IF interface_error_tab.count > 0 THEN
2440: --
2441: IF l_debug_on THEN
2442: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling WSH_INTERFACE_VALIDATIONS_PKG.Log_Interface_Errors', WSH_DEBUG_SV.C_PROC_LEVEL);
2443: END IF;
2444: --
2445: WSH_INTERFACE_VALIDATIONS_PKG.Log_Interface_Errors (
2446: p_interface_errors_rec_tab => interface_error_tab,
2441: IF l_debug_on THEN
2442: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling WSH_INTERFACE_VALIDATIONS_PKG.Log_Interface_Errors', WSH_DEBUG_SV.C_PROC_LEVEL);
2443: END IF;
2444: --
2445: WSH_INTERFACE_VALIDATIONS_PKG.Log_Interface_Errors (
2446: p_interface_errors_rec_tab => interface_error_tab,
2447: p_interface_action_code => g_interface_action_code,
2448: x_return_status => l_return_status);
2449:
3211: -- has been shipped.
3212: --=============================================================================
3213: --
3214: PROCEDURE Validate_Delivery_Line (
3215: p_changed_attributes IN WSH_INTERFACE.ChangedAttributeTabType,
3216: x_return_status OUT NOCOPY VARCHAR2 )
3217: IS
3218: CURSOR c_delivery_line_info(c_line_id NUMBER)
3219: IS
5903: p_header_id IN NUMBER,
5904: p_del_interface_rec IN OUT NOCOPY Del_Interface_Rec_Type,
5905: x_om_line_tbl_type OUT NOCOPY OM_Line_Tbl_Type,
5906: x_details_interface_rec_tab OUT NOCOPY Del_Details_Interface_Rec_Tab,
5907: x_interface_error_tab OUT NOCOPY WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_tab,
5908: x_return_status OUT NOCOPY VARCHAR2 )
5909: IS
5910: CURSOR c_del_details_interface_rec
5911: IS
6920: --
6921: PROCEDURE Populate_Error_Records(
6922: p_interface_id IN NUMBER,
6923: p_interface_table_name IN VARCHAR2,
6924: x_interface_errors_rec_tab IN OUT NOCOPY WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_tab,
6925: x_return_status OUT NOCOPY VARCHAR2 )
6926: IS
6927: l_error_count NUMBER;
6928: l_msg_count NUMBER;
7006: --=============================================================================
7007: --
7008: PROCEDURE Validate_Interface_Details(
7009: p_details_interface_tab IN OUT NOCOPY Del_Details_Interface_Rec_Tab,
7010: x_interface_error_tab OUT NOCOPY WSH_INTERFACE_VALIDATIONS_PKG.interface_errors_rec_tab,
7011: x_return_status OUT NOCOPY VARCHAR2 )
7012: IS
7013:
7014: CURSOR c_delivery_details_info(c_line_id NUMBER)