Error on Call Intrinsic 1

[Guest_imported]

Dear Sir,
I have hard copy of Cobol source code for hotel front office dept. Right now this program is running on HP 3000 server. I wish to run this program on PC base server under Ms dos or windows. I have tried to compile this source code with Accucorp. V3 compiler. An error massage showing on:
CALL INTRINSIC “ HPPRIVLOAD” USING DATA-TABLE.
CALL INTRINSIC “HPSETA” USING TER-NUM.
CALL INTRINSIC “CONVARABIC” USING SEL-OPTN, \1\.
Could you help me to solve this problem?
Best regards,
Eng. Nazir

 

[Crox]

Hi,

If you leave the INTRINSIC word out, doesn't it do something? It seems something like a call handler. It is not usual.

Also the /1/ is strange. It should be inside a variable.

 

[BettyScherber]

On the HP 3000, INTRINSIC calls are calls to operating system functions. You will not be able to translate these per se to specific PC functions, but you can look them up and see if there is a system call in your PC COBOL that will do something similar or you can write a subroutine yourself to fulfill this purpose. If you're really lucky, they might even be doing something that has to be done on the HP 3000, but never needs to be done on a PC.

By the way, Crox, the /1/ is valid syntax for this type of CALL on the HP 3000. It has to do with the way the argument is passed to the sub-routine from COBOL. Betty Scherber
Brainbench MVP for COBOL II

http://www.brainbench.com