Number values contains letter Z.

KB-20230622-01

Version

XFRX 22.4

Symptoms

Some numbers contains letter a Z in all outputs.

Cause

Text field has source of data type number
Seted to "Character" on Format page of text file properties
After changing to "Numeric" is sets "Blank if zero" too

In the case VFP store format mask to PICTURE column in the format "@Z 9....".

Workaround

Set data type to numeric in report designer

Hook object for fixing bug in XFRX#INIT

loSession=EVALUATE([xfrx("XFRX#INIT")])

loHook=CREATEOBJECT("xfrxhook")
BINDEVENT(loSession, "setReportParams", loHook, "setReportParams")
loSession.ProcessReport(lcPath+"test2.frx")
UNBINDEVENTS(loSession)

DEFINE CLASS xfrxhook AS custom
   PROCEDURE setReportParams
      LPARAMETERS loo
      LOCAL m.liSele
      m.liSele=SELECT()
      SELECT UR_REPORT
      REPLACE FILLCHAR WITH "N", PICTURE WITH STRTRAN(PICTURE, "@ Z ", "@Z ") FOR OBJTYPE=8 AND FILLCHAR="C" AND ATC("@ Z ", PICTURE)>0
      SELECT (m.liSele)
      RETURN
   ENDPROC
ENDDEFINE

Fix report

USE "somereport.frx"
REPLACE FILLCHAR WITH "N" FOR OBJTYPE=8 AND FILLCHAR="C" AND ATC("@Z ", PICTURE)>0
USE