|
midrange.com
These 2 web site are go reference, but what I am looking for is like the
example at the bottom of this memo, which tell you in RPG how the code it,
is there anything like that around using C within RPG.
Rich
"Martin, Booth"
<BoothM@goddard.edu To:
"'MIDRANGE-L@midrange.com'"
> <MIDRANGE-L@midrange.com>
Sent by: cc:
owner-midrange-l@mi Subject: RE: FW: Random
drange.com
02/14/2000 02:23 PM
Please respond to
MIDRANGE-L
Let me scream, holler, rant and rave yet again....
You guys may think it is progress to be sticking all this stuff into RPG,
and probably it is. But a few years from now when RPG is cluttered up with
all sorts of specialized little tricks, where will the programmers to
maintain it be found? What qualified C programmer is going to be doing RPG
maintenance work?
Jon thinks 10000.01 is a pain in the butt... wait til this stuff starts
hitting the update fan.
Sorry. I'll be quiet now. No need to call the authorities.
-----Original Message-----
From: boldt@ca.ibm.com [mailto:boldt@ca.ibm.com]
Sent: Monday, February 14, 2000 1:34 PM
To: boothm@goddard.edu
Subject: Re: FW: Random
Andrew wrote:
>Some of us don't know what functions are available to use in the
>C Runtime LIbrary. Where can one find a list of what C functions are
>available on a 400 that does NOT have a C compiler, and what parameters if
>any are needed for using them.
>
>The answer to this must be in terms that an RPG programmer with
>NO "C" experience will understand and know how to use.
(Sigh)
Not more than a week ago, we had a very similar discussion
either here or on RPG400-L.
For a discussion on translating C prototypes to RPG, read
<http://www.springfieldtn.net/users/leslier/callc.html>
To see a list of function in the C runtime library, go to
<http://publib.boulder.ibm.com:80/cgi-bin/bookmgr/BOOKS/QBJAQY01/1.10>
Here's an example in RPG IV of calling rand and srand:
---------------------------------------------------------------
H dftactgrp(*no) bnddir('QC2LE')
D rand pr 10i 0 extproc('rand')
D srand pr extproc('srand')
D 10i 0 value
D num s 10i 0
D i s 10i 0
C callp srand(123)
C for i = 1 to 10
C eval num = rand
C num dsply
C endfor
C eval *inlr = *on
----------------------------------------------------------------
This program displays 10 pseudo-random numbers.
Cheers! Hans
Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.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
+---
+---
| 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
+---
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.
