In order for this site to work correctly, and for us to improve the site, we need to store a small file (called a cookie) on your computer.
By continuing to use this website, you agree to our cookies and privacy policy.
  
Home page Home page Home page Home page
Pixel
Pixel Header R1 C1 Pixel
Pixel Header R2 C1 Pixel
Pixel Header R3 C1 Pixel
Pixel

QTIPS - Runtime Version

Developers writing for distribution on Runtime versions may want to restrict use of certain routines to only those users possessing a full development version.

This sort of information is stored in a system variable called RUNTIME(). To check whether the version of AREV running currently is runtime just BITAND the variable with 2048. To maintain consistency with the AREV way of doing things to deny access to things on a runtime, use the same message RevTech use i.e.


0001    IF BITAND(RUNTIME(),2048) ELSE CALL MSG(140,'','','')

(Volume 3, Issue 1, Page 15)
Pixel
Pixel Footer R1 C1 Pixel
Pixel
Pixel
Pixel