[Home] [Help]
514: END IF; --BUG3497572 p_lpn_id is an optional when pre_generate called from concurrent request
515:
516:
517: IF (l_debug = 1) THEN
518: print_debug('Before calling WMS_Cross_Dock_Pvt.crossdock');
519: print_debug('p_organization_id = '||p_organization_id);
520: print_debug('p_lpn_id = '||p_lpn_id);
521: print_debug('p_move_order_line_id = '||l_mol_line_id);
522: END IF;
529: -- 3. In otherwords, if no crossdock occurs, and call is from PL/SQL api, and org level
530: -- pregenerate flag is off, do not pregenerate task.
531: --}}
532:
533: WMS_Cross_Dock_Pvt.crossdock
534: (p_org_id => p_organization_id,
535: p_lpn => p_lpn_id,
536: p_move_order_line_id => l_mol_line_id,
537: x_ret => l_ret_crossdock,
539: x_msg_count => l_msg_count,
540: x_msg_data => l_msg_data);
541:
542: IF (l_debug = 1) THEN
543: print_debug('After calling WMS_Cross_Dock_Pvt.crossdock');
544: print_debug('l_ret_crossdock = '||l_ret_crossdock);
545: print_debug('l_return_status = '||l_return_status);
546: print_debug('l_msg_count = '||l_msg_count);
547: print_debug('l_msg_data = '||l_msg_data);
548: END IF;
549:
550: IF (l_return_status = fnd_api.g_ret_sts_success) THEN
551: IF (l_debug = 1) THEN
552: print_debug('pre_generate: Success returned from WMS_Cross_Dock_Pvt.crossdock API');
553: END IF;
554: ELSE
555: IF (l_debug = 1) THEN
556: print_debug('pre_generate: Failure returned from WMS_Cross_Dock_Pvt.crossdock API');
552: print_debug('pre_generate: Success returned from WMS_Cross_Dock_Pvt.crossdock API');
553: END IF;
554: ELSE
555: IF (l_debug = 1) THEN
556: print_debug('pre_generate: Failure returned from WMS_Cross_Dock_Pvt.crossdock API');
557: END IF;
558: RAISE fnd_api.g_exc_error;
559:
560: END IF; -- (l_return_status = fnd_api.g_ret_sts_success)