> >DECLARE INTEGER CreateDirectory IN kernel32; >STRING lpPathName, STRING @lpSecurityAttr > >sDirectory='D:\Data\Files' >OriginalFile=E:\Data\123.pcl >OriginalFile=E:\Data\456.pcl > > >SET DEFAULT TO (sDirectory) >CreateDirectory(JUSTSTEM(OriginalFile),0) && Does Not Create any Directory with the Required FileName >cDIR=JUSTSTEM(OriginalFile) >CreateDirectory('&cDIR',0) && && Does Not Create any Directory with the Required FileName >CreateDirectory('cDIR',0) && Gives Creates a Directory with Name cDIR and Not in the Name of The File >CreateDirectory(&cDIR,0) && Gives Error Data Type Mismatch >CreateDirectory(cDIR,0) Does Not Create any Directory with the Required FileName >>