CALL "C$VERSION" USING version  | 
version  | PIC X(n)  | After this routine has been called this data item contains the isCOBOL version framework.  | 
ACCEPT version FROM ENVIRONMENT "runtime.version"  | 
*> define str1 as pic x(n) call "c$version" using str1 *> the value of str1 will be like: isCOBOL release 2019 R1 build#977.10-20190516-27629  |