Without meaning to bump into what might be off topic, SYSCALL is
actually a CLIST instruction - not a REXX one (unless it's a case of
"nous avons changé tout ça")
 
E.g.
HELP_SELECT: +
             SELECT (&ZCMD)
               WHEN (UP) DO
                 SET HPAN = &HPAN - 1
                 *SYSCALL* MAXV HPAN HELPTOP
                 ENDO
               WHEN (DOWN) DO
                 SET HPAN = &HPAN + 1
                 *SYSCALL* MINV HPAN HELPBOT
                 ENDO
               OTHERWISE
               ENDO HELP_SELECT
             ISPEXEC DISPLAY PANEL(HELPANL&HPAN)
             ENDO
<...>
/*-------------------------------------------------------------------*/
/* SUB-PROCEDURE MINV                                                */
/*-------------------------------------------------------------------*/
MINV: +
  PROC 0 +
    HPAN HELPBOT
  CONTROL END(ENDO)
  SYSREF +
    HPAN HELPBOT
  IF &STR(&HPAN) > &STR(&HELPBOT) THEN +
    SET HPAN = &HELPBOT
  ELSE
  RETURN
  ENDO MINV
/*-------------------------------------------------------------------*/
/* SUB-PROCEDURE MAXV                                                */
/*-------------------------------------------------------------------*/
MAXV: +
  PROC 0 +
    HPAN HELPTOP
  CONTROL END(ENDO)
  SYSREF +
    HPAN HELPTOP
  IF &STR(&HPAN) < &STR(&HELPTOP) THEN +
    SET HPAN = &HELPTOP
  ELSE
  RETURN
  ENDO MAXV
 
<etc.>

On 07/07/2022 19:01, Paul Gilmartin wrote:
> (This thread should move to comp.lang.advocacy.)
>
> On Thu, 7 Jul 2022 16:40:08 +0000, Farley, Peter x23353 wrote:
>
>> OK, I'll bite: What is BSF please?  I do know of PCRE (though I really do 
>> not like the Perl RE syntax, I prefer Posix/gawk RE syntax) but BSF is a new 
>> acronym to me.
>>
> I try to keep my skill set portable.  I avoid Bash-isms, {g|n}awk, ...  Now 
> that you say PCRE
> is different, my interest in it is diminished.
>
> It seems to me that many users of {g|n}awk learned a primitive awk lacking 
> many features
> such as tolowerr(), touppor(), the "in" operator, ... now assimilated in 
> POSIX awk.
>  

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to