Hi ,
digging in my code finds:
...
005 WORK-TABLE    PIC X(18) OCCURS 5.
...


IF WORK-TABLE(2)(2:1) > " " Then ....

Hope this helps

Pete



--
Pete Vickers - HP3000 Select Systems Integrator
Phone: (44) 1204 657497
Fax:      (44) 1204 450927
Mobile: (44) 7860 907493
www.petevick.demon.co.uk

"Kim Borgman" <[log in to unmask]> wrote in message
news:93cuf401dm3@enews1.newsguy.com...
> Here is a good one for someone.
>
> Using cobol to generate a rpt.  Want to test the 11th item in an array.
> (occurs 42 times).
>
> But I want to test the 3rd character of that field to see if it is numeric
> or not.  Normally I would do:  FIELD(3:1), but I have to look at the array
> now.
>
> I tried FIELD(11)(3:1).  Error.
> also tried FIELD(11),(3:1).  Error.
>
> Any advice out there ?
>
> Yes I can move it to a working storage area and test it there, but I
should
> be able to do it with one command.
>
> Mr Kim Borgman - IS Mgr
> NWS Corp
> 317-636-6092 x1399
>