* * 01450071 * 28Apr95 U051 LDW - Add 3490 support, including extended length * 01460071 * cartridges * 01470071 * * 01480069 * 23Oct92 U050 LDW - Don't skip RDJFCB when SYSIN present because * 01490070 * the zero DSN makes ACF2 unhappy * 01500070 * - Fix INIT to return correctly (through SUBEXIT) * 01510070 * when SYSIN present * 01520070 * - Change to "SCALL" subroutines: FMT$DATE, * 01530070 * NEWPAGE1, NEWPAGE2, TAPIO * 01540070 * - Create subroutines out of in-line code: * 01550070 * NEWTAPE, SL$ATTR, EOV$INFO * 01560070 * - Fix bugs in stack overflow print routine * 01570070 * - Add MAXERR= parm * 01580070 * - Abort after too many tape I/O errors (MAXERR=) * 01590070 * - Change MAXBLKSI and LASTSIZE from H to F * 01600070 * - Correct various length calculation errors * 01610070 * (also fixes problems on CHECK line) * 01620070 * - Print correct lengths for IDRC files * 01630070 * - Print overall IDRC compression value * 01640070 * - Add a filesize column which gives file size in * 01650070 * KBytes or MBytes * 01660070 * - To make room for the above, "Unloaded by/for" * 01670070 * changed to "Reload format" and shortened * 01680070 * from 9 to 8 chars, and columns squeezed * 01690070 * together by removing extra blanks after DSN, * 01700070 * PSWD, LRECL, BLKSIZE, DEN, LENGTH, CUMLEN * 01710070 * - Insert extra 4 columns for 10 character BLKCNT * 01720070 * - Print line field order changed to move most * 01730070 * interesting fields to first 80 characters * 01740070 * - Add PARM=DEBUG to try to locate length calc * 01750070 * errors * 01760070 * - Minor cleanup of PUT to SYSPRINT/SYSPRNT2 code * 01770070 * (PUTI macro created for indirect DCB addr) * 01780070 * - Fix some leftover hardcoded linecount tests * 01790070 * - Shift 3 character density left for NL like SL * 01800070 * (so it will line up with PARM=CHECK) * 01810070 * - Slight format change in FDR & DSS "unloaded by" * 01820070 * line * 01830070 * - Fix DF/DSS recognition code, including much * 01840070 * cleanup and rearrangement of CSL's junk * 01850070 * (Note: this may break it for DF/DSS < 2.5, * 01860070 * but I have no way to test it therefore don't * 01870070 * care.) * 01880070 * - Fix DF/DSS bitmap code to support devices with * 01890070 * more than 32K tracks * 01900070 * - Various other bug fixes in DF/DSS support * 01910070 * - Move common code from FDR2 & DSS2 to FMT$DSCB * 01920070 * (CSL never should have duplicated it) * 01930070 * - Change hardcoded offsets in FMT$DSCB to use * 01940070 * field names from IECSDSL1 * 01950070 * - Move common code from TEST$DSS & DSS2NEWV to * 01960070 * DSS$SAVE and DSS$BLK2 (CSL apparently * 01970070 * doesn't know what a subroutine is) * 01980070 * - Fix initial clear of OUTBUFF2 * 01990070 * - Remove third base (R8) from main program * 02000070 * * 02010070 * 03Feb92 U049 LDW - Avoid "logic error" message for empty IEHMOVE * 02020069 * unloaded files * 02030069 * * 02040068 * 23Dec90 U048 LDW - Display 4 digit years for tape labels * 02050068 * (PSWD field changed to 1 character wide, * 02060068 * other slight field movement/resizing) * 02070068 * * 02080067 * 09Oct90 U047 LDW - Remove some U046 updates which broke NL support * 02090067 * * 02100066 * 14Aug90 U046 LDW - Update DEVTABX from V50E FDRDEVTB * 02110066 * - Correct (?) 3480 tapemark length * 02120066 * - Show cartridge lengths in percent * 02130066 * - Improve the "wrong volume mounted" message * 02140066 * - Fix more U034 errors * 02150066 * - More corrections to "CHECK" tape length calc * 02160066 * - Another fix like U045 * 02170066 * - Fix bug that caused "CHECK" line to not be * 02180066 * printed for a file with EOV2 label * 02190066 * - Miscellenaneous minor cleanup * 02200066 * * 02210065 * 25Jul90 U045 EMS - Fix S0C1 caused by bad U032/U033 refit * 02220065 * * 02230064 * 06Jun90 U044 LDW - Fix bug in DEVTABX for 3380K (caused S0C9s) * 02240064 * - Add 3390 to DEVTABX (sort of... need to know * 02250064 * what the FDR "device type character" is) * 02260064 * * 02270062 * 19Feb89 U043 LDW - Implement save area stack to allow program * 02280062 * growth * 02290062 * - Move LCTR to work area to free a register * 02300062 * * 02310061 * 19Feb89 U042 LDW - Fix bugs in rewritten CONVUFDR * 02320061 * * 02330060 * 26Jan89 U041 LDW - Don't expand invalid density character * 02340060 * * 02350059 * 12Jan89 U040 LDW - Fix bugs in new method of tracking density * 02360059 * * 02370058 * 01Jan89 U039 LDW - New device type table (basically UCLA/OAC's * 02380058 * CS02046 fix) * 02390058 * * 02400058 * 01Jan89 U038 LDW - Pick up UCLA/OAC's fix CS02199 for disks with * 02410058 * > X'7FFF' tracks (3380K) * 02420058 * * 02430055 * 30Dec88 U037 LDW - Pick up MAS's fix for FDR dump tapes with * 02440057 * blocks with no DSCBs * 02450057 * - Update copyright to disallow distribution of * 02460057 * versions modified by anyone other than LDW * 02470057 * - Change some stuff to mixed case (not marked) * 02480057 * - Change HEADER1 and HEADER2 * 02490057 * - 3480 support * 02500057 * - Fix bug in conditional assembly so that the * 02510057 * TESTAUTH code for setting BLP gets * 02520057 * assembled for MVS * 02530057 * * 02540057 * 12Jan88 U036 EMS - Fix not resetting counters on null file * 02550056 * * 02560056 * 28FEB87 U035 SDM - REFIT U033/U034 BACK ONTO U032 BASE * 02570055 * * 02580053 * 28MAR86 U034 CSL - ADD SUPPORT FOR DF/DSS @ 1.2.1 LEVEL * 02590054 * U033 CSL - ADJUSTED FDR SUPPORT FOR V4.8 AND LATER * 02600054 * - CORRECTED MISC ERRORS IN FDR DSNAME LISTING * 02610053 * * 02620048 * 06JUL85 U032 EMS - UPDATE FOR NEW VERSION OF FDR (4.8) * 02630050 * - HANDLE BLOCKSIZES > 32K (NOW UP TO 64K) * 02640048 * - CREATE MACRO FOR PARMTABLE ENTRIES * 02650048 * - FIX FOR BLANK FIELDS IN LABELS * 02660050 * - FIX CHECK FOR NL FDR TAPES * 02670050 * - DETECT FDR/ABR TAPES AS DIFFERENT FROM FDR * 02680050 * - CHECK FOR VOL RECORDS 80 BYTES LONG * 02690050 * * 02700041 *---------------------------------------------------------------------* 02710057