[Home] [Help]
552: END IF; --BUG3497572 p_lpn_id is an optional when pre_generate called from concurrent request
553:
554:
555: IF (l_debug = 1) THEN
556: print_debug('Before calling WMS_Cross_Dock_Pvt.crossdock');
557: print_debug('p_organization_id = '||p_organization_id);
558: print_debug('p_lpn_id = '||p_lpn_id);
559: print_debug('p_move_order_line_id = '||l_mol_line_id);
560: END IF;
567: -- 3. In otherwords, if no crossdock occurs, and call is from PL/SQL api, and org level
568: -- pregenerate flag is off, do not pregenerate task.
569: --}}
570:
571: WMS_Cross_Dock_Pvt.crossdock
572: (p_org_id => p_organization_id,
573: p_lpn => p_lpn_id,
574: p_move_order_line_id => l_mol_line_id,
575: x_ret => l_ret_crossdock,
577: x_msg_count => l_msg_count,
578: x_msg_data => l_msg_data);
579:
580: IF (l_debug = 1) THEN
581: print_debug('After calling WMS_Cross_Dock_Pvt.crossdock');
582: print_debug('l_ret_crossdock = '||l_ret_crossdock);
583: print_debug('l_return_status = '||l_return_status);
584: print_debug('l_msg_count = '||l_msg_count);
585: print_debug('l_msg_data = '||l_msg_data);
586: END IF;
587:
588: IF (l_return_status = fnd_api.g_ret_sts_success) THEN
589: IF (l_debug = 1) THEN
590: print_debug('pre_generate: Success returned from WMS_Cross_Dock_Pvt.crossdock API');
591: END IF;
592: ELSE
593: IF (l_debug = 1) THEN
594: print_debug('pre_generate: Failure returned from WMS_Cross_Dock_Pvt.crossdock API');
590: print_debug('pre_generate: Success returned from WMS_Cross_Dock_Pvt.crossdock API');
591: END IF;
592: ELSE
593: IF (l_debug = 1) THEN
594: print_debug('pre_generate: Failure returned from WMS_Cross_Dock_Pvt.crossdock API');
595: END IF;
596: RAISE fnd_api.g_exc_error;
597:
598: END IF; -- (l_return_status = fnd_api.g_ret_sts_success)