Thanks worked

> On Jul 7, 2016, at 8:23 AM, Tom Conley <pinnc...@rochester.rr.com> wrote:
> 
>> On 7/7/2016 8:14 AM, Joe Reichman wrote:
>> So let me post the code
>> 
>> SET &SYSSCAN = 2
>> SET LINE = &NRSTR(&&SYSOUTLINE1)
>> SET &SYSSCAN = 16
>> SET LINE1 = &STR(&LINE)
>> SET KEYWORD = &SUBSTR(50:54,&LINE1)
>> IF &KEYWORD = OPEN    /* HERE IS WHERE THE ERROR OCCURS IF KEYWORD IS '*' */
> 
> IF &STR(&KEYWORD) = OPEN
> 
> Regards,
> Tom Conley
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
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