Re: random alpha/numeric generator

["Carsten Flensburg" <flensburg@xxxxxxxxxx>]

Hello Bob,

The MI Functional Reference is currently only available as hardcopy - V4R5 
version being the latest.

I recently heard from IBM that they were working on making it available at the 
Information Center but didn't - at that time - know when it would happen.

The MI builtins are documented in the Functional Reference - for every MI 
instruction having a builtin version there's a "Bound program access" box with 
builtin specifics in the beginning of the section describing that instruction.

Best regards,
Carsten Flensburg

----- Original Message -----
From: <rpg400-l-admin@midrange.com>
To: <rpg400-l@midrange.com>
Sent: Thursday, November 08, 2001 9:41 PM
Subject: RE: random alpha/numeric generator


>
>
> I think you're right. Originally, IBM told me that anything whose name
> began with either the letters "CEE" or an underscore would in-line
> functions.
> I have an MI book and have written a lot of MI code, but I don't have a
> V3, V4 or V5 version of the MI book. I was unaware it was still being
> published. I guess I'll have to check for it in the Info Center (God
> help me!) :)
>
>
> Bob Cozzi
> cozzi@rpgiv.com
> Visit the new on-line iSeries Forums at: http://www.rpgiv.com/forum
>
> > -----Original Message-----
> > From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]
> On
> > Behalf Of Tom Daly
> > Sent: Thursday, November 08, 2001 2:26 PM
> > To: 'rpg400-l@midrange.com'
> > Subject: RE: random alpha/numeric generator
> >
> > Bob,
> >
> > Well this comes under the heading of neat things found while looking
> for
> > something else.
> >
> > In "IBM Distributed Computing Environment Version 2.2, Base Services
> for
> > AS/400: Getting Started" SC41-5601-00  in  C.7 Generating Universal
> Unique
> > Identifiers (UUID) it's briefly mentioned.  The prototype is in
> > QSYSINC/MIH.GENUUID - I don't know if the member description text is
> correct
> > or not.   There's more detail about it in the MI manual.  (even though
> I've
> > never written any real MI pgms this was a worthwhile book to get)
> >
> > I think all the APIs that start with underscore are really MI builtin
> > functions.  When the compiler sees  CallB  to one of these it inlines
> the MI
> > into the RPG object... inline assembler in your RPG.  I'm not 100%
> sure on
> > this though.
> >
> >
> > Tom
> >
> >
> >  |  -----Original Message-----
> >  |  From: Bob Cozzi (RPGIV) [mailto:cozzi@rpgiv.com]
> >  |  Sent: Thursday, November 08, 2001 15:01
> >  |  To: rpg400-l@midrange.com
> >  |  Subject: RE: random alpha/numeric generator
> >  |
> >  |
> >  |  Tom,
> >  |
> >  |  Where are the underscore APIs documented, such as _GENUUID?
> >  |  I don't see
> >  |  them in the System API manual.
> >  |
> >  |  Bob Cozzi
> >  |  cozzi@rpgiv.com
> >  |  Visit the new on-line iSeries Forums at:
> http://www.rpgiv.com/forum
> >  |
> >  |  > -----Original Message-----
> >  |  > From: rpg400-l-admin@midrange.com
> >  |  [mailto:rpg400-l-admin@midrange.com]
> >  |  On
> >  |  > Behalf Of Tom Daly
> >  |  > Sent: Thursday, November 08, 2001 1:38 PM
> >  |  > To: 'rpg400-l@midrange.com'
> >  |  > Subject: RE: random alpha/numeric generator
> >  |  >
> >  |  > If you want to generate unique ID strings you could try GENUUID.
> >  |  >
> >  |  > H   BNDDIR('QC2LE' : 'QUSAPIBD')
> >  |  > H
> >  |  > D GENUUID         PR                  EXTPROC('_GENUUID')
> >  |  > D  UUID_T                         *
> >  |  >  *
> >  |  > D UUID_T          DS                  ALIGN
> >  |  > D  BytesProv                    10U 0 inz(32)
> >  |  > D  BytesAvail                   10U 0 inz(0)
> >  |  > D  Reserved                      8    inz(*allx'00')
> >  |  > D  UUID                         16    inz(*allx'00')
> >  |  >  *
> >  |  >  *
> >  |  > C                   callb     '_GENUUID'
> >  |  > C                   parm                    UUID_T
> >  |  >  *
> >  |  >
> >  |  >  |  -----Original Message-----
> >  |  >  |  From: Kelly_Fucile@vfc.com [mailto:Kelly_Fucile@vfc.com]
> >  |  >  |  Sent: Thursday, November 08, 2001 13:51
> >  |  >  |  To: rpg400-l@midrange.com
> >  |  >  |  Subject: random alpha/numeric generator
> >  |  >  |
> >  |  >  |
> >  |  >  |
> >  |  >  |  Hi,
> >  |  >  |
> >  |  >  |  Is there a good way to create a random alpha/numeric id?
> >  |  >  |  Also not have it
> >  |  >  |  duplicate the number. We need to so this so that we
> >  |  can attach it
> >  |  to
> >  |  >  |  something else. We would like to be able to do it quickly
> >  |  >  |  and simply.
> >  |  >  |  Please help.
> >  |  >  |
> >  |  >  |  Thanks,
> >  |  >  |
> >  |  >  |  Kelly Fucile
> >  |  >  |  JanSport
> >  |  >  |  Programmer/Analyst
> >  |  >  |
> >  |  >  |
> >  |  >  |  _______________________________________________
> >  |  >  |  This is the RPG programming on the AS400 / iSeries
> >  |  >  |  (RPG400-L) mailing list
> >  |  >  |  To post a message email: RPG400-L@midrange.com
> >  |  >  |  To subscribe, unsubscribe, or change list options,
> >  |  >  |  visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> >  |  >  |  or email: RPG400-L-request@midrange.com
> >  |  >  |  Before posting, please take a moment to review the archives
> >  |  >  |  at http://archive.midrange.com/rpg400-l.
> >  |  >  |
> >  |  > _______________________________________________
> >  |  > This is the RPG programming on the AS400 / iSeries
> >  |  (RPG400-L) mailing
> >  |  list
> >  |  > To post a message email: RPG400-L@midrange.com
> >  |  > To subscribe, unsubscribe, or change list options,
> >  |  > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> >  |  > or email: RPG400-L-request@midrange.com
> >  |  > Before posting, please take a moment to review the archives
> >  |  > at http://archive.midrange.com/rpg400-l.
> >  |
> >  |
> >  |  _______________________________________________
> >  |  This is the RPG programming on the AS400 / iSeries
> >  |  (RPG400-L) mailing list
> >  |  To post a message email: RPG400-L@midrange.com
> >  |  To subscribe, unsubscribe, or change list options,
> >  |  visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> >  |  or email: RPG400-L-request@midrange.com
> >  |  Before posting, please take a moment to review the archives
> >  |  at http://archive.midrange.com/rpg400-l.
> >  |
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> > To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>