HP3000-L Archives

May 2019, 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:
Roy Brown <[log in to unmask]>
Reply To:
Roy Brown <[log in to unmask]>
Date:
Fri, 24 May 2019 21:47:39 +0100
Content-Type:
text/plain
Parts/Attachments:
text/plain (148 lines)
If you are sure ‘X’ isn’t being used as a variable, then
SETVAR X, !HPJOBNAME
and then use X instead of HPJOBNAME in the tests, which will save you 8
characters per line.

If that’s not enough to get you down below 255, then

SETVAR CHOSENJOB, “”

13     *IF HPJOBNAME="M06266" OR &
   14     *   HPJOBNAME="M03024" OR &
   15     *   HPJOBNAME="M10620" OR &
   16     *   HPJOBNAME="T94211" OR &
   17     *   HPJOBNAME="M12813" OR &
   18     *   HPJOBNAME="M11359" OR &
   19     *   HPJOBNAME="M17057" OR &
   20     *   HPJOBNAME="M14878" THEN
             *   SETVAR CHOSENJOB, “YES”
          *ENDIF

Repeat for lines 21-27, and as many more groups as you might want, and then

IF CHOSENJOB = “YES” THEN
   (payload)
ENDIF

might fit the bill.





On Fri, 24 May 2019 at 20:27, Keven Miller(3k) <[log in to unmask]> wrote:

> From the MPE commands reference manual, last published for MPE 6.5 E0300,
> http://www.3kranger.com/HP3000/mpeix/en-mpe65/32650-90877/ch02s02.html
>
> "Another difference between the NM parser and the CM parser is that the CM
> parser restricts a single command parameter value to be <=255 characters.
> On the NM side, the value is limited by the size of the CI's command
> buffer."
>
> Keven Miller
>
>
> ----- Original Message -----
> From: "Reggie Monroe" <[log in to unmask]>
> To: <[log in to unmask]>
> Sent: Fri 24 May 2019 12:08 PM
> Subject: Re: [HP3000-L] If statements
>
>
> Ok got it. Thank you.
>
> -----Original Message-----
> From: HP-3000 Systems Discussion <[log in to unmask]> On Behalf Of
> Johnson, Tracy
> Sent: Friday, May 24, 2019 12:00 PM
> To: [log in to unmask]
> Subject: Re: [HP3000-L] If statements
>
> Wild guess:
>
> A 256 characters per statement per line limit?
>
> Tracy Johnson
> +00 1 757 766-4318 tel
> +00 1 757 755-6470 mobile
> Hampton, Virginia, U.S.
> [log in to unmask]
>
> -----Original Message-----
> From: HP-3000 Systems Discussion <[log in to unmask]> On Behalf Of
> Reggie Monroe
> Sent: Friday, May 24, 2019 2:57 PM
> To: [log in to unmask]
> Subject: [HP3000-L] If statements
>
> The following message was sent from an external e-mail address. Be
> cautious
> when clicking on links, opening attachments or providing sensitive
> information.
>
> ________________________________
>
> Hello,
>
> We are using the below If statement. It appears that once we go over 9 If
> statement lines it no longer works. Is there some type of variable we can
> use instead? Thank you.
>
>
>
>
>    13     *IF HPJOBNAME="M06266" OR &
>    14     *   HPJOBNAME="M03024" OR &
>    15     *   HPJOBNAME="M10620" OR &
>    16     *   HPJOBNAME="T94211" OR &
>    17     *   HPJOBNAME="M12813" OR &
>    18     *   HPJOBNAME="M11359" OR &
>    19     *   HPJOBNAME="M17057" OR &
>    20     *   HPJOBNAME="M14878" OR &
>    21     *   HPJOBNAME="M51207" OR &
>    22     *   HPJOBNAME="M16298" OR &
>    23     *   HPJOBNAME="M18331" OR &
>    24     *   HPJOBNAME="M31912" OR &
>    25     *   HPJOBNAME="M51036" OR &
>    26     *   HPJOBNAME="M51631" OR &
>    27     *   HPJOBNAME="M13072"
>
>
> [external]
> Reginald C. Monroe Jr | Sr. Systems Administrator
> 555 W. Imperial Hwy. Brea, CA 92821
> (714) 671-6753<tel:%28714%29%20671-6753>-Direct  (714)
> 671-6541<tel:%28714%29%20671-6541>-Fax
>
> ________________________________
> This e-mail message, including any attachments, is for the sole use of the
> intended recipient, and may contain material that is privileged or
> confidential and legally protected from disclosure. If you are not the
> intended recipient or have received this message in error, you are not
> authorized to copy, distribute, or otherwise use this message or its
> attachments. Please notify the sender immediately by return e-mail and
> permanently delete this message and any attachments.
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit
>
> https://nam03.safelinks.protection.outlook.com/?url=http%3A%2F%2Fraven.utc.edu%2Farchives%2Fhp3000-l.html&amp;data=02%7C01%7CRMonroe%40MERCURYINSURANCE.COM%7C8a1dae3f451c4616155108d6e07a0f2a%7C0d8ef88be7e14f18b332ab564f6cda49%7C0%7C0%7C636943212185459075&amp;sdata=XCTHCvNcYm12DAs6V0y7K8wRw2M0I3kY0Yf0uNf8JBk%3D&amp;reserved=0
> *
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit
>
> https://nam03.safelinks.protection.outlook.com/?url=http%3A%2F%2Fraven.utc.edu%2Farchives%2Fhp3000-l.html&amp;data=02%7C01%7CRMonroe%40MERCURYINSURANCE.COM%7C8a1dae3f451c4616155108d6e07a0f2a%7C0d8ef88be7e14f18b332ab564f6cda49%7C0%7C0%7C636943212185459075&amp;sdata=XCTHCvNcYm12DAs6V0y7K8wRw2M0I3kY0Yf0uNf8JBk%3D&amp;reserved=0
> *
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>

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

ATOM RSS1 RSS2