Date:         Wed, 9 Jul 2003 08:37:25 -0400
Reply-To:     "Fehd, Ronald J. (PHPPO)" <rjf2@CDC.GOV>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         "Fehd, Ronald J. (PHPPO)" <rjf2@CDC.GOV>
Subject:      Re: Cut a part out of a big flat fixed length text file
Comments: cc: PD <sophe88@YAHOO.COM>
Content-Type: text/plain

> From: PD [mailto:sophe88@YAHOO.COM]
> Below is the code I sumbit to my Os/390 sas 8.1 today.
>
> '   DATA CNTLIN /VIEW=CNTLIN;
>  RETAIN FMTNAME 'SEARCH' TYPE 'C' LABEL '+';
>  DO UNTIL ( EOF ); SET TWO(RENAME=(HIN=START));
>  OUTPUT; END; HLO='O'; LABEL='-'; OUTPUT; STOP; RUN;
>  PROC FORMAT CNTLIN=CNTLIN; RUN;
>  DATA _NULL_; FILE CIA; INFILE INPT;
>       INPUT @16 KEY $CHAR15. @;
>       IF PUT (HIN, SEARCH.) = '+' THEN PUT _INFILE_; RUN;   '
>
> where Hin is a 15 byte character and key is 15 byte on the infile.
>
> I ran into two problems.
> 1. SAS said variable EOF not initialized.

EOF is the name of a SAS Supervisor variable;
it is the object of the subverb end
which is (one of the) set statement primary options;

DO UNTIL ( EOF );
SET TWO(RENAME=(HIN=START))
        end   = EOF;

Ron Fehd  the EndoFile maven  CDC Atlanta GA USA RJF2@cdc.gov