$!----------------------------------------------------------------------------- $! BUILD_REPORTERROR.COM $! $! P1 == LINK or BUILD or empty (builds) $! $! 28-OCT-2000 MGD initial re-development $!----------------------------------------------------------------------------- $! $ ON CONTROLY THEN EXIT 44 $! $ @WASD_ROOT:[SRC]ARCHER.COM "REPORTERROR" $! $ DEFINES = " /DEFINE=(__VMS_VER=70000000," +- "__CRTL_VER=70000000,CGILIB_OBJECT_MODULE)" $ INCLUDES = " /INCLUDE=[SRC.MISC]" $ WARNINGS= " /WARNING=(DISABLE=(PREOPTW,IMPLICITFUNC))" $ CC_OPTIONS = "/DECC /OPTIMIZE /STAND=RELAXED_ANSI /PREFIX=ALL" +- INCLUDES + DEFINES + WARNINGS $! $ IF P1 .EQS. "" .OR. P1 .EQS. "BUILD" .OR. P1 .EQS. "COMPILE" $ THEN $ SET NOON $ SET VERIFY $ CC 'CC_OPTIONS' /OBJECT='WASD_OBJ_DIR' REPORTERROR $! 'F$VERIFY(0) $ SET ON $ ENDIF $! $ IF P1 .EQS. "" .OR. P1 .EQS. "BUILD" .OR. P1 .EQS. "LINK" $ THEN $ CGILIB_OLB = "WASD_ROOT:[SRC.MISC.OBJ_''WASD_ARCH_NAME']CGILIB.OLB" $ SET NOON $ SET VERIFY $ LINK /EXECUTABLE=WASD_EXE:REPORTERROR.EXE - 'WASD_OBJ_DIR'REPORTERROR,'CGILIB_OLB'/LIBRARY $! 'F$VERIFY(0) $ SET ON $ ENDIF $ PURGE /NOLOG 'WASD_OBJ_DIR' $! $!-----------------------------------------------------------------------------