Thanks Sir,
I tried the following code and it is working fine.

SELECT Dummy
set textmerge to Myfile.ps
scan
\<< tRIM(pS) >>
endscan
set textmerge to
set textmerge off

The code is Working fine and the file size is also small. Only one little problem. The First Line in the reprocessed output file is coming blank as compared to the original file Ps/text file where the PS code starts from the first line itself.

kindly help


>I can only give you a quick answer, I'm too bus with other work to really study this. As far as I can see, my code should work, but with one small change: strtofile(trim(dummy.ps),m.lcNewFile,.T.). You need to start the debugger and see what's going on.
>
>>Sir,
>>It is not working. I tried this
>>

>>Local lcFile, lcText
>>m.lcFile = [1021337392.ps]
>>Create Cursor Dummy (PS c(254), pos i,pageno n(2),recordnum i)
>>Append From (m.lcFile) Sdf && Creates a Cursor
>>
>>m.lcNewFile='1.ps'
>>Select dummy
>>Scan
>>   strtofile(dummy.ps,m.lcNewFile,.T.)
>>Endscan
>>

>>
>>The above creates a PS file with 1.PS name but it is not the file that is required.
>>(1) There is no text inside except data of Record Number 1
>>(2) The Size of 1.PS file has considereby increased althogh the initial file was of just 15-20 Kb.
>>
>>Kinldly Help
>>Sample PS can be Downloaded from
>>https://www.dropbox.com/s/6x5an3dyg8syvmx/1021337392.ps
>>
>>Regards
>>Harsh
>>
>>
>>
>>
>>>>Using the following code I am appending Text from a PS file in DatabAse file.
>>>>

>>>>Local lcFile, lcText
>>>>m.lcFile = [1021337392.ps]
>>>>Create Cursor Dummy (PS c(254), pos i,pageno n(2),recordnum i)
>>>>Append From (m.lcFile) Sdf
>>>>

>>>>
>>>>After processing the Data base File , I want again same PS file.
>>>>
>>>>Kinldy Guide, I tried but the could not get the same format for PS file as it was before.
>>>>
>>>>Sample PS can be Downloaded from
>>>>
>>>>https://www.dropbox.com/s/6x5an3dyg8syvmx/1021337392.ps
>>>>Regards
>>>>Harsh
>>>
>>>There are many ways, this is one of them.
>>>

Use dummy
>>>Scan
>>>   strtofile(dummy.ps,m.lcNewFile,.T.)
>>>Endscan