var height = window.innerHeight;
var width = window.innerWidth;

-DEFAULTH &WF_STYLE_HEIGHT='405.0';
-DEFAULTH &WF_STYLE_WIDTH='770.0';

-* Want to be able to do:

-DEFAULTH &WF_STYLE_HEIGHT='&HEIGHT.EVAL';
-DEFAULTH &WF_STYLE_WIDTH='&WIDTH.EVAL';

-* File: IBFS:/WFC/Repository/{location}/chart_auto_width.fex Created by WebFOCUS AppStudio

-* &utlChartFile          = The physical file to read, the saved HTM file
-* &utlChartOut           = The save name of the original chart HTM
-* &utlchartwidthadjust   = Adjustment amount of the width of the chart
-* &utlchartminimumwidth  = Adjustment the minimum width of the chart
-* &utlchartsperline      = Number of charts horizontally, used to set the width of the chart if multiple are shown in the frame on the same line.
-* &FIXED_WF_STYLE_HEIGHT = The height of the chart
-*
-* Usage:
-* ...
-* ON GRAPH SAVE AS MY_CHT
-* END
-* -RUN
-*
-* -SET &utlChartFile = 'my_cht.htm' ;
-* -SET &utlChartOut  = 'MY_CHT' ;
-* -SET &utlchartsperline = {number of charts horizontally}
-* -INCLUDE /WFC/Repository/{location}/chart_auto_width.fex
-*

-DEFAULTH &utlchartwidthadjust = 10
-DEFAULTH &utlchartminimumwidth = 500
-DEFAULTH &utlchartsperline = 2

-MRNOEDIT EX -LINES * EDAPUT MASTER, T_HTMREAD, C, MEM
FILENAME=T_HTMREAD, SUFFIX=FIX, $
SEGNAME=T_HTMREAD, SEGTYPE=S1, $
  FIELD=LINE, ALIAS=L, USAGE=A4000, ACTUAL=A4000, $
EDAPUT*
-RUN
FILEDEF T_HTMREAD DISK &utlChartFile
DEFINE FILE T_HTMREAD
 CR/A1          = HEXBYT(10,'A1') ;
 Chart_Id/A50   = IF LINE CONTAINS '<div class=''chart'' id='''
                  THEN TOKEN(LINE,'''',4)
				  ELSE LAST Chart_Id ;
 NEW_LINE/A4000 = IF LINE CONTAINS 'window.onresize = function() {'
                  THEN 'function sizeApple(){'
 			  	| CR | '	var prntHeight = parent.innerHeight || parent.document.documentElement.offsetHeight ;'
 			  	| CR | '	var prntWidth = parent.innerWidth || parent.document.documentElement.offsetWidth ;'
			    | CR | '	//var orientation = window.orientation;'
			    | CR | '	var orientation = (prntHeight<prntWidth)?90:0;'
			    | CR | '	switch(orientation) {'
			    | CR | '		case 0:'
			    | CR | '		case 180:'
			    | CR | '			chart.width = 754;'
			    | CR | '			break;'
			    | CR | '		case 90:'
			    | CR | '		case -90:'
			    | CR | '			chart.width = parseInt(1000/&utlchartsperline)-20;'
			    | CR | '			break;'
			    | CR | '	}'
			    | CR | '	chart.draw("' || Chart_Id || '");'
			    | CR | '}'
			    | CR | 'if (isApple){'
			    | CR | '	sizeApple();'
			    | CR | '	window.parent.addEventListener("orientationchange",'
			    | CR | '		sizeApple,'
			    | CR | '		false'
			    | CR | '	);'
			    | CR | '}'
			    | CR | '&utlChartOut|_currOnload = function() {'
				  ELSE
                  IF LINE CONTAINS 'chart.width -= hMargins;'
                  THEN 'var prntWidth = parent.innerWidth || parent.document.documentElement.offsetWidth ;'
			    | CR | 'if (chart.width > (prntWidth/&utlchartsperline)) chart.width = parseInt(prntWidth/&utlchartsperline) - 20 ;'
			    | CR | 'var widthAdjust=0;if (chart.width>=&utlchartminimumwidth*2) {widthAdjust=parseInt(&utlchartwidthadjust,10);} chart.width-=(hMargins+widthAdjust);'
				  ELSE
				  IF LINE CONTAINS 'chart.height -= vMargins;'
                  THEN 'chart.height = &FIXED_WF_STYLE_HEIGHT ;'
				  ELSE
				  IF LINE CONTAINS 'chart.draw(''jschart_&utlChartOut|_0'');'
                  THEN 'if (isApple) { sizeApple();} else {chart.draw("' || Chart_Id || '")} ;'
				  ELSE
				  IF LINE CONTAINS 'window.onload = window.onresize;'
                  THEN ' '
			    | CR | '&utlChartOut|_currOnload() ;'
			    | CR | 'window.removeEventListener(''resize'',&utlChartOut|_currOnload,false);'
			    | CR | 'window.addEventListener(''resize'',&utlChartOut|_currOnload,false);'
			    | CR | '//window.addEventListener(''onload'',&utlChartOut|_currOnload,false);'
				  ELSE LINE ;
END

TABLE 	FILE T_HTMREAD
 PRINT 	NEW_LINE
 ON 	TABLE SAVE AS &utlChartOut
END
-RUN

Waz...

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

quote:

Sounds nice, but how would one do such? How can you capture the width and height in Js but then pass it to the fex into DM variables?

-DEFAULTH &MYHEIGHT = _FOC_NULL;
-DEFAULTH &MYWIDTH = _FOC_NULL;

-IF &MYHEIGHT NE _FOC_NULL THEN GOTO SKIPRELOAD;
-HTMLFORM BEGIN
<script>
	var height = window.innerHeight;
	var width = window.innerWidth;

	location.href='/ibi_apps/run.bip?BIP_REQUEST_TYPE=BIP_RUN&|BIP_folder=IBFS%253A%252FWFC%252FRepository%252FPublic%252Ftests&|BIP_item=Tester.fex&|MYHEIGHT='+height+'&|MYWIDTH='+width;
</script>
-HTMLFORM END
-EXIT

-SKIPRELOAD

-TYPE WIDTH = &MYWIDTH
-TYPE HEIGHT = &MYHEIGHT

- FOCUS Man, just FOCUS!
-----------------------------
Product: WebFOCUS
Version: 8.1.04
Server: Windows 2008 Server

-SET &FOLDER_NAME = 'Public/tests';
-SET &FILE_NAME = 'Tester.fex';

-INCLUDE IBFS:/WFC/Repository/Public/tests/includeThis.fex

-TYPE WIDTH = &MYWIDTH
-TYPE HEIGHT = &MYHEIGHT

-DEFAULTH &FOLDER_NAME = _FOC_NULL;
-DEFAULTH &FILE_NAME = _FOC_NULL;
-DEFAULTH &MYHEIGHT = _FOC_NULL;
-DEFAULTH &MYWIDTH = _FOC_NULL;

-IF &MYHEIGHT NE _FOC_NULL THEN GOTO SKIPRELOAD;
-HTMLFORM BEGIN
<script>
	var height = window.innerHeight;
	var width = window.innerWidth;

	location.href='/ibi_apps/run.bip?BIP_REQUEST_TYPE=BIP_RUN&|BIP_folder=IBFS:/WFC/Repository/&FOLDER_NAME.EVAL&|BIP_item=&FILE_NAME.EVAL&|MYHEIGHT='+height+'&|MYWIDTH='+width;
</script>
-HTMLFORM END
-EXIT

-SKIPRELOAD

- FOCUS Man, just FOCUS!
-----------------------------
Product: WebFOCUS
Version: 8.1.04
Server: Windows 2008 Server

-DEFAULTH &FOLDER_NAME = _FOC_NULL;
-DEFAULTH &FILE_NAME = _FOC_NULL;
-DEFAULTH &MYHEIGHT = _FOC_NULL;
-DEFAULTH &MYWIDTH = _FOC_NULL;
-DEFAULTH &REFRESH_URL = '/ibi_apps/run.bip?BIP_REQUEST_TYPE=BIP_RUN&|BIP_folder=IBFS:/WFC/Repository/&FOLDER_NAME.EVAL&|BIP_item=&FILE_NAME.EVAL';
-SET &RELOAD = IF &MYHEIGHT EQ _FOC_NULL THEN 'reloadPage();' ELSE 'window.addEventListener("resize", reloadPage);';

-HTMLFORM BEGIN
<script>
function reloadPage(){
	var height = window.innerHeight;
	var width = window.innerWidth;

	location.href='&REFRESH_URL.EVAL&|MYHEIGHT='+height+'&|MYWIDTH='+width;
}
&RELOAD.EVAL
</script>
-HTMLFORM END

- FOCUS Man, just FOCUS!
-----------------------------
Product: WebFOCUS
Version: 8.1.04
Server: Windows 2008 Server