$ SET NOON $! BUILD PCC ON VMS WITH DTR INTERFACE DUMMIED $! USE THIS file to build AnalytiCalc on VMS where you don't have $! Datatrieve-32 to link to. The string functions will be real but $! the DTR calls will be dummied out, though they will be treated $! as syntactically valid. Use PCCMAKIVD.COM for AnalytiCalc where $! you DO have DTR-32 and want to link to it. $! NOTE WE ASSUME NO OBJECT FILES EXIST ALREADY. $! BUILD FOR VAX ANALYTICALC INCLUDING DATATRIEVE $! INTERFACE (THE REAL ONE). $! THIS VERSION ALLOWS PRINT LINES OF 512 CHARACTERS. $ COPY BVKLUGPR5.FOR VKLUGPRM.FTN $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK AT.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK BASCNG.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK BLOCK.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK CALBIN.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK CALC.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK CALUN.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK/D_LINES CMDMUN.FVX $ FORTRAN/NOF77/NODEBUG/D_LINES/NOI4/NOLIST/NOCHECK CMND.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK CODES.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK CONTYP.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK DECLR.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK DSPSHT.FVX $! HERE'S WHERE WE PULL IN REAL DTR FUNCTIONS. $ FORTRAN/F77/NODEBUG/NOI4/NOLIST/NOCHECK DTRIF.FVD $! USE DTRIF.FVD IF DTR IS MISSING. $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK ERRCX.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK ERRMSG.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK FLIP.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK FFT.FTN $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK FRMEDT.F40 $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK GETNNB.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK GMSUBS.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK GTMUNG.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK INDEX.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK INPOST.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK JULIAN.F40 $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK LINFIT.FTN $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK LIST.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MDET.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MOUT.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK REFLECT.F40 $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MTXEQU.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MULADD.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MULCON.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MULDIV.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK MULMUL.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK NEXTEL.F40 $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK POSTVL.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK RECALC.F40 $ FORTRAN/NOF77/NODEBUG/I4/NOLIST/NOCHECK RND.FOR $ FORTRAN/NODEBUG/NOI4/NOLIST/NOCHECK SCIFCT.FTN $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK SLEND.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK SPREDSHT.FVV $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK STRCMP.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK TTYINI.FVV $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK USRCMD.FVX $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK USRFCT.FVX $! USE SCREEN INDEPENDENT CURSOR CONTROL VERSION OF UVT100 ROUTINE $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK SCRIND.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK VAROUT.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK VARSCN.FOR $! WRKFIL.F40 DOES NOT SUPPORT INPUT/OUTPUT AREAS BUT $! IS OTHERWISE CURRENT. WRKFIL.FVX HAS ALL NEW STUFF FOR $! VAX. $! NOTE NEEED THE /I4 COMPILE $! TO BE SURE WE DON'T OVERFLOW ARRAY BOUNDS. SOME BIG $! SUBSCRIPTS ARE MORE THAN 16 BITS WIDE. $ FORTRAN/NOF77/NODEBUG/I4/NOLIST/NOCHECK WRKFIL.FVX $! FORTRAN/NOF77/NODEBUG/I4/NOLIST/NOCHECK WRKFIL.F40 $! WSHEET.FVX IS CURRENT EXCEPT FOR NO IN/OUT AREA SUPPORT $! USE WSHEET.F4 FOR MOST RECENT... $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK WSHEET.F4 $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK XQTCMD.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK ZERO.FOR $ FORTRAN/NOF77/NODEBUG/NOI4/NOLIST/NOCHECK ZNEG.FOR $ COPY *.OBJ PCCX.OBS $! NOW LINK WITH DTR STUFF $ LINK/NOMAP PCCX.OBS $! USES DTR.OPT HERE ALSO... $ LIBR/CREA PCCX PCCX.OBS $ DEL *.OBS; $ DEL *.OBJ;*