Read data out of a text file

I have a file named OPER.txt. It has an operation number in it. I would like my PCDMIS program to open this file and read the number inside, and assign the variable “operation” to this value. Could someone post some code that would accomplish this.

Thank you.

Parents

AndersI over 5 years ago

Why complicate things with a Basic script - this can easily be done with file operations in plain PC-DMIS:

            ASSIGN/OPERATION=0
FPTR       =FILE/OPEN,"c:\temp\opnr.txt",READ
V1         =FILE/READLINE,FPTR,{OPERATION}
            FILE/CLOSE,FPTR,KEEP
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            OPERATION

Reply

AndersI over 5 years ago

Why complicate things with a Basic script - this can easily be done with file operations in plain PC-DMIS:

            ASSIGN/OPERATION=0
FPTR       =FILE/OPEN,"c:\temp\opnr.txt",READ
V1         =FILE/READLINE,FPTR,{OPERATION}
            FILE/CLOSE,FPTR,KEEP
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
            OPERATION

Children

Marken199 over 5 years ago in reply to AndersI

Thank you Anders. That worked perfect.
Thanks to all for help
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
Kp61dude! over 5 years ago in reply to AndersI

K.I.S.S. - Keep It Simple Stupid
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel