|
H DFTACTGRP(*NO)
DGenUUID pr extproc('_GENUUID')
D * value
DTemplate ds
D BytPrv 10i 0 inz(%size(Template))
D BytAvl 10i 0
D Reserved 8 inz(*loval)
D UUID 16
C callp GenUUID (%addr(Template))
C eval *inlr = '1'
C return
"Steve Richter"
<srichter@autocod To: "mi mail list"
<MI400@midrange.com>
er.com> cc:
Sent by: Subject: [MI400] GENUUID -
bound program access
mi400-admin@midra
nge.com
08/15/2002 11:05
AM
Please respond to
mi400
I want to run the GENUUID MI instruction from an rpg ile program. Can
someone post the rpg code needed to run an MI instruction, via Bound
program
access ?
thanks,
Steve Richter
_______________________________________________
This is the MI Programming on the AS400 / iSeries (MI400) mailing list
To post a message email: MI400@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/mi400
or email: MI400-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mi400.
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.