I have not found much on this topic. Focal Point deals more with compound PDF than Excel. Also, there is a lot of mention of Report Caster which we do not have. This is our first attempt at compound documents. The concept seems simple but obviously not.

SET COMPOUND = OPEN
-INCLUDE app/st_prob_dismiss_6hrsc_ajn1.fex
-INCLUDE app/st_prob_dismissal_remove_from_ajn.fex
-INCLUDE app/st_probation_to_dismissal_ajn.fex
-INCLUDE app/ad_prob_dismiss_2nd_dorf_ajn.fex
SET COMPOUND = CLOSE
-INCLUDE app/st_prob_dismiss_30_grad_ajn.fex

All five reports run fine individually but when run as a compound we get an error stating that a field name is not recognized (FOC003). The field name it is complaining about is used in all 5 reports. If more info is needed (ie a sample report) I can supply all data needed.

This message has been edited. Last edited by: Kerry,

You can use the PDF Layout Painter to create a compound Excel document. Change the output type to Excel.

You can also use the SET COMPOUND command with OPEN and CLOSE. I'm pretty sure there are lots of posts on this topic. Why don't you search on COMPOUND and see what pops up. You can look up the syntax in the language manual.

Oops, I see now that you have the compound statements. My mistake.

It is possible that a couple of -RUN statements will help:

SET COMPOUND = OPEN
-RUN
-INCLUDE app/st_prob_dismiss_6hrsc_ajn1.fex
-INCLUDE app/st_prob_dismissal_remove_from_ajn.fex
-INCLUDE app/st_probation_to_dismissal_ajn.fex
-INCLUDE app/ad_prob_dismiss_2nd_dorf_ajn.fex
SET COMPOUND = CLOSE
-RUN
-INCLUDE app/st_prob_dismiss_30_grad_ajn.fex

I tried the -RUN as suggested and this did not change anything. (I will need to lookup the run command for my own education) Thanks anyway Francis

If this solved your problem I would like to add one other suggestion.
Since you may want to run the included fexes also as stand-alone fex you should make the OPEN and CLOSE statements to amper values
The default value for that amper is '' and in the compound you change it to OPEN.

I'm not sure if this is needed, since the program may run without any problem, but it gives you the flexibility to change the sequence.

So far nothing works. All great suggestions and they all make sense.
Is it bad form to post the .fex's here (without the column formatting) or should this be taken off line?

You may post them, but use the red button to make it better readable.
and maybe you can try it first with two fexes?

Frank, sorry for my ignorance but could you explain the 'red' button. Tom, I read this before posting. Nothing worked.

Paul

if you post some code it would look like this

this is code between 
put [ code] before and
[ /code] at the end 
but without the space!

Program 1

SET ASNAMES = ON
TABLE FILE SFRSTCR
BY 'SFRSTCR.SFRSTCR.SFRSTCR_PIDM' AS 'PIDM'
BY HIGHEST 1 'SFRSTCR.SFRSTCR.SFRSTCR_TERM_CODE'
BY 'SFRSTCR.SFRSTCR.SFRSTCR_LEVL_CODE' AS 'LEVELCD'
HEADING
""
FOOTING
""
WHERE SFRSTCR_RSTS_CODE EQ 'RE';
WHERE TOTAL SFRSTCR_LEVL_CODE EQ 'GR';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDREG
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE SHRTCKN
PRINT
     'SHRTCKN.SHRTCKN.SHRTCKN_COLL_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_PIDM'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_TERM_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_CRN'
BY HIGHEST 1 'SHRTCKN.SHRTCKN.SHRTCKN_SEQ_NO'
HEADING
""
FOOTING
""
WHERE SHRTCKN_COLL_CODE EQ 'GS';
WHERE ( SHRTCKN_REPEAT_COURSE_IND EQ 'A' OR 'I' ) OR ( SHRTCKN_REPEAT_COURSE_IND EQ MISSING );
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCKN
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDCKN.HOLDCKN.SHRTCKN_PIDM AND HOLDCKN.HOLDCKN.SHRTCKN_TERM_CODE
 AND HOLDCKN.HOLDCKN.SHRTCKN_SEQ_NO IN HOLDCKN TO MULTIPLE
 SHRTCKG.SHRTCKG.SHRTCKG_PIDM AND SHRTCKG.SHRTCKG.SHRTCKG_TERM_CODE
 AND SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO IN SHRTCKG AS J0
 END
DEFINE FILE HOLDCKN
GRADEC/P9.3 MISSING ON=IF SHRTCKG_GRDE_CODE_FINAL EQ 'C' THEN SHRTCKG_CREDIT_HOURS ELSE MISSING;
END
TABLE FILE HOLDCKN
PRINT
     'SHRTCKG.SHRTCKG.GRADEC'
     'SHRTCKG.SHRTCKG.SHRTCKG_GRDE_CODE_FINAL'
     'SHRTCKG.SHRTCKG.SHRTCKG_CREDIT_HOURS'
     'HOLDCKN.HOLDCKN.SHRTCKN_COLL_CODE'
BY 'HOLDCKN.HOLDCKN.SHRTCKN_PIDM'
BY 'HOLDCKN.HOLDCKN.SHRTCKN_TERM_CODE'
BY 'SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO'
BY HIGHEST 1 'SHRTCKG.SHRTCKG.SHRTCKG_SEQ_NO'
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCKG
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE HOLDCKG
SUM
     GRADEC
BY SHRTCKN_PIDM AS 'PIDM'
HEADING
""
FOOTING
""
WHERE TOTAL GRADEC GT 6;
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDDISC
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
MATCH FILE HOLDREG
  PRINT LEVELCD SFRSTCR_TERM_CODE
  BY PIDM
RUN
FILE HOLDDISC
  PRINT GRADEC
  BY PIDM
AFTER MATCH HOLD AS HOLDDISC2 OLD-AND-NEW
END
-GOTO SKIP
TABLE FILE SHRLGPA
PRINT
     SHRLGPA_GPA
     SHRLGPA_LEVL_CODE
     SHRLGPA_GPA_TYPE_IND
BY SHRLGPA_PIDM
HEADING
""
FOOTING
""
WHERE SHRLGPA_LEVL_CODE EQ 'GR';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDGPAI
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
DEFINE FILE HOLDGPAI
GPAI/P25.2 MISSING ON=IF SHRLGPA_GPA_TYPE_IND EQ 'I' THEN SHRLGPA_GPA ELSE MISSING;
END
TABLE FILE HOLDGPAI
PRINT
     GPAI
BY SHRLGPA_PIDM AS 'PIDM'
BY SHRLGPA_LEVL_CODE AS 'LEVELCD'
HEADING
""
FOOTING
""
WHERE TOTAL ( GPAI LT 3.0 ) AND ( GPAI NE 0 );
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDGPAI2
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
MATCH FILE HOLDDISC2
  PRINT SFRSTCR_TERM_CODE GRADEC
  BY PIDM
  BY LEVELCD
RUN
FILE HOLDGPAI2
  BY PIDM
  BY LEVELCD
AFTER MATCH HOLD AS HOLDDISCQ OLD
END
-SKIP
SET ALL = PASS
TABLE FILE SGBSTDN
BY SGBSTDN_PIDM AS 'PIDM'
BY HIGHEST 1 SGBSTDN_TERM_CODE_EFF
BY SGBSTDN_RATE_CODE
HEADING
""
FOOTING
""
WHERE SGBSTDN_STST_CODE EQ 'AS';
WHERE TOTAL SGBSTDN_RATE_CODE NOT LIKE 'WSK%';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDRATE
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
SET ALL = OFF
JOIN
 HOLDDISC2.HOLDDISC.PIDM IN HOLDDISC2 TO UNIQUE HOLDRATE.HOLDRATE.PIDM
 IN HOLDRATE AS J0
 END
TABLE FILE HOLDDISC2
PRINT
     LEVELCD
     SFRSTCR_TERM_CODE
     SGBSTDN_RATE_CODE
BY PIDM
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDRATE2
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDRATE2.HOLDRATE.PIDM IN HOLDRATE2 TO MULTIPLE SHRTCKN.SHRTCKN.SHRTCKN_PIDM
 IN SHRTCKN AS J0
 END
TABLE FILE HOLDRATE2
PRINT
     'HOLDRATE2.HOLDRATE.LEVELCD'
     'HOLDRATE2.HOLDRATE.SFRSTCR_TERM_CODE'
     'HOLDRATE2.HOLDRATE.SGBSTDN_RATE_CODE'
BY 'HOLDRATE2.HOLDRATE.PIDM'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_TERM_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_CRN'
BY HIGHEST 1 'SHRTCKN.SHRTCKN.SHRTCKN_SEQ_NO'
HEADING
""
FOOTING
""
WHERE SHRTCKN_COLL_CODE EQ 'GS';
WHERE ( SHRTCKN_REPEAT_COURSE_IND EQ 'A' OR 'I' ) OR ( SHRTCKN_REPEAT_COURSE_IND EQ MISSING );
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDGRADE
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDGRADE.HOLDGRAD.PIDM AND HOLDGRADE.HOLDGRAD.SHRTCKN_TERM_CODE
 AND HOLDGRADE.HOLDGRAD.SHRTCKN_SEQ_NO IN HOLDGRADE TO MULTIPLE
 SHRTCKG.SHRTCKG.SHRTCKG_PIDM AND SHRTCKG.SHRTCKG.SHRTCKG_TERM_CODE
 AND SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO IN SHRTCKG AS J0
 END
TABLE FILE HOLDGRADE
PRINT
     'HOLDGRADE.HOLDGRAD.LEVELCD'
BY 'HOLDGRADE.HOLDGRAD.PIDM'
BY 'HOLDGRADE.HOLDGRAD.SHRTCKN_TERM_CODE'
BY 'SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO'
BY HIGHEST 1 'SHRTCKG.SHRTCKG.SHRTCKG_SEQ_NO'
BY 'HOLDGRADE.HOLDGRAD.SHRTCKN_CRN'
BY 'SHRTCKG.SHRTCKG.SHRTCKG_GRDE_CODE_FINAL'
BY 'HOLDGRADE.HOLDGRAD.SFRSTCR_TERM_CODE'
BY 'HOLDGRADE.HOLDGRAD.SGBSTDN_RATE_CODE'
HEADING
""
FOOTING
""
WHERE TOTAL SHRTCKG_GRDE_CODE_FINAL EQ 'C';
ON TABLE SET PAGE-NUM OFF
ON TABLE SET BYDISPLAY ON
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCRN
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDCRN.HOLDCRN.SHRTCKN_TERM_CODE AND HOLDCRN.HOLDCRN.SHRTCKN_CRN IN HOLDCRN
 TO UNIQUE SSBSECT.SSBSECT.SSBSECT_TERM_CODE AND SSBSECT.SSBSECT.SSBSECT_CRN
 IN SSBSECT AS J0
 END
TABLE FILE HOLDCRN
PRINT
     SHRTCKN_TERM_CODE
     SHRTCKG_GRDE_CODE_FINAL
     SHRTCKN_CRN
     LEVELCD
     SFRSTCR_TERM_CODE
     SGBSTDN_RATE_CODE
     SSBSECT_SUBJ_CODE
     SSBSECT_CRSE_NUMB
     SSBSECT_CRSE_TITLE
BY PIDM
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDSECT
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDSECT.HOLDSECT.SSBSECT_SUBJ_CODE AND HOLDSECT.HOLDSECT.SSBSECT_CRSE_NUMB IN
HOLDSECT TO MULTIPLE SCBCRSE.SCBCRSE.SCBCRSE_SUBJ_CODE
 AND SCBCRSE.SCBCRSE.SCBCRSE_CRSE_NUMB IN SCBCRSE AS J7
 END
DEFINE FILE HOLDSECT
CRSTITLE/A30V=IF SSBSECT_CRSE_TITLE EQ ' ' THEN SCBCRSE_TITLE ELSE SSBSECT_CRSE_TITLE;
END
TABLE FILE HOLDSECT
PRINT
     SCBCRSE_EFF_TERM
BY PIDM
BY SHRTCKN_TERM_CODE
BY SHRTCKG_GRDE_CODE_FINAL
BY SHRTCKN_CRN
BY LEVELCD
BY SFRSTCR_TERM_CODE
BY SGBSTDN_RATE_CODE
BY SSBSECT_SUBJ_CODE
BY SSBSECT_CRSE_NUMB
BY CRSTITLE
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCRSTITL
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDCRSTITL.HOLDCRST.PIDM IN HOLDCRSTITL TO MULTIPLE
 SPRADDR.SPRADDR.SPRADDR_PIDM IN SPRADDR AS J8
 END
DEFINE FILE HOLDCRSTITL
ADDRLN1/A30V MISSING ON=IF SPRADDR_ATYP_CODE EQ 'MA' THEN SPRADDR_STREET_LINE1 ELSE IF SPRADDR_ATYP_CODE EQ 'PR' THEN SPRADDR_STREET_LINE1 ELSE MISSING;
ADDRCITY/A20V MISSING ON=IF SPRADDR_ATYP_CODE EQ 'MA' THEN SPRADDR_CITY ELSE IF SPRADDR_ATYP_CODE EQ 'PR' THEN SPRADDR_CITY ELSE MISSING;
ADDRSTAT/A2V MISSING ON=IF SPRADDR_ATYP_CODE EQ 'MA' THEN SPRADDR_STAT_CODE ELSE IF SPRADDR_ATYP_CODE EQ 'PR' THEN SPRADDR_STAT_CODE ELSE MISSING;
ADDRZIP/A5V MISSING ON=IF SPRADDR_ATYP_CODE EQ 'MA' THEN SPRADDR_ZIP ELSE IF SPRADDR_ATYP_CODE EQ 'PR' THEN SPRADDR_ZIP ELSE MISSING;
TYPESORT/I2=IF SPRADDR.SPRADDR.SPRADDR_ATYP_CODE EQ 'MA' THEN 1 ELSE IF SPRADDR.SPRADDR.SPRADDR_ATYP_CODE EQ 'PR' THEN 2 ELSE 3;
END
TABLE FILE HOLDCRSTITL
SUM
     'SPRADDR.SPRADDR.SPRADDR_STREET_LINE1'
     'SPRADDR.SPRADDR.SPRADDR_STREET_LINE2'
     'SPRADDR.SPRADDR.SPRADDR_CITY'
     'SPRADDR.SPRADDR.SPRADDR_STAT_CODE'
     'SPRADDR.SPRADDR.SPRADDR_ZIP'
BY 'HOLDCRSTITL.HOLDCRST.PIDM'
BY LOWEST 1 'SPRADDR.SPRADDR.TYPESORT'
PRINT
     'HOLDCRSTITL.HOLDCRST.SGBSTDN_RATE_CODE'
     'HOLDCRSTITL.HOLDCRST.SFRSTCR_TERM_CODE'
     'HOLDCRSTITL.HOLDCRST.SHRTCKN_TERM_CODE'
     'HOLDCRSTITL.HOLDCRST.SHRTCKG_GRDE_CODE_FINAL'
     'HOLDCRSTITL.HOLDCRST.SHRTCKN_CRN'
     'HOLDCRSTITL.HOLDCRST.LEVELCD'
     'HOLDCRSTITL.HOLDCRST.SSBSECT_SUBJ_CODE'
     'HOLDCRSTITL.HOLDCRST.SSBSECT_CRSE_NUMB'
     'HOLDCRSTITL.HOLDCRST.CRSTITLE'
BY 'HOLDCRSTITL.HOLDCRST.PIDM'
BY LOWEST 1 'SPRADDR.SPRADDR.TYPESORT'
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDADDR
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE SARAPPD
PRINT
     SARAPPD_APPL_NO
BY SARAPPD_PIDM
BY SARAPPD_TERM_CODE_ENTRY
BY HIGHEST 1 SARAPPD_SEQ_NO
BY SARAPPD_APDC_CODE
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDAPP
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDAPP.HOLDAPP.SARAPPD_PIDM AND HOLDAPP.HOLDAPP.SARAPPD_TERM_CODE_ENTRY
 AND HOLDAPP.HOLDAPP.SARAPPD_APPL_NO IN HOLDAPP TO MULTIPLE
 SARADAP.SARADAP.SARADAP_PIDM AND SARADAP.SARADAP.SARADAP_TERM_CODE_ENTRY
 AND SARADAP.SARADAP.SARADAP_APPL_NO IN SARADAP AS J2
 END
TABLE FILE HOLDAPP
PRINT
     SARAPPD_APDC_CODE
     SARADAP_RATE_CODE
BY SARAPPD_PIDM
BY HIGHEST 1 SARAPPD_TERM_CODE_ENTRY
HEADING
""
FOOTING
""
WHERE SARAPPD_APDC_CODE NE '40' OR '99';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDAPP2
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDADDR.HOLDADDR.PIDM IN HOLDADDR TO UNIQUE HOLDAPP2.HOLDAPP2.SARAPPD_PIDM
 IN HOLDAPP2 AS J0
 END
TABLE FILE HOLDADDR
SUM
     'HOLDADDR.HOLDADDR.SPRADDR_STREET_LINE1'
     'HOLDADDR.HOLDADDR.SPRADDR_STREET_LINE2'
     'HOLDADDR.HOLDADDR.SPRADDR_CITY'
     'HOLDADDR.HOLDADDR.SPRADDR_STAT_CODE'
     'HOLDADDR.HOLDADDR.SPRADDR_ZIP'
BY 'HOLDADDR.HOLDADDR.PIDM'
BY 'HOLDAPP2.HOLDAPP2.SARAPPD_TERM_CODE_ENTRY'
BY 'HOLDADDR.HOLDADDR.SGBSTDN_RATE_CODE'
BY 'HOLDADDR.HOLDADDR.SFRSTCR_TERM_CODE'
BY 'HOLDADDR.HOLDADDR.SHRTCKN_TERM_CODE'
BY 'HOLDADDR.HOLDADDR.SHRTCKG_GRDE_CODE_FINAL'
BY 'HOLDADDR.HOLDADDR.SHRTCKN_CRN'
BY 'HOLDADDR.HOLDADDR.LEVELCD'
BY 'HOLDADDR.HOLDADDR.SSBSECT_SUBJ_CODE'
BY 'HOLDADDR.HOLDADDR.SSBSECT_CRSE_NUMB'
BY 'HOLDADDR.HOLDADDR.CRSTITLE'
BY 'HOLDAPP2.HOLDAPP2.SARADAP_RATE_CODE'
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDLAST
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDLAST.HOLDLAST.PIDM IN HOLDLAST TO MULTIPLE SPRIDEN.SPRIDEN.SPRIDEN_PIDM
 IN SPRIDEN AS J1
 END
DEFINE FILE HOLDLAST
STATUS/A17V MISSING ON=IF ( HOLDLAST.HOLDLAST.SARAPPD_TERM_CODE_ENTRY EQ HOLDLAST.HOLDLAST.SFRSTCR_TERM_CODE AND HOLDLAST.HOLDLAST.SGBSTDN_RATE_CODE EQ HOLDLAST.HOLDLAST.SARADAP_RATE_CODE ) THEN 'Returning Student' ELSE MISSING;
END
TABLE FILE HOLDLAST
SUM
     'HOLDLAST.HOLDLAST.CRSTITLE' AS 'Course Title'
     'HOLDLAST.HOLDLAST.SHRTCKG_GRDE_CODE_FINAL' AS 'Grade'
     'HOLDLAST.HOLDLAST.SARAPPD_TERM_CODE_ENTRY' NOPRINT
     'HOLDLAST.HOLDLAST.STATUS' AS 'Status'
BY 'SPRIDEN.SPRIDEN.SPRIDEN_LAST_NAME' AS 'Last Name'
BY 'HOLDLAST.HOLDLAST.PIDM' NOPRINT
BY 'SPRIDEN.SPRIDEN.SPRIDEN_FIRST_NAME' AS 'First Name'
BY 'SPRIDEN.SPRIDEN.SPRIDEN_ID' AS 'ID'
BY 'HOLDLAST.HOLDLAST.SGBSTDN_RATE_CODE' AS 'Program'
BY 'HOLDLAST.HOLDLAST.SPRADDR_STREET_LINE1' AS 'Address Ln 1'
BY 'HOLDLAST.HOLDLAST.SPRADDR_STREET_LINE2' AS 'Address Ln 2'
BY 'HOLDLAST.HOLDLAST.SPRADDR_CITY' AS 'City'
BY 'HOLDLAST.HOLDLAST.SPRADDR_STAT_CODE' AS 'State'
BY 'HOLDLAST.HOLDLAST.SPRADDR_ZIP' AS 'Zip'
BY 'HOLDLAST.HOLDLAST.SHRTCKN_TERM_CODE' AS 'Term Taken'
BY 'HOLDLAST.HOLDLAST.SSBSECT_SUBJ_CODE' AS ''
BY 'HOLDLAST.HOLDLAST.SSBSECT_CRSE_NUMB' AS ''
HEADING
"Academic Dismissal - More than 6 hours with Grade of 'C'"
"Term: <SFRSTCR_TERM_CODE  "
" "
FOOTING
" "
"st_prob_dismiss_6hrsC_ajn"
"Run: <+0>&DATEMDYY <+0> "
WHERE SPRIDEN_CHANGE_IND IS MISSING;
WHERE HOLDLAST.HOLDLAST.SFRSTCR_TERM_CODE EQ '&TERM.TERM.';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT EXL2K OPEN
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
     TITLETEXT='Report 1',
     GRID=OFF,
     FONT='ARIAL',
     SIZE=9,
     RIGHTGAP=0.125000,
     JUSTIFY=CENTER,
$
END

Program 2

SET ASNAMES = ON
TABLE FILE SFRSTCR
BY SFRSTCR_PIDM AS 'PIDM'
BY HIGHEST 1 SFRSTCR_TERM_CODE
BY SFRSTCR_LEVL_CODE AS 'LEVELCD'
HEADING
""
FOOTING
""
WHERE SFRSTCR_RSTS_CODE EQ 'RE';
WHERE TOTAL SFRSTCR_LEVL_CODE EQ 'GR';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDREG
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE SGBSTDN
PRINT
     SGBSTDN_LEVL_CODE AS 'LEVELCD'
     SGBSTDN_RATE_CODE
     SGBSTDN_ASTD_CODE
BY SGBSTDN_PIDM AS 'PIDM'
BY HIGHEST 1 SGBSTDN_TERM_CODE_EFF
HEADING
""
FOOTING
""
WHERE SGBSTDN_ASTD_CODE EQ 'FP' OR 'AP' OR 'PR' OR 'PC';
WHERE SGBSTDN_COLL_CODE_1 EQ 'GS';
WHERE SGBSTDN_STST_CODE EQ 'AS';
WHERE TOTAL SGBSTDN_RATE_CODE NOT LIKE 'WSK%';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDFAIL
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
MATCH FILE HOLDFAIL
  PRINT SGBSTDN_TERM_CODE_EFF SGBSTDN_RATE_CODE SGBSTDN_ASTD_CODE
  BY PIDM
  BY LEVELCD
RUN
FILE HOLDREG
  PRINT SFRSTCR_TERM_CODE
  BY PIDM
  BY LEVELCD
AFTER MATCH HOLD OLD-AND-NEW
END
TABLE FILE SHRLGPA
PRINT
     SHRLGPA_GPA
     SHRLGPA_LEVL_CODE
     SHRLGPA_GPA_TYPE_IND
BY SHRLGPA_PIDM
HEADING
""
FOOTING
""
WHERE SHRLGPA_LEVL_CODE EQ 'GR';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDGPAI
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
DEFINE FILE HOLDGPAI
GPAI/P25.2 MISSING ON=IF SHRLGPA_GPA_TYPE_IND EQ 'I' THEN SHRLGPA_GPA ELSE MISSING;
END
TABLE FILE HOLDGPAI
PRINT
     GPAI
BY SHRLGPA_PIDM AS 'PIDM'
BY SHRLGPA_LEVL_CODE AS 'LEVELCD'
HEADING
""
FOOTING
""
WHERE TOTAL ( GPAI LT 3.0 ) AND ( GPAI NE 0 );
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDGPAI2
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
MATCH FILE HOLD
  PRINT SGBSTDN_TERM_CODE_EFF SGBSTDN_RATE_CODE SFRSTCR_TERM_CODE SGBSTDN_ASTD_CODE
  BY PIDM
  BY LEVELCD
RUN
FILE HOLDGPAI2
  BY PIDM
  BY LEVELCD
AFTER MATCH HOLD AS HOLD2 OLD-NOT-NEW
END
TABLE FILE SHRTCKN
PRINT
     'SHRTCKN.SHRTCKN.SHRTCKN_CRN'
     'SHRTCKN.SHRTCKN.SHRTCKN_SUBJ_CODE'
     'SHRTCKN.SHRTCKN.SHRTCKN_CRSE_NUMB'
     'SHRTCKN.SHRTCKN.SHRTCKN_COLL_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_PIDM'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_TERM_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_CRN'
BY HIGHEST 1 'SHRTCKN.SHRTCKN.SHRTCKN_SEQ_NO'
HEADING
""
FOOTING
""
WHERE SHRTCKN_COLL_CODE EQ 'GS';
WHERE ( SHRTCKN_REPEAT_COURSE_IND EQ 'A' OR 'I' ) OR ( SHRTCKN_REPEAT_COURSE_IND EQ MISSING );
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCKN2
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDCKN2.HOLDCKN2.SHRTCKN_PIDM AND HOLDCKN2.HOLDCKN2.SHRTCKN_TERM_CODE
 AND HOLDCKN2.HOLDCKN2.SHRTCKN_SEQ_NO IN HOLDCKN2 TO MULTIPLE
 SHRTCKG.SHRTCKG.SHRTCKG_PIDM AND SHRTCKG.SHRTCKG.SHRTCKG_TERM_CODE
 AND SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO IN SHRTCKG AS J0
 END
TABLE FILE HOLDCKN2
PRINT
     'SHRTCKG.SHRTCKG.SHRTCKG_GRDE_CODE_FINAL'
     'SHRTCKG.SHRTCKG.SHRTCKG_CREDIT_HOURS'
     COMPUTE GRADEDF/A6V MISSING ON = IF SHRTCKG_GRDE_CODE_FINAL EQ 'D' THEN SHRTCKG_GRDE_CODE_FINAL ELSE IF SHRTCKG_GRDE_CODE_FINAL EQ 'F' THEN SHRTCKG_GRDE_CODE_FINAL ELSE MISSING;
BY 'HOLDCKN2.HOLDCKN2.SHRTCKN_PIDM'
BY 'HOLDCKN2.HOLDCKN2.SHRTCKN_TERM_CODE'
BY 'SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO'
BY HIGHEST 1 'SHRTCKG.SHRTCKG.SHRTCKG_SEQ_NO'
BY 'HOLDCKN2.HOLDCKN2.RNK.SHRTCKN_SEQ_NO'
BY 'HOLDCKN2.HOLDCKN2.SHRTCKN_CRN'
BY 'HOLDCKN2.HOLDCKN2.SHRTCKN_SUBJ_CODE'
BY 'HOLDCKN2.HOLDCKN2.SHRTCKN_CRSE_NUMB'
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDDISDF
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
DEFINE FILE HOLDDISDF
DISDF/P9.3=IF SHRTCKG_GRDE_CODE_FINAL EQ 'D' THEN 1 ELSE IF SHRTCKG_GRDE_CODE_FINAL EQ 'F' THEN 1 ELSE 0;
END
TABLE FILE HOLDDISDF
PRINT
     SHRTCKN_CRN
     SHRTCKN_SUBJ_CODE
     SHRTCKN_CRSE_NUMB
     SHRTCKG_GRDE_CODE_FINAL
     SHRTCKG_CREDIT_HOURS
     GRADEDF
     DISDF
BY SHRTCKN_PIDM
BY SHRTCKN_TERM_CODE
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDDISDF2
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE HOLDDISDF2
SUM
     DISDF
BY SHRTCKN_PIDM AS 'PIDM'
HEADING
""
FOOTING
""
WHERE TOTAL DISDF GE 2;
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDDISDF3
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
MATCH FILE HOLD2
  PRINT HOLD2.HOLD2.SGBSTDN_TERM_CODE_EFF HOLD2.HOLD2.SGBSTDN_RATE_CODE HOLD2.HOLD2.SFRSTCR_TERM_CODE HOLD2.HOLD2.SGBSTDN_ASTD_CODE HOLD2.HOLD2.LEVELCD
  BY HOLD2.HOLD2.PIDM
RUN
FILE HOLDDISDF3
  PRINT HOLDDISDF3.HOLDDISD.DISDF
  BY HOLDDISDF3.HOLDDISD.PIDM
AFTER MATCH HOLD AS HOLD3 OLD-NOT-NEW
END
TABLE FILE SHRTCKN
PRINT
     'SHRTCKN.SHRTCKN.SHRTCKN_COLL_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_PIDM'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_TERM_CODE'
BY 'SHRTCKN.SHRTCKN.SHRTCKN_CRN'
BY HIGHEST 1 'SHRTCKN.SHRTCKN.SHRTCKN_SEQ_NO'
HEADING
""
FOOTING
""
WHERE SHRTCKN_COLL_CODE EQ 'GS';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCKN
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDCKN.HOLDCKN.SHRTCKN_PIDM AND HOLDCKN.HOLDCKN.SHRTCKN_TERM_CODE
 AND HOLDCKN.HOLDCKN.SHRTCKN_SEQ_NO IN HOLDCKN TO MULTIPLE
 SHRTCKG.SHRTCKG.SHRTCKG_PIDM AND SHRTCKG.SHRTCKG.SHRTCKG_TERM_CODE
 AND SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO IN SHRTCKG AS J0
 END
DEFINE FILE HOLDCKN
GRADEC/P9.3 MISSING ON=IF SHRTCKG_GRDE_CODE_FINAL EQ 'C' THEN SHRTCKG_CREDIT_HOURS ELSE MISSING;
END
TABLE FILE HOLDCKN
PRINT
     'SHRTCKG.SHRTCKG.GRADEC'
     'SHRTCKG.SHRTCKG.SHRTCKG_GRDE_CODE_FINAL'
     'SHRTCKG.SHRTCKG.SHRTCKG_CREDIT_HOURS'
     'HOLDCKN.HOLDCKN.SHRTCKN_COLL_CODE'
BY 'HOLDCKN.HOLDCKN.SHRTCKN_PIDM'
BY 'HOLDCKN.HOLDCKN.SHRTCKN_TERM_CODE'
BY 'SHRTCKG.SHRTCKG.SHRTCKG_TCKN_SEQ_NO'
BY HIGHEST 1 'SHRTCKG.SHRTCKG.SHRTCKG_SEQ_NO'
BY 'HOLDCKN.HOLDCKN.RNK.SHRTCKN_SEQ_NO' NOPRINT
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDCKG
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE HOLDCKG
SUM
     GRADEC
BY SHRTCKN_PIDM AS 'PIDM'
HEADING
""
FOOTING
""
WHERE TOTAL GRADEC GE 6;
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDDISC
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
MATCH FILE HOLD3
  PRINT HOLD3.HOLD3.SGBSTDN_TERM_CODE_EFF HOLD3.HOLD3.SGBSTDN_RATE_CODE HOLD3.HOLD3.SFRSTCR_TERM_CODE HOLD3.HOLD3.SGBSTDN_ASTD_CODE HOLD3.HOLD3.DISDF HOLD3.HOLD3.LEVELCD
  BY HOLD3.HOLD3.PIDM
RUN
FILE HOLDDISC
  PRINT HOLDDISC.HOLDDISC.GRADEC
  BY HOLDDISC.HOLDDISC.PIDM
AFTER MATCH HOLD AS HOLD4 OLD-NOT-NEW
END
JOIN
 HOLD4.HOLD4.PIDM IN HOLD4 TO MULTIPLE SPRADDR.SPRADDR.SPRADDR_PIDM IN SPRADDR
 AS J3
 END
DEFINE FILE HOLD4
TYPESORT/I2=IF SPRADDR.SPRADDR.SPRADDR_ATYP_CODE EQ 'MA' THEN 1 ELSE IF SPRADDR.SPRADDR.SPRADDR_ATYP_CODE EQ 'PR' THEN 2 ELSE 3;
END
TABLE FILE HOLD4
PRINT
     'SPRADDR.SPRADDR.SPRADDR_STREET_LINE1'
     'SPRADDR.SPRADDR.SPRADDR_STREET_LINE2'
     'SPRADDR.SPRADDR.SPRADDR_CITY'
     'SPRADDR.SPRADDR.SPRADDR_STAT_CODE'
     'SPRADDR.SPRADDR.SPRADDR_ZIP'
     'HOLD4.HOLD4.SGBSTDN_RATE_CODE'
     'HOLD4.HOLD4.SFRSTCR_TERM_CODE'
     'HOLD4.HOLD4.SGBSTDN_ASTD_CODE'
BY 'HOLD4.HOLD4.PIDM'
BY LOWEST 1 'SPRADDR.SPRADDR.TYPESORT'
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDADDR
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE SARAPPD
PRINT
     SARAPPD_APPL_NO
BY SARAPPD_PIDM
BY SARAPPD_TERM_CODE_ENTRY
BY HIGHEST 1 SARAPPD_SEQ_NO
BY SARAPPD_APDC_CODE
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDAPP
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDAPP.HOLDAPP.SARAPPD_PIDM AND HOLDAPP.HOLDAPP.SARAPPD_TERM_CODE_ENTRY
 AND HOLDAPP.HOLDAPP.SARAPPD_APPL_NO IN HOLDAPP TO MULTIPLE
 SARADAP.SARADAP.SARADAP_PIDM AND SARADAP.SARADAP.SARADAP_TERM_CODE_ENTRY
 AND SARADAP.SARADAP.SARADAP_APPL_NO IN SARADAP AS J2
 END
TABLE FILE HOLDAPP
PRINT
     SARADAP_RATE_CODE
     SARAPPD_APDC_CODE
     SARAPPD_APDC_CODE
     SARADAP_RATE_CODE
BY SARAPPD_PIDM
BY HIGHEST 1 SARAPPD_TERM_CODE_ENTRY
HEADING
""
FOOTING
""
WHERE SARAPPD_APDC_CODE NE '40' OR '99';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDAPP2
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
TABLE FILE SHRLGPA
PRINT
     'SHRLGPA.SHRLGPA.SHRLGPA_GPA_HOURS'
BY 'SHRLGPA.SHRLGPA.SHRLGPA_PIDM'
HEADING
""
FOOTING
""
WHERE SHRLGPA.SHRLGPA.SHRLGPA_LEVL_CODE EQ 'GR';
WHERE SHRLGPA.SHRLGPA.SHRLGPA_GPA_TYPE_IND EQ 'I';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDPROV
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDADDR.HOLDADDR.PIDM IN HOLDADDR TO UNIQUE HOLDAPP2.HOLDAPP2.SARAPPD_PIDM
 IN HOLDAPP2 AS J0
 END
JOIN
 HOLDADDR.HOLDADDR.PIDM IN HOLDADDR TO UNIQUE HOLDPROV.HOLDPROV.SHRLGPA_PIDM
 IN HOLDPROV AS J1
 END
TABLE FILE HOLDADDR
SUM
     'HOLDADDR.HOLDADDR.SPRADDR_STREET_LINE1'
     'HOLDADDR.HOLDADDR.SPRADDR_STREET_LINE2'
     'HOLDADDR.HOLDADDR.SPRADDR_CITY'
     'HOLDADDR.HOLDADDR.SPRADDR_STAT_CODE'
     'HOLDADDR.HOLDADDR.SPRADDR_ZIP'
BY 'HOLDADDR.HOLDADDR.PIDM'
BY 'HOLDPROV.HOLDPROV.SHRLGPA_GPA_HOURS'
BY 'HOLDADDR.HOLDADDR.SGBSTDN_RATE_CODE'
BY 'HOLDADDR.HOLDADDR.SFRSTCR_TERM_CODE'
BY 'HOLDAPP2.HOLDAPP2.SARAPPD_TERM_CODE_ENTRY'
BY 'HOLDADDR.HOLDADDR.SGBSTDN_ASTD_CODE'
BY 'HOLDAPP2.HOLDAPP2.SARADAP_RATE_CODE'
HEADING
""
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDLAST
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END
JOIN
 HOLDLAST.HOLDLAST.PIDM IN HOLDLAST TO MULTIPLE SPRIDEN.SPRIDEN.SPRIDEN_PIDM
 IN SPRIDEN AS J0
 END
DEFINE FILE HOLDLAST
STATUS/A17V MISSING ON=IF ( HOLDLAST.HOLDLAST.SARAPPD_TERM_CODE_ENTRY EQ HOLDLAST.HOLDLAST.SFRSTCR_TERM_CODE AND HOLDLAST.HOLDLAST.SGBSTDN_RATE_CODE EQ HOLDLAST.HOLDLAST.SARADAP_RATE_CODE ) THEN 'Returning Student' ELSE MISSING;
HRSERN/P25.2 MISSING ON=IF HOLDLAST.HOLDLAST.SGBSTDN_ASTD_CODE EQ 'AP' THEN HOLDLAST.HOLDLAST.SHRLGPA_GPA_HOURS ELSE MISSING;
END
TABLE FILE HOLDLAST
SUM
     'HOLDLAST.HOLDLAST.SPRADDR_STREET_LINE1' AS 'Address Ln 1'
     'HOLDLAST.HOLDLAST.SPRADDR_STREET_LINE2' AS 'Address Ln 2'
     'HOLDLAST.HOLDLAST.SPRADDR_CITY' AS 'City'
     'HOLDLAST.HOLDLAST.SPRADDR_STAT_CODE' AS 'State'
     'HOLDLAST.HOLDLAST.SPRADDR_ZIP' AS 'Zip'
     'HOLDLAST.HOLDLAST.STATUS' AS 'Status'
     'HOLDLAST.HOLDLAST.HRSERN' AS 'GRAD Hrs Ern '
     'HOLDLAST.HOLDLAST.SARAPPD_TERM_CODE_ENTRY' NOPRINT
BY 'SPRIDEN.SPRIDEN.SPRIDEN_LAST_NAME' AS 'Last Name'
BY 'HOLDLAST.HOLDLAST.PIDM' NOPRINT
BY 'SPRIDEN.SPRIDEN.SPRIDEN_FIRST_NAME' AS 'First Name'
BY 'SPRIDEN.SPRIDEN.SPRIDEN_ID' AS 'ID'
BY 'HOLDLAST.HOLDLAST.SGBSTDN_RATE_CODE' AS 'Program'
BY 'HOLDLAST.HOLDLAST.SGBSTDN_ASTD_CODE' AS 'Probation Code'
HEADING
"Students Needing Removed from Probation Status"
"Term: <SFRSTCR_TERM_CODE "
" "
FOOTING
" "
"st_prob_dismiss_3.0_grad_ajn"
"Run: <+0>&DATEMDYY <+0> "
WHERE SPRIDEN_CHANGE_IND IS MISSING;
WHERE SFRSTCR_TERM_CODE EQ '&TERM.TERM.';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT EXL2K CLOSE
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
END

Main FEX

-INCLUDE app/st_prob_dismiss_6hrsc_ajn1.fex
-INCLUDE app/st_prob_dismissal_remove_from_ajn.fex  

OUTPUT

(BEFORE TOTAL TESTS)
 (FOC003) THE FIELDNAME IS NOT RECOGNIZED: SGBSTDN_TERM_CODE_EFF
 BYPASSING TO END OF COMMAND
 (FOC009) INCOMPLETE REQUEST STATEMENT
 (FOC3298) ERROR FOUND IN A COMPOUND REPORT
 Compound Report is TERMINATING.....

Its a lot of information, sorry. Imagine 5 of these reports!

A lot of information might give you a lot of comments.

If I look at the first part of your code I see a lot of things that may give you problems.

your holdfiles seems to be flat files, your joins will give many problems.
change them to focus files with index.
but also focus files can only be joined together with one field.

if you are including files in fact you have one big fex.
your labels (goto) get confused , your joins too