Scheduling a work book through concurrent manager

Question

how to run discoverer workbook through concurrent mnager......please help me..
thank you in advance

Answer 1

HI every one I am naresh
I have the following code to exort discoverer using command line
Dim tkgoDB,msConnect,moRS,msRequest
Set tkgoDB =CreateObject("ADODB.Connection")
Set moRS=Createobject("ADODB.Recordset")
Set tkgoFileSystem=CreateObject("Scripting.FileSystemObject")
set tkgoShell=CreateObject("Wscript.shell")
'msConnect = "UID=APPS;PWD=APPS;CONNECTSTRING=DEV01";
tkgoDB.Open "Driver={Microsoft ODBC for Oracle};UID=APPS;PWD=APPS;SERVER=DEV01"
Set moRS=tkgoDB.execute("SELECT apps.aa_scheduled_pkg.start_job REQUEST_ID FROM dual")
'Do while moRS.EOF
moRS.MoveFirst
msRequest = moRS.Fields(0).value
Wscript.Echo msRequest
If msRequest = "0" Then
'Exit Do
End If
Set moRS=tkgoDB.execute("SELECT cmd EXPORT_CMD FROM apps.aa_export_cmd_v WHERE request_id = " & msRequest)
moRS.MoveFirst
msExpCmd = moRS("EXPORT_CMD")
msCmdFile = "r" & msRequest & ".cmd"
Set moOutputStream = tkgoFileSystem.CreateTextFile(msCmdFile, True)
moOutputStream.Write Replace(Replace(msCmd, "$SAMBA$", gsOutDir),"$TNS$", gsInstance) & vbCRLF
moOutputStream.Close
msCommand = gsBinDir & gsDiscoExe & " /EUL " & gsEUL & " /CMDFILE " & msCmdFile
Call tkgoShell.Run(msCommand,1,true)
Wscript.Echo msExpCmd
'loop
But it is giving error like
UNBLAE TO WAIT FOR THE PROCESS.
If the i changed the parameter in tkgoShell.Run 'true' to 'false' it is not giving error
But both times i am geting batch file.
but when i click the batch file it is not opening Discoverer Workbook
My command line is
CONNECT anaresh:"system administrator"/anaresh@dev01/OPENDB "AA_EMP_workbook" /SHEET "aa_emp_sheet" /EXPORT html "$SAMBA$\o2815027.out" /LOGFILE l2815027.log /BATCH
Please tell me where i did wrong
Please Help me
Thank you in advance