PxPlus User Forum

Twitter Twitter Twitter

Author Topic: Reverse Engineer Print @  (Read 815 times)

Jeffrey Ferreira

  • Diamond Member
  • *****
  • Posts: 175
  • I must have taken a wrong turn at Albuquerque.
    • View Profile
Reverse Engineer Print @
« on: May 13, 2021, 12:00:46 PM »
Hello All
If I have a text file that contains print @ like this

->print@(0),"Jeff",@(20),"PxPlus",@(50),"Canada"
Jeff                PxPlus                        Canada

I want to convert the string containing the print @ to the nicely formatted with spaces...
is there a way to do that.

Jeff



Mike King

  • Diamond Member
  • *****
  • Posts: 3810
  • Mike King
    • View Profile
    • BBSysco Consulting
Re: Reverse Engineer Print @
« Reply #1 on: May 13, 2021, 12:08:44 PM »
Print to a memory file then read it back.

->open (1) "*memory*"
->print (1) @(0),"Jeff",@(20),"PxPlus",@(50),"Canada"
->read record (1,ind=0) R$
->print r$
Jeff                PxPlus                        Canada
->print hta(R$)
4A656666202020202020202020202020202020205078506C757320202020202020202020202020202020202020202020202043616E616461
Mike King
President - BBSysco Consulting
eMail: mike.king@bbsysco.com

Jeffrey Ferreira

  • Diamond Member
  • *****
  • Posts: 175
  • I must have taken a wrong turn at Albuquerque.
    • View Profile
Re: Reverse Engineer Print @
« Reply #2 on: May 13, 2021, 12:11:22 PM »
thank you Mike / that is perfect...