HP3000-L Archives

July 1998, Week 4

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:
"Confield, John J" <[log in to unmask]>
Reply To:
Confield, John J
Date:
Fri, 24 Jul 1998 16:02:38 +0100
Content-Type:
text/plain
Parts/Attachments:
text/plain (46 lines)
Will,

I think what you are trying to do is

SW0 ON IS SORT-BY-SUBJECT

then do your 'IF' statement.

Hope this helps.
John.


John Confield
EDS Energy Upstream,  Aberdeen
* [log in to unmask]
(  01224 422415
Fax: 01224 312015
http://www.eds.com


>----------
>From:  Will Townsley[SMTP:[log in to unmask]]
>Sent:  24 July 1998 15:26
>To:    [log in to unmask]
>Subject:       Cobol Switch - Help
>
>I am trying to use a cobol switch (what is called an UPSI switch in IBM)
>for the first time on HP and must be doing something incorrectly. I
>have entered the following under special names:
>
>SW0 IS SORT-SWITCH ON IS SORT-BY-SUBJECT
>
>In the program logic, the following is coded:
>
>IF  SORT-BY-SUBJECT
>    (DO THE SORT BY SUBJECT)
>ELSE
>    (DO THE SORT ANOTHER WAY).
>
>In the run statement is the following:
>
>RUN WRT001O.SMC.COLLEGE;PARM=%1000000
>
>Can you see anything wrong here?
>

ATOM RSS1 RSS2