Hi Vicki -
Sorry I am not sure how to attach a screen capture. But my table is like this:
Race CA AA TOTAL Location ITEMTOT PCT ITEMTOT PCT ITEMTOT PCT
COMMC 17 17 23 23 40 40
What I want is to use the GUI to get a Percent of the total under PCT.
My code is as follows:
-*COMPONENT=Join_J001
JOIN IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.PATIENTID IN IBI_VIEW_VISIT_OUTPT
TO MULTIPLE PBR_PATIENT_VW.PBR_PATIENT_VW.PATIENTID IN PBR_PATIENT_VW TAG J001 AS J001
END
-*COMPONENT=Join_J002
JOIN J001.PBR_PATIENT_VW.RACEID IN IBI_VIEW_VISIT_OUTPT
TO MULTIPLE IBI_TABLE_RACE_DESC.RACE_DESC.RACEID IN IBI_TABLE_RACE_DESC TAG J002 AS J002
END
-DEFAULTH &WF_SUMMARY='Summary';
-DEFAULTH &WF_TITLE='WebFOCUS Report';
TABLE FILE IBI_VIEW_VISIT_OUTPT
SUM CNT.DST.IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.APPOINTMENTID AS 'ITEMTOT'
COMPUTE pct/I5=CNT.DST.IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.APPOINTMENTID ;
BY IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.LOCATIONNAME
ACROSS J002.RACE_DESC.NAME AS 'RACE'
WHERE IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.STS EQ 'ATTENDED' OR 'BOOKED';
WHERE IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.APPTDT GE '&MINAPPTDT.(FIND IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.APPTDT IN IBI_VIEW_VISIT_OUTPT).Report Start Date YYYY-MM-DD:.';
WHERE IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.APPTDT LE '&MAXAPPTDT.(FIND IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.APPTDT IN IBI_VIEW_VISIT_OUTPT).Report End Date YYYY-MM-DD:.';
WHERE IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.LOCATIONNAME EQ &LOCATIONNAME.(OR(FIND IBI_VIEW_VISIT_OUTPT.VISIT_OUT_PAT_VW.LOCATIONNAME IN IBI_VIEW_VISIT_OUTPT)).LOCATIONNAME:.;
ON TABLE SUBHEAD
" PBR Attended / Booked Appointments "
"&MINAPPTDT through &MAXAPPTDT"
"for &LOCATIONNAME "
ON TABLE PCHOLD FORMAT HTML
ON TABLE NOTOTAL
ON TABLE ROW-TOTAL
ON TABLE SET CACHELINES 100
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE SET SQUEEZE ON
ON TABLE SET HTMLCSS ON
ON TABLE SET HTMLENCODE ON
ON TABLE SET EMPTYREPORT ON
ON TABLE SET STYLE *
INCLUDE=IBFS:/FILE/IBI_HTML_DIR/javaassist/intl/EN/ENIADefault_combine.sty,$
TYPE=REPORT, TITLETEXT=&WF_TITLE.QUOTEDSTRING, SUMMARY=&WF_SUMMARY.QUOTEDSTRING, HFREEZE=OFF, $
TYPE=TABHEADING, LINE=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=1, ITEM=1, OBJECT=TEXT, SIZE=14, STYLE=BOLD+ITALIC, $
TYPE=TABHEADING, LINE=2, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=2, ITEM=1, OBJECT=TEXT, SIZE=14, STYLE=BOLD+ITALIC, $
TYPE=TABHEADING, LINE=3, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=3, ITEM=1, OBJECT=TEXT, SIZE=14, STYLE=BOLD+ITALIC, $
ENDSTYLE
END
Thanks,
Tara
8002 Windows