how to generate UUID

[kmkmagesh]

Hi all

any one can help me i want generate UUID that store into one physical file.

Thanx in advance
magesh

[jamief]

Re: how to generate UUID

here some code

just download and call

     H Option( *NoSrcStmt )  DftActGrp( *No )
      **
     D UUID_template   Ds
     D  UtBytPrv                     10u 0 Inz( %Size( UUID_template ))
     D  UtBytAvl                     10u 0
     D                                8a   Inz( *Allx'00' )
     D  UUID                         16a
     D  Reply                         1a
      **
     D GenUuid         PR                  ExtProc('_GENUUID')
     D  UUID_template                  *   Value
      **
     c                   do        25
     C                   Callp     GenUuid( %Addr( UUID_template ))
     c     UUID          dsply                   Reply
     c                   enddo
      **
     C                   Eval      *INLR = *on 

[kmkmagesh]

Re: how to generate UUID

Thanx

the value come like this

¢ \ µq ¥^e � ø
�A µº ¥^e � ø
ó"q µº ¥^e � ø
�= µº ¥^e � ø

but in JAVA it's come as numeric value.

can u plz., help me

Thanx in Advance
magesh

[jamief]

Re: how to generate UUID

THere is no help needed that is how the UUID looks.

[kmkmagesh]

Re: how to generate UUID

thanx a lot

[Gcoxusa]

Re: how to generate UUID

Thanks for this GENUUID example... it works very well. I was looking at the GENUUID API definition and it isn't clear how the template in your example maps to the API specs. Could you explain that a little. I have not coded in ILE for years so most likely I have misunderstood something. In any case, it does the job.

http://www-01.ibm.com/support/knowledgecenter/ssw_ibm_i_71/rzatk/GENUUID.htm

The UUID return template (operand 1) has the following format:
Dec Hex Field Name Data Type and Length
0 0 Return template size specification Char(8)
0 0 Number of bytes provided UBin(4)
4 4 Number of bytes available UBin(4)
8 8 Reserved (binary 0) Char(8)
16 10 Returned UUID Char(16)
32 20
--- End ---

Thank You.

here some code

just download and call

     H Option( *NoSrcStmt )  DftActGrp( *No )
      **
     D UUID_template   Ds
     D  UtBytPrv                     10u 0 Inz( %Size( UUID_template ))
     D  UtBytAvl                     10u 0
     D                                8a   Inz( *Allx'00' )
     D  UUID                         16a
     D  Reply                         1a
      **
     D GenUuid         PR                  ExtProc('_GENUUID')
     D  UUID_template                  *   Value
      **
     c                   do        25
     C                   Callp     GenUuid( %Addr( UUID_template ))
     c     UUID          dsply                   Reply
     c                   enddo
      **
     C                   Eval      *INLR = *on