× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Vijosh,

I don't know if you have this resolved yet or not, but I wanted to make a quick 
observation that may be contributing to your problem.  You have the length of 
variable &FName = 24; however, based on what I can tell, this variable needs a 
minimum value of 28.

Also, I don't know if there is a misspelling on the code you provided, but I'm 
guessing you want to append '.TTO' to the end of the file name.  If that's the 
case, your &FName should look like this:  Value('RTOPCB C:\OFFLINE\' *tcat 
&Name *tcat '.TTO').  This would give your variable &FName a value of 32.

HTH,


Todd Kidwell (Netstar)
AS/400 System Administrator

>>> "Vijosh.A" <vijosh@systsoft.com> 05/11/00 08:25AM >>>
Hi Guys ,

Need some help on this -

We are trying to  transfer data from PC to AS/400 & from AS/400 to PC  using  
STRPCO command in our CL Program. ( Kindly refer to  CL program given at the 
end of the message )

We face the following problems - 

1) When  CL is executed repeatedly  (i.e. for different files) it flashes an 
inquiry message (IWS4010) saying that the PC organizer for  Client Access is 
already active.  System allows us to continue the program after ignoring the 
error.  How do we   eliminate this message ?

2) The filenames passed to  STRPCCMD keeps on changing and so we are giving it 
in the following form -
 STRPCCMD (&FNAME).
But at file  transfer we get an error - 'ACCESS IS DENIED'

3)  The given CL program needs to be executed in batch.  But the STRPCCMD 
cannot be run in batch.  Are there are any alternatives /solutions to this 
problem.
 
*****************************CL Program**************************
PGM PARM(&NAME)
DCL VAR(&NAME) TYPE(*CHAR) LEN (10)
DCL CAR(&FNAME) TYPE(*CHAR) LEN (24)
CHGVAR VAR(&FNAME) VALUE(*RTOPCB C:\OFFLINE\* TCAT &NAMETCAT TTO*)
STRPCO
STRPCCMD(&FNAME)
ENDPGM

******************************************************


Thanks in advance 
Vijosh


>From the Desk of :

Vijosh A.
Senior Consultant
Systems & Software 
SEEPZ, Mumbai, India.

Tel  : (91-22) 829 0803 / 0075
Fax : (91-22) 829 2578 / 1389

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.