MVSFORUMS.com

adarsh444 · Beginner Joined: 19 Sep 2006 Posts: 13 Topics: 9

I have to validate Customer and the code ranges entered by user on the map defined as an array.
WS-CUST-NAME(X(30)) occurs 20 times.
WS-FROM-CODE(X(04)) occurs 20 times.
WS-FROM-CODE(X(04)) occurs 20 times

Ex:Custname Fromcode - Tocode
HOLSON 0001 1000

Need to find the duplicates entered on map
a) No Duplicate customer and code are allowed.
i.e. If HOLSON 0010 - 0050 is entered on map elsewhere it should throw message 'Dup not allowed'. it would be gr8 if anyone can help me
in handling this logic.

Nic Clouston · Posted: Mon Mar 12, 2007 3:29 am Post subject:

What is wrong with:

semigeezer · Posted: Mon Mar 12, 2007 2:55 pm Post subject:

do j=i+1 to 20 - otherwise it will always fail when i=j

Nic Clouston · Posted: Tue Mar 13, 2007 3:51 am Post subject:

oh so true! Exclamation

_________________
Utility and Program control cards are NOT, repeat NOT, JCL.