|
midrange.com
AAAAARRRRRRRGGGGGGGGHHHHHHHHHHHHHH!!!!!!!!!!!!!!!!!!!!
(HTML is bad)
eric.delong@pmsi-services.com
______________________________ Reply Separator _________________________________
Subject: Re:
Author: <MIDRANGE-L@midrange.com> at INET_WACO
Date: 8/29/00 2:54 PM
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Rizwan,
<p>No the VLRQ0100 and the TRAN0100 formats are not the same. You
can find the formats for TRAN0100 (and many others) in the <i>Client Access
Express Host Servers V4R4<I> (SC41-5740-03 QB3AUX03)</i> manual.
<p>hth,
<p>jte
<br>
<br>
<br><i></i>
<p>Rizwan Ahmed wrote:
<blockquote TYPE=CITE>
<p><font face="Arial"><font size=-1>Thanks Gary</font></font>
<br><font face="Arial"><font size=-1>I have exit programs for FTP and is
working fine.My concern is about simple file transfer and the exit point
is QIBM_QTF_QTRANSFER and the Exit point format is TRAN0100.I am searching
hard for documents about the parameters list for this exit point
format(TRAN0100) and also samples for this Exit Point.I wrote a small exit
program but I
am not sure it's working.</font></font>
<p><font face="Arial"><font size=-1>Can I use the same paramer list for
which I use FTP Client/Server Exit Programs ie VLRQ0100.Are both
the same?.</font></font>
<br><font face="Arial"><font size=-1>Highly appreciating your
help.</font></font> <br><i><u><font face="Tahoma">Rizwan Ahamed</font></u></i>
<br><i><font face="Arial Narrow"><font size=-1>Programmer-analyst / Software
developer</font></font></i>
<br><u><font face="Arial"><font color="#0000FF"><font size=-1><a href="mailto:ri
an@nscsa.com.sa">rizwan@nscsa.com.sa</a></font></font></font></u>
<p><i><font face="Haettenschweiler"><font color="#000080"><font size=+2>NSCSA.</
nt></font></font></i>
<br><font face="Arial Narrow"><font size=-1>Telephone : (966)
4785454-611</font></font>
<br><font face="Arial Narrow"><font size=-1>Fax : &
sp;
(966) 4778036</font></font>
<br><font face="Arial Narrow"><font size=-1>Site internet / Website
: www.nscsa.com.sa</font></font>
<br><font face="Arial Narrow"><font size=-1>E-mail : &nbs
&n
p; </font></fon
t> <u><font face="Arial"><font color="#0000FF"><font size=-1><a
href="mailto:itdmai
nscsa.com.sa">itdmail@nscsa.com.sa</a></font></font></font></u>
<ul><a NAME="_MailData"></a><font face="Arial"><font size=-1>-----Original
Message-----</font></font>
<br><b><font face="Arial"><font size=-1>From: Gary R. Patterson
[SMTP:midrange-l@nexsource.com]</font></font></b>
<br><b><font face="Arial"><font size=-1>Sent: </font></font></b>
<font face="Arial"><font size=-1>Tuesday, August 29, 2000 8:18 AM</font></font>
<br><b><font face="Arial"><font size=-1>To: </font></font
/b>
<font face="Arial"><font size=-1>MIDRANGE-L@midrange.com</font></font>
<br><b><font face="Arial"><font size=-1>Subject: &n
p; </font></font></b>
<font face="Arial"><font size=-1>RE:</font></font>
<p><font face="Arial"><font size=-1>You can debug programs running in an
FTP server job. Remember to compile</font></font>
<br><font face="Arial"><font size=-1>your ILE program with DBGVIEW(*SOURCE).</fo
></font>
<p><font face="Arial"><font size=-1>1) Start an FTP session and supply
a valid user ID and password.</font></font>
<p><font face="Arial"><font size=-1>C:\WINDOWS>ftp MY400</font></font>
<br><font face="Arial"><font size=-1>Connected to MY400.</font></font>
<br><font face="Arial"><font size=-1>220-QTCP at MY400.</font></font>
<br><font face="Arial"><font size=-1>220 Connection will close if idle
more than 166 minutes.</font></font>
<br><font face="Arial"><font size=-1>User (MY400:(none)):
MYPROFILE</font></font> <br><font face="Arial"><font size=-1>331 Enter
password.</font></font>
<br><font face="Arial"><font size=-1>Password: xxxxxxxxxx</font></font>
<br><font face="Arial"><font size=-1>230 MYPROFILE logged on.</font></font>
<p><font face="Arial"><font size=-1>2) In a terminal session, identify
the server job that you are connected to</font></font>
<br><font face="Arial"><font size=-1>(it will hold a lock on the user profile
used to log into the FTP server):</font></font>
<p><font face="Arial"><font size=-1>WRKOBJLCK MYPROFILE *USRPRF</font></font>
<p><font face="Arial"><font size=-1>Note: If you sign on to FTP using a
profile that is widely used, you might</font></font>
<br><font face="Arial"><font size=-1>see a lot of jobs locking that
profile. An easy way to determine which one</font></font>
<br><font face="Arial"><font size=-1>is yours is to enter the DSPJOB command
as an FTP remote command (in the FTP</font></font>
<br><font face="Arial"><font size=-1>client window):</font></font>
<p><font face="Arial"><font size=-1>ftp> quote rcmd dspjob</font></font>
<p><font face="Arial"><font size=-1>Check WRKSPLF for the FTP signon profile
and find the job name in the</font></font>
<br><font face="Arial"><font size=-1>QPDSPJOB spooled file.</font></font>
<p><font face="Arial"><font size=-1>3) Start a service job over the job
identified in step 2.</font></font>
<p><font face="Arial"><font size=-1>STRSRVJOB QTPFTPxxxx</font></font>
<p><font face="Arial"><font size=-1>4) Start debug. Since you are
servicing another job, debug commands apply</font></font>
<br><font face="Arial"><font size=-1>to the serviced job.</font></font>
<p><font face="Arial"><font size=-1>STRDBG MYLIB/MYPROGRAM UPDPROD(*YES)
DSPMODSRC(*YES)</font></font>
<p><font face="Arial"><font size=-1>5) Set breakpoints, or step.</font></font>
<p><font face="Arial"><font size=-1>BREAK xx -OR- F10</font></font>
<p><font face="Arial"><font size=-1>6) Cause the program to be invoked
(I am just doing an explicit FTP remote</font></font>
<br><font face="Arial"><font size=-1>command invocation. You can
execute any AS/400 command in FTP by executing</font></font>
<br><font face="Arial"><font size=-1>"QUOTE RCMD command". If you
are using an FTP exit program, just do a</font></font>
<br><font face="Arial"><font size=-1>download (or whatever) to kick off
the exit program.</font></font>
<p><font face="Arial"><font size=-1>ftp> quote rcmd CALL MYLIB/MYPROGRAM</font><
ont>
<p><font face="Arial"><font size=-1>7) The source debug screen will pop
if and when your program hits your</font></font>
<br><font face="Arial"><font size=-1>breakpoint(s). Since you are
servicing another job, it will be slower than</font></font>
<br><font face="Arial"><font size=-1>debugging in the same job. You
can use manual debugging if you prefer, but</font></font>
<br><font face="Arial"><font size=-1>it is slow, too.</font></font>
<p><font face="Arial"><font size=-1>(I'm on OS/400 V4R4, and I used the
Win98 FTP client to connect to the</font></font>
<br><font face="Arial"><font size=-1>AS/400 FTP server. Sample program
was an ILE RPG program compiled with</font></font>
<br><font face="Arial"><font size=-1>DBGVIEW(*SOURCE).)</font></font>
<p><font face="Arial"><font size=-1>Gary R. Patterson</font></font>
<br><font face="Arial"><font size=-1>NexSource, Inc.</font></font>
<p><font face="Arial"><font size=-1>980 N Michigan Ave, Suite 1400</font></font>
<br><font face="Arial"><font size=-1>Chicago, IL 60611</font></font>
<br><font face="Arial"><font size=-1>(312) 214-3526</font></font>
<p><font face="Arial"><font size=-1>640 W. Main St.</font></font>
<br><font face="Arial"><font size=-1>Louisville, KY 40202</font></font>
<br><font face="Arial"><font size=-1>(502) 581-0106</font></font>
<p><font face="Arial"><font size=-1>Information technology services for
business</font></font>
<br><font face="Arial"><font size=-1><a href="http://www.nexsource.com" TARGET="
lank">http://www.nexsource.com</a></font></font>
<br>
<p><font face="Arial"><font size=-1>-----Original Message-----</font></font>
<br><font face="Arial"><font size=-1>From: owner-midrange-l@midrange.com</font><
ont>
<br><font face="Arial"><font size=-1>[<a href="mailto:owner-midrange-l@midrange.
m">mailto:owner-midrange-l@midrange.com</a>]On
Behalf Of Pete Hall</font></font>
<br><font face="Arial"><font size=-1>Sent: Monday, August 28, 2000 8:59
PM</font></font>
<br><font face="Arial"><font size=-1>To: MIDRANGE-L@midrange.com</font></font>
<br><font face="Arial"><font size=-1>Subject: Re:</font></font>
<p><font face="Arial"><font size=-1>At 04:03 08/27/2000 , Rizwan Ahamed
wrote:</font></font>
<br><font face="Arial"><font size=-1>>Any ways to debug an file transfer
exit program(ie like downloading &</font></font>
<br><font face="Arial"><font size=-1>>uploading files from and to AS/400
eg thru Client Acess and not FTP).I</font></font>
<br><font face="Arial"><font size=-1>>found 5 jobs I remember in wrkactjob
during file transfer and how to use</font></font>
<br><font face="Arial"><font size=-1>>StrSrvJob for that?.Any ways to debug
apart from strsrvjob like submitting</font></font>
<br><font face="Arial"><font size=-1>>to job?.Would appreciate any help.</font><
ont>
<p><font face="Arial"><font size=-1>+---</font></font>
<br><font face="Arial"><font size=-1>| This is the Midrange System Mailing
List!</font></font>
<br><font face="Arial"><font size=-1>| To submit a new message, send your
mail to MIDRANGE-L@midrange.com.</font></font>
<br><font face="Arial"><font size=-1>| To subscribe to this list send email
to MIDRANGE-L-SUB@midrange.com.</font></font>
<br><font face="Arial"><font size=-1>| To unsubscribe from this list send
email to MIDRANGE-L-UNSUB@midrange.com.</font></font>
<br><font face="Arial"><font size=-1>| Questions should be directed to
the list owner/operator: david@midrange.com</font></font>
<br><font face="Arial"><font size=-1>+---</font></font></ul>
</blockquote>
<p>--
<br>John Earl &
sp;
johnearl@400security.com
<br>The PowerTech Group
206-575-0711
<br>PowerLock Network Security www.400security.com
<br>--
<br> </html>
+---
| 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
+---
+---
| 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 mailing list archive is Copyright 1997-2025 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.
