HP3000-L Archives

May 2002, 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:
From:
Lars Appel <[log in to unmask]>
Reply To:
Lars Appel <[log in to unmask]>
Date:
Sun, 5 May 2002 14:18:45 +0200
Content-Type:
text/plain
Parts/Attachments:
text/plain (41 lines)
Mary wrote (in part)...

>>   I am  using following in COBOL code
>>     call intrinsic "FOPEN"
>>          WS-FILENAME
>>          %30105 %2300
>>          WS-SOME-FILE-POINTER.
>>
>>     call instrinsic "FWRITE" ...
>>
>>  I am facing some error at execution time.

You should also check the condition code after each intrinsic
call to make sure that you don't continue e.g. after the file
has not beeen opened for some reason.

As far as I recall, you declare a name for CONDITION-CODE in
the SPECIAL-NAMES section and then use IF statements to check
if (directly) after each intrinsic call.


Ken mentioned...

>In case nobody has mentioned this, all the manuals are available at
>http://docs.hp.com/mpeix/all/index.html

I believe, the older version of the web pages (plain HTML and GIF,
no fancy JavaScript and frames gimmicks and thus frequently much
faster to browse) are still available at...

 http://docs.hp.com/mpeix/docs5/

You just need to keep in mind that some of the manuals on that URL
might not be the latest version. But thanks to the forward compatibility
of MPE/iX the older manual versions can still be useful at times ;-)

Lars.

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

ATOM RSS1 RSS2