hexagon logo

CSV Reading Question - family of similar parts

Good morning all. I am having no luck finding this; how can i do this a little better?
All help is appreciated.

IF L2<>MYPART
skip to the next line and try it again
END IF

C1 =COMMENT/INPUT,NO,FULL SCREEN=NO,
Enter the LAST TWO digits of the
WindChill part number before the A
"(08 - 52)"
ASSIGN/MYPART=C1.INPUT
FPTR =FILE/OPEN,M:\...\g1c9034.csv,READ
DO/
L2 =FILE/READ_UPTO,FPTR,","
MARK =FILE/READ_UPTO,FPTR,","
WPN =FILE/READ_UPTO,FPTR,","
CDIM =FILE/READ_UPTO,FPTR,","
DDIM =FILE/READ_UPTO,FPTR,","
LHZ =FILE/READ_UPTO,FPTR,","
RHZ =FILE/READ_UPTO,FPTR,","
IF/MYPART==L2
FILE/CLOSE,FPTR,KEEP
GOTO/20
END_IF/
UNTIL/L2=="EOF"
20 =LABEL/
ASSIGN/CHOICE="You chose: Mark " + MARK + " P/N " + WPN
COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,
CHOICE
Parents Reply Children
No Data