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.
Very nice Warren, manipulating the PDF file stream itself, amending control objects etc.
Also good to see that you've tried to incorporate full error vetting as well.
It would have been good to know what environment and platform from your signature, but I guess that you are running on a unix box due to the following code snippet?
! sed 's/[ ]*$//' tmp_pdf.ftm > &UTLPDFFX_File
This obviously restricts it, but should be able to be coded to for some other platforms by using &FOCMODE tests.
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
so it seems that DEALER_COST is the key element in this whole thing.. One of the TITLE's has to be set with a whole lot of room vertically, in the usual sense, in order to get the rotated titles to fit.
so the entry for [c] could be an explicit blank -SET &UTLPDFFX_Fx3 = '[c];R0;;; ' ; and the AS phrase for DEALER_COST DEALER_COST AS '[c], , ,Dealer' will make the whole title bar tall enough to handle flipped titles.
this is sooooooo sweet. i hope you won a tv or a car or a house or something. Last year T and I won iPods...very sweet, but this one's worth a sailboat.
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
Posts: 3811 | Location: Manhattan | Registered: October 28, 2003
The result is extremely cool! To be frank I barely understand how it works. OK, I'll admit right now I don't understand how it works at all
However I must say that it appeals to my sense of irony that the winning entry is based on a feature that is both undocumented and unsupported, which of course makes the achievement even more impressive.
Do you think they'll 'code-tighten' then ask for the ipod back when it no longer works?
Live and Direct from the University of Virginia.
DevStudio 7.6.9 - WF-7.6.9 - Win2k3 - MRE - RC - MSSQL - XBOX-360 Elite - Playstation 3 - Wii - PSP - Nintendo DSi - iPod Touch - Suzuki B-King - Honda Valkyrie - Subaru WRX STI - Canon EOS 1D Mark IV - Lover of Toys.
Posts: 21 | Location: Virginia | Registered: May 10, 2005
Stop it, my head is getting bigger, oopps it exploded.
But seriously, any of us can do this sort of thing, you just have to keep an open mind and think outside the box, well perhaps in another container in another port.
Waz.... great routine. Thanks. I needed to add parentheses around the code in line 202 of your zipped utlpdffx to get it to work for me, else it gave an:
0 ERROR AT OR NEAR LINE 202 IN PROCEDURE UTLPDFFXFOCEXEC *
(FOC279) NUMERIC ARGUMENTS IN PLACE WHERE ALPHA ARE CALLED FOR
works great as:
S&Cntr..ALin2/I9 = IF ('&UTLPDFFX_Efct.&Cntr' CONTAINS 'R270')
(OR '&UTLPDFFX_Efct.&Cntr' CONTAINS 'R90')
Prod: WebFOCUS 7.1.6 Servlet - Self Service on Solaris 8 - Apache Tomcat 5.0.28 DevStudio 7.1.6 on MS Windows XP SP2 Output: HTML, Excel 2000 and PDF