Focal Point
[CLOSED] PDF report with Image as a column.

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

January 23, 2018, 02:54 PM
srajeevan
[CLOSED] PDF report with Image as a column.
Hi..
I have a report which i created as HTMl.
But then i had to use that inside a Compund document with PDF as output format.So the image was not displaying insted the whole image url was displaying.
I went through lots of post in here and my image is stored in EDA server in an image directory in approot and it was displaying correctly when output format was HTML.
  
UP_ARROW/A100V = '<img src="/approot/images/scp/uparrow.jpg" style="width:20px;height:20px;">';
DOWN_ARROW/A100V= '<img src="/approot/images/scp/downarrow.jpg" style="width:20px;height:20px;"


I even saw some post where it says i have to used stylesheet component to display images in a column when output format is pdf.
i tried that even,but no luck.

My report is little complicated as well.

I have few hold files to storing different column values.I give all those column values in a column field called VAL and even the image is also stored in a different HOLD file in thta VAL field and at the end i merge all HOLD files together using MORE command.

Any solution/suggetion will be appreciated.

This message has been edited. Last edited by: FP Mod Chuck,


WF8206,Windows 7,8,10
HTM,PDF,EXCEL
January 23, 2018, 03:36 PM
Waz
What did you try ?

When you reference an image for HTML, it is referenced via the Web server.

For PDF, the image needs to be in a location accessible to the Reporting server, a completely different path.

Can you post your code ?


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!

January 25, 2018, 12:08 PM
srajeevan
Hi Waz,
here is the code.
I dunno how to reference the location for image.
  
-*-DEFAULT &BIP_folder = 'IBFS%253A%252FEDA%252FEDASERVE%252Fimages%252Fscp';
-*-DEFAULT &BIP_item = 'uparrow.png&windowHandle=573337';
-*-DEFAULT &IBI_random='9457.892581054146';
-*-DEFAULT &BIP_item1 = 'downarrow.png&windowHandle=807770';
-*-DEFAULT &IBI_random1='1887.7150841335276';
DEFINE FILE ACTIVITIES_DB
Defyear/YY=OFFICER_DAILY_DATE;
Defmonth/MT=OFFICER_DAILY_DATE;
Defmonthchar/A5V=IF Defmonth EQ 1 THEN 'JAN' ELSE IF Defmonth EQ 2 THEN 'FEB' ELSE IF Defmonth EQ 3 THEN 'MAR' ELSE IF Defmonth EQ 4 THEN 'APR' ELSE IF Defmonth EQ 5 THEN 'MAY' ELSE IF Defmonth EQ 6 THEN 'JUN' ELSE IF Defmonth EQ 7 THEN 'JUL' ELSE IF Defmonth EQ 8 THEN 'AUG' ELSE IF Defmonth EQ 9 THEN 'SEP' ELSE IF Defmonth EQ 10 THEN 'OCT' ELSE IF Defmonth EQ 11 THEN 'NOV' ELSE 'DEC';
FILE_CLASS_DASHBD_DESC/A75V=IF FILE_CLASS_DASHBD EQ '0900' THEN 'Homicide' ELSE IF FILE_CLASS_DASHBD EQ '1100' THEN 'Sexual Assault' ELSE IF FILE_CLASS_DASHBD EQ '1200' THEN 'Robbery' ELSE IF FILE_CLASS_DASHBD EQ '1300' THEN 'Assault' ELSE IF FILE_CLASS_DASHBD EQ '2200' THEN 'Burglary' ELSE IF FILE_CLASS_DASHBD EQ '2300' THEN 'Larceny' ELSE IF FILE_CLASS_DASHBD EQ '3500' THEN 'Drugs' ELSE IF FILE_CLASS_DASHBD EQ '5000' THEN 'Obstruction' ELSE IF FILE_CLASS_DASHBD EQ '54002' THEN 'OUI' ELSE IF FILE_CLASS_DASHBD EQ '93001' THEN 'Traffic Accident' ELSE LCWORD3( 75, FILECLASS_DESC, 'A75' );
FILE_CLASS_DASHBD/A5=IF FILE_CLASS_CODE EQ '54002' THEN '54002' ELSE IF FILE_CLASS_CODE EQ '93001' THEN '93001' ELSE EDIT( FILE_CLASS_CODE, '9999' );
VIOLENT_FLAG/I9=IF FILE_CLASS_DASHBD IN ( '1300', '1200', '1100', '900' ) THEN 1 ELSE 0;
END
TABLE FILE ACTIVITIES_DB
SUM
	COMPUTE VAL1/I8 = CNT.ACTIVITY_ID;
	COMPUTE VALACTIVITYID/A100V = FPRINT(VAL1, 'I8', 'A100V');
BY LOWEST ACTIVITY_TYPE_DESC
BY Defyear
BY TOTAL COMPUTE ROWLABEL/A20V = 'Year ' | EDIT(Defyear);
WHERE Defyear IN ('2016','2017');
-*WHERE FILECLASS_DESC EQ 'ROBBERY';
WHERE RECORDLIMIT EQ 1000000
WHERE READLIMIT EQ 10000000
WHERE DISTRICT EQ '1';
ON TABLE HOLD AS EXTDATA
-*ON TABLE PCHOLD FORMAT HTML
-*ON TABLE PCHOLD FORMAT HTML
END
-RUN


DEFINE FILE EXTDATA
SALES1/I8=IF Defyear EQ 2016 THEN VAL1 ELSE 0;
SALES2/I8=IF Defyear EQ 2017 THEN VAL1 ELSE 0;
END
TABLE FILE EXTDATA
-*ON TABLE PCHOLD FORMAT HTML
     -*COMPUTE VALACTIVITYID/I8 = ( SALES2 - SALES1);
	 -*COMPUTE VALACTIVITYID1/A20V = FPRINT(VAL, 'I8', 'A20V');
	 -*COMPUTE VALACTIVITYID/A20V = IF VAL GT 0 THEN VALACTIVITYID1||UP_ARROW ELSE VALACTIVITYID1||DOWN_ARROW;
SUM
     COMPUTE VAL/I8 = ( SALES2 - SALES1 );
     COMPUTE VALACTIVITYID/A100V = FPRINT(VAL, 'I8', 'A100V');
     -*COMPUTE ICON/A100V = IF ( SALES2 - SALES1 ) GT 0 THEN EXTDATA.EXTDATA.UP_ARROW ELSE EXTDATA.EXTDATA.DOWN_ARROW;
BY  LOWEST EXTDATA.EXTDATA.ACTIVITY_TYPE_DESC
BY TOTAL COMPUTE Defyear/YY = 9999;
BY TOTAL COMPUTE ROWLABEL/A20V = 'Diff';
ON TABLE NOTOTAL
ON TABLE HOLD AS DIFFDATA
END
-RUN
-*-EXIT
DEFINE FILE DIFFDATA
UP_ARROW/A100V = '/approot/images/scp/uparrow.jpg';
-*DOWN_ARROW/A100V= '<img src="/approot/images/scp/downarrow.jpg" style="width:20px;height:20px;">';
DOWN_ARROW/A100V= '/approot/images/scp/downarrow.jpg';
LOGO/A100V = IF DIFFDATA.DIFFDATA.VAL GT 0 THEN UP_ARROW ELSE DOWN_ARROW;
END
TABLE FILE DIFFDATA
SUM
     -*COMPUTE VALACTIVITYID/A100V = IF DIFFDATA.DIFFDATA.VAL GT 0 THEN UP_ARROW ELSE DOWN_ARROW;
	 COMPUTE VALACTIVITYID/A100V = LOGO;
BY  LOWEST DIFFDATA.DIFFDATA.ACTIVITY_TYPE_DESC
BY TOTAL COMPUTE Defyear/YY = 9999;
BY TOTAL COMPUTE ROWLABEL/A20V = 'Icon';
ON TABLE NOTOTAL
ON TABLE HOLD AS DIFFICON
ON TABLE SET STYLE *
$
TYPE = DATA,COLUMN=VALACTIVITYID, IMAGE=LOGO ,SIZE=(2.0 .5),$
ENDSTYLE
END
-RUN
TABLE FILE EXTDATA
SUM
     EXTDATA.EXTDATA.VALACTIVITYID AS ''
BY  LOWEST EXTDATA.EXTDATA.ACTIVITY_TYPE_DESC AS 'DETROIT'
ACROSS LOWEST EXTDATA.EXTDATA.Defyear NOPRINT
ACROSS EXTDATA.EXTDATA.ROWLABEL AS ''
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
     INCLUDE = IBFS:/FILE/IBI_HTML_DIR/javaassist/intl/EN/combine_templates/ENblackbluepurple.sty,
$
     PAGESIZE='10 x 14',
     TYPE=REPORT, ORIENTATION=LANDSCAPE,GRID=ON,SQUEEZE =ON,$
TYPE=REPORT,
     FONT='IBIDEFAULT',
     SIZE=6,
     COLOR='BLACK',
     BACKCOLOR=RGB(223 223 235),
$
TYPE = REPORT,COLUMN = N2,LEFTGAP=1,RIGHTGAP=-6,$
TYPE = REPORT,COLUMN = N1,LEFTGAP=1,RIGHTGAP=-2,$
TYPE = REPORT,COLUMN = N3,LEFTGAP=-4,RIGHTGAP=-6,$
TYPE = REPORT,COLUMN = N4,LEFTGAP=-4,RIGHTGAP=-2,$
TYPE=DATA,
     FONT='TAHOMA',
     SIZE=6,
     COLOR=RGB(71 68 88),
     BACKCOLOR=( RGB(223 223 235) RGB(173 173 199) ),
$
TYPE=ACROSSVALUE,
     FONT='TAHOMA',
     SIZE=6,
     COLOR=RGB(71 68 88),
     BACKCOLOR=RGB(173 173 199),
     STYLE=BOLD,
$
ENDSTYLE
MORE
FILE DIFFDATA
MORE
FILE DIFFICON
END
-RUN




WF8206,Windows 7,8,10
HTM,PDF,EXCEL
January 28, 2018, 03:23 PM
Waz
To Add an image for PDF, you need to use the stylesheet IMAGE tag to point to an image.

Check out this documentation.

Add an Image to a PDF, PS, or HTML Report With an Internal Cascading Style Sheet


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!

April 17, 2019, 03:44 PM
MartinY
Is there a way that can be done in PDF other than in TABHEADING, TABFOOTING, FOOTING, HEADING, SUBHEAD, and SUBFOOT ?
I need it as a column aside another field such as if I add the visualisation (but I can't use visualisation).

Cannot image that it's not possible with PDF format...


WF versions : Prod 8.2.04M gen 33, Dev 8.2.04M gen 33, OS : Windows, DB : MSSQL, Outputs : HTML, Excel, PDF
In Focus since 2007
April 18, 2019, 08:15 AM
David Beagan
Here's some old code I had, you just need to supply your own images. Not sure if any other than .jpg will work.
  
TABLE FILE CAR
SUM
RCOST
DCOST
COMPUTE COST_DIFF/D12.2 = RCOST - DCOST;
COMPUTE IMGDOT/A20 = IF COST_DIFF LT 1000 THEN  'dotr.jpg' ELSE
                     IF COST_DIFF GT 10000 THEN 'dotb.jpg' ELSE
                                                'dotg.jpg'; AS ' '
BY COUNTRY
ON TABLE SET ONLINE-FMT PDF
ON TABLE SET STYLE *
TYPE=DATA, COLUMN=IMGDOT, IMAGE=(IMGDOT), SIZE=(0.25 0.15), PRESERVERATIO=ON, $
ENDSTYLE
END

Images are on the App Path.

This message has been edited. Last edited by: David Beagan,


WF 8.2.03
Win10 / IE11 / Chrome
HTML EXL2K PDF et. al.
April 18, 2019, 09:28 AM
Doug
quote:
Not sure if any other than .jpg will work.
I've used pngs and gifs successfully... I have mine in a 'common' app folder.




   In FOCUS Since 1983 ~ from FOCUS to WebFOCUS.
   Current: WebFOCUS Administrator at FIS Worldpay | 8204, 8206