Date:         Fri, 19 Mar 2004 13:58:16 -0500
Reply-To:     DAVID NEYLON <DNEYLON@SALLIEMAE.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         DAVID NEYLON <DNEYLON@SALLIEMAE.COM>
Subject:      Re: Problems with code
Content-Type: text/plain; charset=US-ASCII

This is the log from a revision that also prints _infile_

VOLSER------------DV3025     DEVTYPE------X'3010200F'         
        VOLSER------------DV3025     DEVTYPE------X'3010200F' 
THIS IS THE RECTYPE AFTER SUBSTR EXTRACT: VOLSER ******       
THIS IS THE RECTYPE AFTER OTHERWISE FALL THRU VOLSER          
CLUSTER ------- UHDWN0.EXTRACT.MEDIUM                         
0CLUSTER ------- UHDWN0.EXTRACT.MEDIUM                        
THIS IS THE RECTYPE AFTER SUBSTR EXTRACT: CLUSTER ******      
THE IF STATEMENT FOUND CLUSTER                                
CLUSTER WHEN LOGIC ****                                       

catdata is put
_infile_ is put
the field "rectype" is put after the extract and appears to contain "VOLSER"
if rectype = 'VOLSER' is not true
when ('VOLSER') is not true
no if or when is triggered until the otherwise which put's a message with "rectype".
....  next record ...
catdata is put
_infile_ is put
the field "rectype" is put after the extract and appears to contain "CLUSTER"
if rectype = 'CLUSTER' is true and the put is done
when ('CLUSTER') is true and the put is done
.....

I can't understand why 'VOLSER' appears to be in rectype yet
if rectype = 'VOLSER' is false, and when('VOLSER') is false...

???


David Neylon
Information Security
RACF Technical Support
x0269