HP3000-L Archives

December 2003, Week 2

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: HPEXTIN - how does it work?
From:
"Emerson, Tom" <[log in to unmask]>
Reply To:
Emerson, Tom
Date:
Thu, 11 Dec 2003 11:12:58 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (24 lines) 
> -----Original Message-----
> From: Walter Murray [mailto:[log in to unmask]]
> 
> Peter Smithson asked about calling HPEXTIN, in the context 
> of needing to call the PAUSE intrinsic from COBOL.[...]
> When I was in the Response Center, we were frequently asked 
> how to call PAUSE from COBOL ... didn't like the sample code 
> fragments we had ... wrote an Engineering Note [as the]
> definitive solution to the problem.

Hmmm... just being "nitpicky", but has it existed all this time with this typo/bug in it?
[...]
> RESOLUTION TEXT
[...]
> (floating-point) format.  In this sample, the .LOC. 
> pseudo-intrinsic is used to capture the length of the field
[...]
>      CALL INTRINSIC ".LEN." USING PAUSE-SECONDS GIVING STRINGLEN.

(obviously, .LEN. is the correct pseudo-intrinsic, not .LOC.)

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

ATOM RSS1 RSS2