× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: command choice exit programs
  • From: Don Schenck <schencd%AM_LZCH%VASELL@xxxxxxxxxxxxxx>
  • Date: Thu, 10 Sep 1998 03:51:55 -0400
  • Autoforwarded: false
  • Disclose-recipients: prohibited
  • Hop-count: 2
  • Importance: normal
  • In-reply-to: <77D2348AC1AED11199FE00805FBB6DBE0F0BBD@WV_EXCH>
  • MR-Received: by mta TIMONE.MUAS; Relayed; Thu, 10 Sep 1998 03:51:55 -0400
  • MR-Received: by mta VASELL; Relayed; Thu, 10 Sep 1998 08:48:41 -0400
  • MR-Received: by mta MPMV04; Relayed; Thu, 10 Sep 1998 08:49:14 -0400
  • Sensitivity: Company-Confidential
  • UA-content-id: 11C952333700
  • X400-MTS-identifier: [;9255510810091998/A13665/TIMONE]

:::Does anyone have a simple command choice exit program that they wouldn't
:::mind sharing (send privately)? (command PARM CHOICE(*PGM)
:::CHOICEPGM(program)) The CL manual doesn't have a sample program. What I
:::want to do is prompt for a list of members in a file. Where I'm confused
:::is that:
:::1) The first parameter has a C or P in position 21. What controls this?
:::I'd assume that I want to return a list, so I would use the 2000-length
:::field.
:::2) In CL, how do I get a parameter that might be two different lengths?
:::


Loyd --

About five years ago, I wrote a terrifice *CHOICE program in CL; it was
published in Midrange Computing.

The beauty of my program was that it was well parameterized. That is, you could
easily go through and change about five lines and re-use the code.

I even created a version for the old DOS version of flex/EDIT that prompted you
and filled in the code. Slick.

Lemme look around and see if I can find it. When I do, I'll post it to my web
page and let you know.

Peace,

-- Don Schenck, Schenck Technical Consulting
www.SchenckTech.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.