Re: User id retrieval(in COBOL/400)

["Frank D. Brough" <fbrough@xxxxxxxxx>]

     I would take a look at COBOL/400, I would think there would be a
way of getting a "Program Information" area into a Cobol program if
you can get it in RPG. 




---"R. Bruce Hoffman, Jr." <rbruceh@ibm.net> wrote:
>
> G.R.Srinivas wrote:
> 
> > Hello!
> >
> > This is an unusual doubt. Hope one of you will definitely clarify.
> > One of my colleague works on COBOL/400. He wants to retrieve user id
> > in cobol instead of using CL. Kindly suggest.
> >
> 
> Use the CL.  I can not recall ever finding the user profile name
anywhere
> inside of the COBOL program.  I do not recall ever having a "program
> information" data structure in the COBOL, just open and io feedback
areas and
> I don't think they have any user profile information in them.
> 
> 
> > Thanks in advance.
> >
> > Srinivas.
> >
> > _________________________________________________________
> > DO YOU YAHOO!?
> > Get your free @yahoo.com address at http://mail.yahoo.com
> >
> > * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* * * *
> > * This is the RPG/400 Discussion Mailing List!  To submit a new   
     *
> > * message, send your mail to "RPG400-L@midrange.com".  To
unsubscribe   *
> > * from this list send email to MAJORDOMO@midrange.com and specify 
     *
> > * 'unsubscribe RPG400-L' in the body of your message.  Questions
should *
> > * be directed to the list owner / operator: david@midrange.com    
     *
> > * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* * * *
> 
> 
> 
> --
> ===========================================================
> R. Bruce Hoffman, Jr. -- IBM Certified AS/400 Administrator
> 
> -- The sum of all human knowledge is a fixed constant.
>     It's the population that keeps growing!
> 
> 
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* * *
> * This is the RPG/400 Discussion Mailing List!  To submit a new     
   *
> * message, send your mail to "RPG400-L@midrange.com".  To
unsubscribe   *
> * from this list send email to MAJORDOMO@midrange.com and specify   
   *
> * 'unsubscribe RPG400-L' in the body of your message.  Questions
should *
> * be directed to the list owner / operator: david@midrange.com      
   *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* * *
> 

==


Frank D. Brough
The Money Store
fbrough@yahoo.com
(916) 485-1500 - Hm
(916) 617-2528 - Wk
_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *