Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Inserting Line Feed at the End
Message
From
07/02/2019 13:53:12
 
 
To
07/02/2019 13:47:02
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01666039
Message ID:
01666057
Views:
41
>>>>>At the end of Text Line, in the original one there is LF and in the replaced one there is CRLF. I exactly used what was suggested.
>>>>>If I copy and Paste from Elsewhere, I get LF at the end, but using the replace command I get CRLF
>>>>
>>>>
>>>>No way. Check attachments.
>>>
>>>Sir, Please Check The My original File attached. It can be opened in Notepad. (Not Regular Notepad that comes with windows)
>>>At Line No 23 the Text is to be replaced. This is not working here.
>>
>>What is your FULL code?
>
>Here is the code
>
>
>CPSFILEPATH=Alltrim(cFullpath) && Original file will be picked from Here
>NEWPATH=Alltrim(NEWPATH)  && New rewritten file will be Placed Here
>
>Create Cursor BILLCOMPRESS (POS C(254))  && Create Temporary Cursor Billcompress to Check Page Numbers
>Select BILLCOMPRESS
>Append From (m.CPSFILEPATH) Sdf && Appends in Standard Data Format
>*Count Number of Pages in PS File
>Locate For Alltrim(POS)='%%Page: 1 1'
>IF Found()
>Skip
>IF ALLTRIM(LEFT(POS,9))="<</Duplex"
>Replace POS With '<</Duplex false/PageSize  [595 842] /Tumble false /ManualFeed false /MediaPosition 0>>  setpagedevice'+ CHR(10)
>ENDIF
>ENDIF
>
>Set Textmerge On
>Set Textmerge To (m.NEWPATH) Noshow
>Scan
>\\<< TRIM(POS) >>
>\
>Endscan
>Set Textmerge To
>Set Textmerge Off
>
The issue is the second line inside the loop. When you use the "\" character, it puts CRLF into the file.

Tamar
Previous
Reply
Map
View

Click here to load this message in the networking platform