BBD120 Extract

This FOCUS program extracts entries where the subcode begins with the desired number (in this case four {4}) from the SIS BBD120 report (Z$PRT:BBD120RPT.PRT) and produces a similar abbreviated list. Of course the selection criteria can be modified as desired. You can use the FOCBAT routine in ZSS (@ZS$COM:FOCBAT.COM) to run this program.