757: errbuf := 'Import Delivery Details is completed with error';
758: retcode := '2';
759: END IF;
760:
761: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_status,'');
762:
763: --
764: -- Debug Statements
765: --
784: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.PRINTMSG',WSH_DEBUG_SV.C_PROC_LEVEL);
785: END IF;
786: --
787: WSH_INTERFACE.PrintMsg('The unexpected error is ' || SQLERRM);
788: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
789: errbuf := 'Import Delivery Details is completed with error';
790: retcode := '2';
791:
792: --