gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [open-cobol-list] Re : CALL SYSTEM OR CALL "SYSTEM"


From: Roger While
Subject: Re: [open-cobol-list] Re : CALL SYSTEM OR CALL "SYSTEM"
Date: Thu, 08 Feb 2007 15:22:33 +0100

No, you misunderstand. they are just flagged by the compiler.
They are allowed when specifying the "-std=" with other than
default, cobol85,cobol2002)

In other words, if you have a prog that passes other then 01
params, then a default compile or a compile with
-std=cobol85 or -std=cobol2002 will produce the
appropiate warning/error - per Cobol standard.

ie: NOTHING is disabled. It is checked if this is allowed.

Roger

Just a comment on the 01 versus 0x comment.
I have many COBOL applications which do pass parameters on a CALL which
are not 01 and to disable this would cause me a lot of problems.

Cheers
Ron Norman


-----Original Message-----
From: address@hidden
[mailto:address@hidden On Behalf Of
Roger While
Sent: February 8, 2007 8:44 AM
To: address@hidden
Cc: address@hidden
Subject: [open-cobol-list] Re : CALL SYSTEM OR CALL "SYSTEM"

Alain,
That's just luck.
Consider -
01  xxx.
       03  mycmd pic x(2) value "ls".
       03 rubbish  pic x(7) value "rubbish".

CALL "system" USING mycmd.

Normally, one passes 01 levels to CALL's
(and in fact if this is not so will get flagged
  at compile time with default,cobol85,cobol2002 options)
(OC 0.33)
A 01 level is (implicitely) specifically generated at an assembler
computer boundary. There is no standard that says that
bytes following this (to the next data definition) have to
have the value NULL.

Therefore, always use CALL "SYSTEM" or
you REALLY know what you are doing :-)
(ie. you pass a null terminated string)

Roger



------------------------------------------------------------------------
-
Using Tomcat but need to do more? Need to support web services,
security?
Get stuff done quickly with pre-integrated technology to make your job
easier.
Download IBM WebSphere Application Server v.1.0.1 based on Apache
Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
open-cobol-list mailing list
address@hidden
https://lists.sourceforge.net/lists/listinfo/open-cobol-list





reply via email to

[Prev in Thread] Current Thread [Next in Thread]