How do I use a random number generator?

I would like to create a random number. I have tried using the RND command but it returns a value of zero.

Has anyone tried to create a random number and assign it to a variable in PCDMIS?

Thanks

Parents

AndersI over 9 years ago

            ASSIGN/RND=0
CS1        =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\WAI\PC-DMIS\2014\REPORTING\RANDOM.BAS
            FUNCTION/InitRandom,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            First random value
            RND
CS2        =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\WAI\PC-DMIS\2014\REPORTING\RANDOM.BAS
            FUNCTION/NextRandom,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            Second random value
            RND
CS2        =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\WAI\PC-DMIS\2014\REPORTING\RANDOM.BAS
            FUNCTION/NextRandom,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            Third random value
            RND

Reply

AndersI over 9 years ago

            ASSIGN/RND=0
CS1        =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\WAI\PC-DMIS\2014\REPORTING\RANDOM.BAS
            FUNCTION/InitRandom,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            First random value
            RND
CS2        =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\WAI\PC-DMIS\2014\REPORTING\RANDOM.BAS
            FUNCTION/NextRandom,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            Second random value
            RND
CS2        =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\WAI\PC-DMIS\2014\REPORTING\RANDOM.BAS
            FUNCTION/NextRandom,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            Third random value
            RND

Children

No Data