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.
Join the TIBCO Community TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.
From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
Request access to the private WebFOCUS User Group (login required) to network with fellow members.
Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.
When I execute the following code: JOIN SHRDGMR.SHRDGMR.SHRDGMR_PIDM IN SHRDGMR TO MULTIPLE V_NCAT_AS_ACAD_HIST_DETAIL.V_NCAT_AS_ACAD_HIST_DETAIL.PIDM_KEY IN V_NCAT_AS_ACAD_HIST_DETAIL AS J0 END
DEFINE FILE SHRDGMR GRADUATION_DATE/YYMD = HDATE(SHRDGMR_GRAD_DATE,'YYMD'); DATE1/A8YYMD = GRADUATION_DATE; GRAD_DATE/A08 = DATE1; -*LAST_SHRDGMR_PIDM/I08 = SHRDGMR_PIDM; END -*BY SSN -*PRINT TABLE FILE SHRDGMR -*WHERE RECORDLIMIT EQ 10000 PRINT LAST_NAME FIRST_NAME MIDDLE_INITIAL SHRDGMR_MAJR_CODE_1 GRAD_DATE GRADUATED_IND COMPUTE CNTR/I1 = IF SHRDGMR_PIDM EQ LAST SHRDGMR_PIDM THEN CNTR + 1 ELSE 1; -*BY LAST_NAME NOPRINT -*BY FIRST_NAME NOPRINT -*BY MIDDLE_INITIAL NOPRINT BY SHRDGMR_PIDM NOPRINT WHERE SHRDGMR_MAJR_CODE_1 EQ '0104' OR '0112' OR '0246'; WHERE GRADUATED_IND EQ 'Y'; WHERE TOTAL CNTR EQ 1; ON TABLE HOLD AS VINSON END -* TABLE FILE VINSON PRINT LAST_NAME FIRST_NAME MIDDLE_INITIAL SHRDGMR_MAJR_CODE_1 GRAD_DATE GRADUATED_IND BY LAST_NAME NOPRINT BY FIRST_NAME NOPRINT BY MIDDLE_INITIAL NOPRINT BY SHRDGMR_PIDM NOPRINT HEADING "" FOOTING "" WHERE SHRDGMR_MAJR_CODE_1 EQ '0104' OR '0112' OR '0246'; WHERE GRADUATED_IND EQ 'Y'; ON TABLE SET PAGE-NUM OFF ON TABLE NOTOTAL ON TABLE PCHOLD AS LONNIE FORMAT ALPHA ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * UNITS=IN, SQUEEZE=ON, ORIENTATION=PORTRAIT, $ TYPE=REPORT, GRID=OFF, FONT='ARIAL', SIZE=9, $ TYPE=TITLE, STYLE=BOLD, $ TYPE=TABHEADING, SIZE=12, STYLE=BOLD, $ TYPE=TABFOOTING, SIZE=12, STYLE=BOLD, $ TYPE=HEADING, SIZE=12, STYLE=BOLD, $ TYPE=FOOTING, SIZE=12, STYLE=BOLD, $ TYPE=SUBHEAD, SIZE=10, STYLE=BOLD, $ TYPE=SUBFOOT, SIZE=10, STYLE=BOLD, $ TYPE=SUBTOTAL, BACKCOLOR=RGB(210 210 210), $ TYPE=ACROSSVALUE, SIZE=9, $ TYPE=ACROSSTITLE, STYLE=BOLD, $ TYPE=GRANDTOTAL, BACKCOLOR=RGB(210 210 210), STYLE=BOLD, $ ENDSTYLE END
Without seeing the master I guess your fields LAST_NAME FIRST_NAME MIDDLE_INITIAL all are of a format like A*V (a Varchar) The first 6 digits represent the lengt of the real string. You see in the report
Abukhalaf=9 characters, Bassam = 6, A=1 and so on.
To prefend this there are some options. 1) change the master form A*V to A* (that's what we do) 2) create a defined field that's an Alpha without the V.
I hope this helps
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
Posts: 2387 | Location: Amsterdam, the Netherlands | Registered: December 03, 2006
GRRRR on the varchar stuff. It has caused me so many headaches!! Joins, flat file extracts, etc., etc. etc. We've just turned them all of as Ginny suggests and stick with An instead of AnV.
Regards,
Darin
In FOCUS since 1991 WF Server: 7.7.04 on Linux and Z/OS, ReportCaster, Self-Service, MRE, Java, Flex Data: DB2/UDB, Adabas, SQL Server Output: HTML,PDF,EXL2K/07, PS, AHTML, Flex WF Client: 77 on Linux w/Tomcat
Posts: 2298 | Location: Salt Lake City, Utah | Registered: February 02, 2007