"Peter Smithson" <[log in to unmask]> wrote in message news:MPG.19986d14d7e54b35989778@news.cis.dfn.de... > Hi, > > I'm an MPE novice. (warning!) > > The HP documentation for the PRINT intrinsic is very clear, a condition > code of 2 (CCE) is for success and a simple C test program I wrote > confirms this. > > Yet, I have some 'real' COBOL code that does things like this - > > SPECIAL-NAMES. > CONDITION-CODE IS C > .... > CALL INTRINSIC "PRINT" USING PTEXT PLENGTH CCODE. > IF CC NOT = 0 > DISPLAY "INTRINSIC 'PRINT' HAS FAILED > > Any idea why that is? I've tried it out in COBOL with a little test > program and sure enough, PRINT is returning 0 into "CC" and it's > working. > > So what's happening? Does the COBOL interface re-define "2" to be "0" ? > What else does it do? > > Thanks. > > Peter Hi Peter, Condition codes return 3 possible values CCL Less that zero CCE Equal to zero CCG Greater than zero I don't know what the (2), (0), (1) are meant to denote. Perhaps someone more knowledgeable than me will be able to enlighten us. Regards -- Mark Undrill Affirm Limited * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *