HP3000-L Archives

July 2000, 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:
From:
David Burney <[log in to unmask]>
Reply To:
David Burney <[log in to unmask]>
Date:
Mon, 10 Jul 2000 12:38:58 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (56 lines)
Hi Chris.  I'm not certain there is a pause intrinsic
to be used in cobol.  If there is I'd like to know.
I always use the Command intrinsic with Pause as
the command to issue.  For example :

In ye old Working Storage I say :

01  CI-ERR                PIC S9(4) COMP VALUE 0.
01  CI-PARM               PIC S9(4) COMP VALUE 0.

01  CI-PAUSE.
    03  FILLER            PIC X(07) VALUE "PAUSE 1".
    03  FILLER            PIC X     VALUE %15.


And in the Procedure Division :


CALL INTRINSIC "COMMAND" USING CI-PAUSE CI-ERR CI-PARM.

As far as the Turbo Image Manual I use the one at :

http://docs.hp.com/cgi-bin/doc3k/B3039190009.12332/1

There may be a .pdf version out there that you can download
but I am uncertain as to it's whereabouts.

HTH

David

----------------------------------------------------------------------------
-------
David Burney                                          [log in to unmask]
Summit Racing Equipment                     http://www.summitracing.com
                        -----------
  Does the phrase "To be quite honest..." mean that the person has
               been less than honest before that point ?

                        -----------
      All opinions expressed herein are my own and reflect,
                  in no way, those of my employer.





On Monday, July 10, 2000 1:15 PM, gts  wrote:
: All,
:
: Can anyone give me the pause Intrinsic Syntax in Cobol, and does anyone
: know the easiest way to get a Turbo Image manual.  Thanks
:
: Chris Miller
: Genesis Total Solutions, Inc.

ATOM RSS1 RSS2