RE: rmtcmd not working on call to as400

["Nick Blattner" <nick.blattner@xxxxxxxxxxxxx>]

Angela

The remote command job name is QRWTSRVR, QZDASOINIT is the ODBC server
job.  It lives in QSYSWRK on my V5R3 system.

Regards,

Nick Blattner

Nick Blattner   System Engineer
PowerTech Group
19426 68th Ave S
Kent WA 98032
800 915 7700 ext 304
253 872 7788
www.powertech.com


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Angela Wawrzaszek
Sent: Wednesday, February 02, 2005 8:22 AM
To: Midrange Systems Technical Discussion
Subject: rmtcmd not working on call to as400


    We have a VB app that initiates a program on our AS/400.   This has
worked fine.   It no longer works.  It can be initiated from a DOS
prompt,  but not from the VB app.  I am assuming some service is not
started???   I started the iseries remote command on the PC running the
program,  and have started the tcpip service  *rexec.   Anything else?
When the VB code runs it 'flashes' the dos prompt but it is too fast to
see what happened.  Is there a way to let that screen stay up?   Tried
setting on the rmtcmd call to VBmaximizefocus but that just 'flashes' a
bigger screen.     Also tried to set the property on iseries remote
command to allow interaction with desktop. 

 

The command used in VB is:

retval = Shell("c:\Windows\rmtcmd call RMT025CR 'CRANE" & ct & "'", 2)

 

Set a variable to see the value of this and it is:     call RMT025CR
'CRANE1'     which is correct and is the command used on the dos prompt.

 

I tried looking on the as/400 job   in QSERVER for QDASOINIT but that
just shows the job is connected.   I compiled the CL program to show log
CL *yes,  but do not find a log anywhere,  so I don't believe it is even
initiating the job. 

 

 

 

Help!   I'm running out of ideas!

 

 

Angela Wawrzaszek

IT Supervisor

awawrzaszek@xxxxxxxxxxxxxxx

(315) 258-4205

 

-- 
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.