MVSFORUMS.com

moulisea · Beginner Joined: 18 Nov 2007 Posts: 9 Topics: 3

can we comapre an index to a numeric value
eg:
a is a index
can i compare
if (a=1)

is it right?

vivek1983 · Intermediate Joined: 20 Apr 2006 Posts: 222 Topics: 24

moulisea,

Are u referring to internal table index?

If yes, then yes... you can compare the index with numeric field.
Find below an example:

moulisea · Beginner Joined: 18 Nov 2007 Posts: 9 Topics: 3

CAN WE define a index like below:

05 ws-sub usage is index

warp5 · Posted: Fri Nov 23, 2007 1:57 am Post subject:

Yes, the compiler will take care of your compare. Why don't you try it out?

moulisea · Beginner Joined: 18 Nov 2007 Posts: 9 Topics: 3

how do we initialize an index.
i used

initialize ws-var-a

where ws-var-a is an index.

it didnt work.

Sreejith · Posted: Fri Nov 23, 2007 9:35 am Post subject:

SET ws-var-a to 1

Or If you want to set it to zero

SET ws-var-a to WS-ZERO where WS-ZERO is defined as PIC 9 VALUE ZERO

Terry_Heinze · Posted: Fri Nov 23, 2007 3:17 pm Post subject:

moulisea,
You are asking very basic questions that are easily looked up in the COBOL Language Reference Manual.
_________________
....Terry