home *** CD-ROM | disk | FTP | other *** search
- rem PACKAGE2.BAT version 1.01
- rem Copyright (C) 1990, CADAM, INC.
- rem
- if exist PCADNETS.ERR copy PACKAGE.LOG/B +PCADNETS.ERR >NUL
- if exist PCLINK.LOG copy PACKAGE.LOG/B +PCLINK.LOG >NUL
- if not exist PCLINK.LOG copy PACKAGE.LOG/B +PCADLINK.LOG >NUL
- if not exist %1.XNL SHOWERR PACKAGE.LOG -Q
- if not exist %1.XNL goto :EXIT
- rem ===================================================================
- rem ----------------- Package & Generate ASCII Netlist --------------
- rem ===================================================================
- if exist %1.UPD del %1.UPD
- echo Packaging %1
- if exist %1.NCF NETLIST %1.XNL -C %1.NCF >NETLIST.TMP
- if not exist %1.NCF NETLIST %1.XNL >NETLIST.TMP
- copy PACKAGE.LOG/B + NETLIST.LOG >NUL
- rem if hard error from NETLIST, exit; if warning, use SHOWERR & let user decide
- if ERRORLEVEL 2 echo Error while packaging; check PACKAGE.LOG for specifics.
- if ERRORLEVEL 2 goto :EXIT
- if not ERRORLEVEL 1 goto :BACKANNO
- SHOWERR PACKAGE.LOG
- if ERRORLEVEL 1 goto :EXIT
- :BACKANNO
- rem ===================================================================
- rem -------------------------- Back Annotation ----------------------
- rem ===================================================================
- if not exist %1.UPD goto :NoUPD
- if exist BA.LOG del BA.LOG
- echo Back annotating schematics
- PCUPD %1.UPD BA.LOG >UPD.TMP
- copy PACKAGE.LOG/B +BA.LOG
- echo Schematic sheets changed:
- find "%% SAVE " <%1.UPD
- :NoUPD
- echo .
- echo Packaging schematics complete
- rem ===================================================================
- SHOWERR PACKAGE.LOG -Q
- :EXIT
- echo .