RE: Retrive Object name in a CL

[Ken Slaugh <ken.slaugh@xxxxxxxxxx>]

Use the command RTVOBJD in your CLP.

Ken Slaugh
Senior Programmer/System Analyst
AS/400 Professional Network Administrator/MSE
Specialist - Client Access/400
Chouinard & Myhre, Inc.

> -----Original Message-----
> From: Rajan.Srinivasan@Allfun.com [SMTP:Rajan.Srinivasan@Allfun.com]
> Sent: Monday, April 12, 1999 9:25 AM
> To:   MIDRANGE-L@midrange.com
> Subject:      Retrive Object name in a CL
> 
>  Hello All,
>                          I recently posted this message.  Someone has
> wrote
> , how to do this, but somehow  the message got deleted.
> 
> Can any one please help me.  Sorry for any disturbance.
> 
> 
> Thanks
> 
> Regards
> rAj
> 
> 
> 
> 
> ---------------------- Forwarded by Rajan
> Srinivasan/Servicing/SuperiorBank
> on 04-12-99 12:23 PM ---------------------------
> 
> 
> Rajan Srinivasan
> 04-09-99 01:17 PM
> 
> To:   MIDRANGE-L@midrange.com
> cc:
> Subject:  Retrive Object name in a CL
> 
> Hello,
>                 ( PC  TO  AS/400)
>                  I am trying to transfer a  set of  source members
> which
> are in  a directory called  QCLSRC in a PC    To a    AS/400 at one
> time.
> I  did that  using   IBM TCPIP software.
> 
>                  When I transfered all those 40  filles ( which is
> actually
> CL Source ),   it   went to  AS/400 Library as  a 40 different
> Physical
> Files. (PF-DTA ).
> 
> 
>                 To convert  that  PF  files to  actually   a  member
> of  a
> source physical file,  (QCLSRC ),  I  tried using  CPYF command and it
> went
> sucessfully.
> 
> 
>                  But,  instead  of  doing  every single file, I
> thought of
> write a CL Program to do it  at one time for  all  40  files.
> 
> I was struck  ,  because I dont know how to get (retrieve )  all  the
> file (object) name one by one from that Library.
> 
> I  tired using  DSPOBJD, and put  all the  object desc into a  data
> File ,
> but that too did'nt help  because I  dont know how to read  that  in
> CL .
> 
> 
> Is  there any other way I can do?.
> 
> Any help is greatly  appreciated.
> 
> 
> Thanks
> 
> - Raj
> 
> 
> 
> 
> 
> 
> +---
> | 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
+---