As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only. Moving forward, myibi is our community platform to learn, share, and collaborate. We have the same Focal Point forum categories in myibi, so you can continue to have all new conversations there. If you need access to myibi, contact us at myibi@ibi.com and provide your corporate email address, company, and name.
-* Download images to /baseapp
-* https://i.postimg.cc/3wxVh7vH/chevrongrn.png
-* https://i.postimg.cc/Nfy0sqRm/chevronyel.png
-* https://i.postimg.cc/jq35YdnR/chevronred.png
TABLE FILE GGSALES
SUM
COMPUTE Date1/MDYY = DATE; NOPRINT
COMPUTE Date2/A8MDYY = Date1; NOPRINT
COMPUTE Date3/A10 = EDIT(Date2,'99/99/9999'); NOPRINT
COMPUTE Image/A15 = IF DATE LT '19960801' THEN 'chevrongrn.png' ELSE IF DATE LT '19970201' THEN 'chevronyel.png' ELSE 'chevronred.png'; NOPRINT
COMPUTE Data/A999 = '<div style="position:relative;text-align:center;"><img src="/ibi_apps/run.bip?BIP_REQUEST_TYPE=BIP_RUN&|BIP_folder=IBFS%253A%252FEDA%252FEDASERVE%252Fbaseapp&|BIP_item=' |
Image | '"><div style="position:absolute;top:50%;left:50%;transform:translate(-50%,-40%);">&|nbsp;&|nbsp;' |
Date3 | '</div></div>';
BY REGION AS ''
BY ST AS ''
ACROSS PCD AS ''
ON TABLE SET STYLE *
INCLUDE=IBFS:/FILE/IBI_HTML_DIR/ibi_themes/Warm.sty, $
ENDSTYLE
END
WebFOCUS 8.2.06
Posts: 210 | Location: Sterling Heights, Michigan | Registered: October 19, 2010
TABLE FILE GGSALES
SUM
COMPUTE Date1/MDYY = DATE; NOPRINT
COMPUTE Date2/A8MDYY = Date1; NOPRINT
COMPUTE Date3/A10 = EDIT(Date2,'99/99/9999'); NOPRINT
COMPUTE Color/A15 = IF DATE LT '19960801' THEN 'lime' ELSE IF DATE LT '19970201' THEN 'yellow' ELSE 'red'; NOPRINT
COMPUTE Data/A999 = '<div style="position:relative;text-align:center;"><svg width="110" height="20"><polygon points="0,1 20,10 0,23 110,23 130,10 110,1" style="fill:'|
Color | ';stroke:gray;stroke-width:2;" /><div style="position:absolute;top:50%;left:50%;transform:translate(-50%,-40%);">' |
Date3 | '</div></div>';
BY REGION AS ''
BY ST AS ''
ACROSS PCD AS ''
ON TABLE SET STYLE *
INCLUDE=IBFS:/FILE/IBI_HTML_DIR/ibi_themes/Warm.sty, $
ENDSTYLE
END
WebFOCUS 8.2.06
Posts: 210 | Location: Sterling Heights, Michigan | Registered: October 19, 2010
Works fine for me (once I get rid of the permanent master code etc.!!).
What browser and browser version are you using?
I am guessing that you're using IE8!! You need IE9 minimum for SVG support.
Also beware that IE's SVG is quite "loose" and if you exceed width and/or height specs, IE will "adjust"nthe SVG. Chrome will not, so the SVG in the Function will truncate. So you might like to change it to the following -
Two things: 1) I'm outputting to IE 11. 2) The 'EX -LINES * EDAPUT MASTER,ORDERZ,CV,MEM' produces the "Cannot include resource specified IBFS:/-LINES" error. So, I changed to the FILEDEF.
I guess it goes deeper as I don't get the chevons from the code in dbeagan's May 01 2019 20:59 post either.
I'll take Much Better notes in your Summmit Session(s) this year... I Promise
Posts: 3132 | Location: Tennessee, Nashville area | Registered: February 23, 2005
1) I don't have IE11 so cannot test (emulation from Edge). Check the mode from within developer tools to see what mode it is actually running in - just in case! Even though it says it's IE11, it might be running in emulation because of HTML headers etc.
2) You are running from within "MRE" so you need the alternate EXEC or prefix with -MRNOEDIT - but you knew that and it was just a "senior moment"
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
Posts: 5694 | Location: United Kingdom | Registered: April 08, 2004
Yeah... I knew that... sometime ago... I seem to have forgotten more than I can remember ... Stack Overflow? Anyway, that worked... Of course it did
I'm so looking forward to Summit to see how much more I can cram into this brain of mine... And do a Major Defrag to clear out all the stuff that's changed since 1983...
Posts: 3132 | Location: Tennessee, Nashville area | Registered: February 23, 2005
Now, I'm making a 'Nice Thread' (Thanks Hallway) even better.
Of course Tony was correct in what he stated. However, it needed "ON TABLE PCHOLD FORMAT AHTML", or HTML, added for it to work on my system from within App Studio. Weird... But that's all that I did (There's a lot of Browser stuff going on here, which is fine). Maybe there's a deeper explanation to that which may or may not be discovered. But, here it is... Tony's Original Fex, with that one PCHOLD line added.
Thanks Again Tony... See you at Summit
Posts: 3132 | Location: Tennessee, Nashville area | Registered: February 23, 2005
@ Doug, I was a little concerned when you suggested AHTML but having just tried it, the FILTER option actually shows the graphic (8.2.05) which is reassuring!
Even sorting works fine (on initial checks anyway!).
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
Posts: 5694 | Location: United Kingdom | Registered: April 08, 2004
Tony: You got me going on this and I kept on going. You're a great Teacher... Professor... Of course, I knew that We Can Do That in WebFOCUS! I hope more people benefit from this and "Invent Applications around it. See You At Summit!This message has been edited. Last edited by: Doug,
In FOCUS Since 1983 ~ from FOCUS to WebFOCUS. Current: WebFOCUS Administrator at FIS Worldpay | 8204, 8206
Posts: 3132 | Location: Tennessee, Nashville area | Registered: February 23, 2005