Re: Anyone need a random number generator?

Your JCL doesn't have any link edit content, so the executable or the
object is not going to be written anywhere.

http://www.jaymoseley.com/hercules/compilers/syscpk.htm

http://www.jaymoseley.com/hercules/compiling/compile.htm

On 4/28/10, Ron Hudson <[email protected]> wrote:
> //MYLIB         JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),NOTIFY=HUDSON
> //COMPILE       EXEC FORTHC,REGION.FORT=384K
> //FORT.SYSLIN   DD DSNAME=MYLIB,DISP=(MOD,PASS)
> //FORT.SYSABEND DD SYSOUT=A
> //FORT.SYSIN    DD *
> C RANDOM NUMBER GENERATOR
>       FUNCTION IRND(ISEED)
>       IY = IABS(MOD(1103515245 * ISEED + 12345,2**15))
>       IRND = IY
>       RETURN
>       END
>
> Well yes, it's a bog-standard linear congruential pseudo random number
> generator.
>
>
> This is only a semi free offer however (or should I say it's another
> opportunity to
> help the newbie)
>
> I am trying to compile this so I can call it from other programs. I can run
> the
> above job without any errors, but in the listing I see
>
> mylib           deleted
>
> and I don't see any new files in my catalog (but perhaps it would be better
> if it were someplace "all my users" could access)
>
> I even made a  first attempt by editing the //fort.syslin which did not have
> a
> disposition parameter before.
>
> Ron...
>