Hi Roy:
Look at the folowing UDC. IF I invoke it with an existing file then I
get no echo, as I want If I invoke it with an non-existing file then I
get two lines on the screen but I need only the JCW setting withot echo.
How can I suppress these two lines?
 :help exists
 USER DEFINED COMMAND
 exists file,jc=exists
 option nolist,help
 setjcw cierror=0
 continue
 listf !file;$null
 if cierror=907 then
    setjcw !jc=0
 els
    setjcw !jc=1
 endi


 :exists nonexfil
 LISTF NONEXFIL;$NULL
 NON-EXISTENT FILE.  (CIERR 907)

 :exists userproc

                TIA
                                              Frank

  |\  /~ ~~|~~~ Family : NAGY; first name : FERENC; title : Ph. D.
  | \ |   -+-   Institute of Isotopes of the Hungarian Academy of Sciences
  |  \|    |    1121 BUDAPEST Konkoly-Thege M. ut 29, HUNGARY (1525 Bp. POB 77)
`-'   '  `-'    E-mail : [log in to unmask]

Fax: (36)-1-395-9002, work phone: (36)-1-395-9123, home phone: (36)-1-277-4229.
            ^NEW!                        ^NEW!
Home address: H-1214 BUDAPEST Raketa u. 29. I. 3.

There are 3 kinds of programming errors:  syntactical, semantical and mystical.
The programmers have to suck up the users just as much as absolutely necessary.