Date:         Wed, 28 Jun 2006 16:20:13 -0400
Reply-To:     Venky Chakravarthy <swovcc@HOTMAIL.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Venky Chakravarthy <swovcc@HOTMAIL.COM>
Subject:      Re: AN URGENT - XPT TO SAS DATASET WITH MACRO - MORE DETAIL
Comments: To: Md Alam <mehedisas@YAHOO.COM>

FIRST specify the correct path. I had mine in there and you have run the
code as is. In case it is not obvious

change

>13 "libname Tmp1 XPORT '\\client\c$\junk\"||trim(fname)||"';" ||

to

"libname Tmp1 XPORT 'd:\3074P308\"||trim(fname)||"';" ||

Venky Chakravarthy

On Wed, 28 Jun 2006 16:11:14 -0400, Rathindronath <mehedisas@YAHOO.COM>
wrote:

>RUNNING YOUR CODE i GOT THIS ERROR:
>
>NOTE: Copyright (c) 2002-2003 by SAS Institute Inc., Cary, NC, USA.
>NOTE: SAS (r) 9.1 (TS1M3)
>Licensed to WYETH, Site 0011279001.
>NOTE: This session is executing on the WIN_PRO platform.
>
>
>NOTE: SAS initialization used:
>real time 9.56 seconds
>cpu time 0.54 seconds
>ERROR: Expecting page 1, got page -1 instead.
>ERROR: Page validation error while reading SASUSER.PROFILE.CATALOG.
>NOTE: Unable to open SASUSER.PROFILE. WORK.PROFILE will be opened instead.
>NOTE: All profile changes will be lost at the end of the session.
>1 proc copy in=TMP1 out=WORK;
>2 run;
>NOTE: Input library TMP1 is sequential.
>NOTE: Copying TMP1.AACULT to WORK.AACULT (memtype=DATA).
>NOTE: BUFSIZE is not cloned when copying across different engines.
>System Option for BUFSIZE was used.
>NOTE: There were 6591 observations read from the data set TMP1.AACULT.
>NOTE: The data set WORK.AACULT has 6591 observations and 51 variables.
>NOTE: PROCEDURE COPY used (Total process time):
>real time 3.26 seconds
>cpu time 0.11 seconds
>
>3 filename getxpt pipe "dir 'd:\3074P308\*.xpt" ;
>4 libname xptfile 'C:\xptfol';
>NOTE: Libref XPTFILE was successfully assigned as follows:
>Engine: V9
>Physical Name: C:\xptfol
>5
>6 data _null_ ;
>7 length fname $30 ;
>8 infile getxpt ;
>9 input ;
>10 fname = scan(_infile_,-1," ") ;
>11 if scan(fname,-1,".") = "xpt" ;
>12 call execute (
>13 "libname Tmp1 XPORT '\\client\c$\junk\"||trim(fname)||"';" ||
>14 " proc copy in = Tmp1 out = out=xptfile ; run ; " ) ;
>15 run ;
>NOTE: The infile GETXPT is:
>Unnamed Pipe Access Device,
>PROCESS=dir 'd:\3074P308\*.xpt,RECFM=V,
>LRECL=256
>Stderr output:
>The filename, directory name, or volume label syntax is incorrect.
>NOTE: 0 records were read from the infile GETXPT.
>NOTE: DATA statement used (Total process time):
>real time 0.29 seconds
>cpu time 0.01 seconds