Focal Point
copy right symbol into an excel report

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/7331094313

January 12, 2009, 06:48 AM
pk
copy right symbol into an excel report
hi all,

am currently working under webfocus max. mre environment.

the current problem which am facing is ... i need display the copyright symbol in footer section.

the code which am using currently is


define file car
crt/a20=' symbol';
crt/a20=ctran(20,crt,32,169,crt);
end
table file car
print
model
footing
"on table pchold format exl2k
end

but when i run the above code . the copyright symbol is interpreted as '?' into the excel report.

when the same code is run under enterprise environment it works fine...

what could be the reason for this?
any solution to get copy right symbol?

thanks in advance


714
January 12, 2009, 07:21 AM
pk
sorry for entering wrong code....
its

DEFINE FILE CAR
crt/a20=' symbol';

FOOT1/A20=CTRAN(20,crt,32,0169,FOOT1);
END

TABLE FILE CAR
PRINT
MODEL
FOOTING
"ON TABLE PCHOLD FORMAT EXL2K
END


714
January 12, 2009, 07:35 AM
<JG>
You need to post code containing HTML between code tags for it to display correctly

 DEFINE FILE CAR
FOOT1/A20=CTRAN(1,' ',32,0169,FOOT1);
END
TABLE FILE CAR
PRINT
MODEL
FOOTING
"<FOOT1"
ON TABLE PCHOLD FORMAT EXL2K
END
 

January 12, 2009, 07:43 AM
pk
hi jg,

to be very frank am pretty much new to webfocus
could you plese give an example for it. Confused


714
January 12, 2009, 08:08 AM
<JG>
pk The code I posted does what you want

to post something within the code tags click on the
 </> 
button when creating or replying to a post
January 12, 2009, 08:12 AM
FrankDutch
PK

When you type your question you can see an underlined text "options" click on it and see what happens, play with it to see the difference

On top of the input box you see a few buttons.
click on it and see what happens....

You can add smiles Good One Music or change the color this is red add an URL my photos
Or an image (don't!!) and also put your text between < / > these things.
If you do you get
[code]
text between code looks different

[/code]

have a nice day... Smiler




Frank

prod: WF 7.6.10 platform Windows,
databases: msSQL2000, msSQL2005, RMS, Oracle, Sybase,IE7
test: WF 7.6.10 on the same platform and databases,IE7

January 12, 2009, 11:54 PM
pk
oops..... sorry ...
thanks for the info
here is the code which i use

 DEFINE FILE CAR
FOOT1/A20=CTRAN(1,' ',32,0169,FOOT1);
END
TABLE FILE CAR
PRINT
MODEL
FOOTING
"<FOOT1"
ON TABLE PCHOLD FORMAT EXL2K
END



714
January 13, 2009, 02:12 AM
Tony A
which is exactly the code that JG gave you, which works as expected, so what's the problem?

T



In FOCUS
since 1986
WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2  
WebFOCUS App Studio 8.2.06 standalone on Windows 10 
January 13, 2009, 04:04 AM
pk
i used the code specified by jg but even then am not able to get the copyright symbol.

Is their anything to be done with setting or is it due to the MAX environment that am using?


714
January 13, 2009, 04:35 AM
Tony A
Well it works fine in the environment I am using so your supposition may be correct.

T
January 13, 2009, 08:51 AM
CLH
We had the same issue in our environment and had to play with the code page settings on both the client and the reporting server. We set it to 137 on the client and then 1252 on the reporting server.


Webfocus 8.0.7 on Windows
January 13, 2009, 09:05 AM
<JG>
I would think that the issue is one of differences in the code pages being used in the
different environments components
January 13, 2009, 04:28 PM
Waz
As you signature says you are in bangalore, Codepage would be the first check.

You may be able to use a different font

Change the font and see what you get.
DEFINE FILE SYSCOLUM
 CNTR/I9 WITH NAME = IF LAST CNTR EQ 0 THEN 32 ELSE LAST CNTR + 1 ;
 Cntr/I9 WITH NAME = CNTR - 32 ;
 Col/I9  WITH NAME = (Cntr / 30) + 1 ;
 Row/I9  WITH NAME = IMOD(Cntr, 30, 'I9') ;
END
TABLE FILE SYSCOLUM
   SUM CNTR 
       COMPUTE
       CHAR/A1 = HEXBYT(CNTR, 'A1') ;
ACROSS Col	NOPRINT
BY Row		NOPRINT
WHERE RECORDLIMIT EQ 224
ON TABLE PCHOLD FORMAT EXL2K
ON TABLE SET STYLE *
UNITS=CM, PAGESIZE='A4', LEFTMARGIN=0.635000, RIGHTMARGIN=0.635000,
    TOPMARGIN=0.635000, BOTTOMMARGIN=0.635000, SQUEEZE=ON,
    ORIENTATION=LANDSCAPE, $
TYPE=REPORT, GRID=OFF, FONT=ARIAL, $
TYPE=DATA, COLUMN=CHAR, FONT=SYMBOL, $
ENDSTYLE
END



Waz...

Prod:WebFOCUS 7.6.10/8.1.04Upgrade:WebFOCUS 8.2.07OS:LinuxOutputs:HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!