HP3000-L Archives

August 2003, Week 1

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Re: PRINT intrinsic condition code value
From:
Peter Smithson <[log in to unmask]>
Reply To:
Peter Smithson <[log in to unmask]>
Date:
Mon, 4 Aug 2003 11:47:13 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (18 lines) 
 In article <[log in to unmask]>,
[log in to unmask] says...
> In COBOL the condition code is tested by comparing it to zero. It can be
>
>     < zero     CCL    ccode() returns 1
>
>     > zero     CCG    ccode() returns 0
>
>     = zero     CCE    ccode() returns 2

OK I'll use that rule - thanks for that.

--
http://www.beluga.freeserve.co.uk

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2