Init code :
#INCLUDE "INCLUDE\APPINCL.H"
LOCAL loDataEnvironment, ;
loAskForm
IF TYPE('vp_EmbNum') == "U"
PUBLIC vp_EmbNum, ;
vp_Artnr
loAskForm = CREATEOBJECT("EmblistForm")
loAskForm.Show()
IF !TYPE('loAskForm.uRetVal') == 'L'
vp_EmbNum = loAskForm.uRetVal
vp_Artnr = loAskForm.uRetVal2
ELSE
lni = 1
RELEASE vp_EmbNum, vp_Artnr
RETURN .F.
ENDIF
ENDIF
loDataEnvironment = CREATEOBJECT("EmblistEnvironment")
IF RECC() < 1
=MessageBox(NORAPPRESULT_LOC, MB_OK + MB_ICONINFORMATION, APPNAME_LOC)
lni = 1
RELEASE vp_EmbNum, vp_Artnr
RETURN .F.
ENDIF
BeforeOpenTables:
SET DATE ANSI
SET TALK OFF
SET DELETED ON
SET HOURS TO 24
Destroy:
IF plMoreCopies = .F.
RELEASE vp_EmbNum, vp_Artnr
ENDIF
You have the report files in your mail.
As i mentioned earlier I have 12 other report out of 17 with the same symptom, and all these reports have been with me since VFP3 thru 5,6,7,8 and now 9. What I have been doing is running a utility I have downloaded somewhere to remove the printer settings from the frx file (clear_frx_tag.prg) before final compilation of exe. Except for that I have only done normal editing from inside VFP.
/Torgny
>OK, I've checked this out. As I thought, this is problem of binary characters in the data.
>
>Torgny, there is a character that looks like this in your XML (UTF 5 I think):
>
>
> <fontface></fontface>
>
>
>It's in your DataEnvironment record (recno 45 in the FRX, objtype 25).
>
>When I remove this character from the XML, the HTML generation process works fine (accented characters and all). There's nothing wrong with the XSLT, IOW.
>
>Any idea how that character got there? If you have manually adjusted the report, then it is your responsibility not to do this <g>.
>
>If you have not done this, however, we need to figure out what put it there.
>
>When I edit the DE in a report, whether in 7, 8, or 9, the result is EMPTY(fontface) for this record, not a CHR(5). Do you have anything you can tell me about how you created this report that explains this?
>
>FWIW the Tag information for that record does not look correct either. Below is the total contents (it looks like it leaves off mid-way in the Init method, notice no ENDIF).
>
>I don't think *this* is an encoding issue (we encode the text properly, for example if you use < or > in your DE code you will see these characters as entity references in the resulting XML).
>
>Can you let me know if this is actually what you have in your DE (it shouldn't be related, but perhaps it is)?
>
>
>PROCEDURE Destroy
>IF plMoreCopies = .F.
> RELEASE vp_EmbNum, vp_Artnr
>ENDIF
>
>ENDPROC
>PROCEDURE Init
>#INCLUDE "INCLUDE\APPINCL.H"
>
>LOCAL loDataEnvironment, ;
> loAskForm
>
>IF TYPE('vp_EmbNum') == "U"
>
> PUBLIC vp_EmbNum, ;
>
>
>>L<
/Torgny