There is no random number function in cobol. There are a couple of callable cobol random number generators in a thread http://www.as400network.com/Forums/Thread.cfm?CFApp=19&Thread_ID=17435&mc=3 > -----Original Message----- > From: email@example.com > [mailto:firstname.lastname@example.org]On Behalf Of Kelly Cookson > Sent: Friday, August 24, 2001 8:10 AM > To: COBOL400-L@midrange.com > Subject: RANDOM function with COBOL400? > > > Newbie question. > > I have to generate a list of randomly selected > employees for drug testing. I was thinking of using > the RANDOM function. Unless someone has a better > idea! :) > > I can't seem to get the RANDOM function coded > properly. When I code the following line using SEU: > > COMPUTE X = FUNCTION RANDOM. > > SEU highlights the line and gives the following error > message: > > "ANS COBOL reserved word FUNCTION will be accepted as > a nonreserved word. A period is required before > RANDOM. Line rejected." > > I tried coding the variation: > > COMPUTE X = RANDOM. > > and got the error message: > > "RANDOM not arithmetic expression. Line rejected." > > What am I missing here? How do I use the RANDOM > function in COBOL400? > > Thanks in advance. > Kelly > > > __________________________________________________ > Do You Yahoo!? > Make international calls for as low as $.04/minute with Yahoo! Messenger > http://phonecard.yahoo.com/ > _______________________________________________ > This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) > mailing list > To post a message email: COBOL400-L@midrange.com > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l > or email: COBOL400-Lemail@example.com >
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.