File Archive

 
Output of file : EXAMPLE.BAT contained in archive : PAR233.ZIP

@ECHO OFF
ECHO OFF

REM %1 Example number
REM %2 [P]lain or [T]race menu

IF (%2) == () START
IF EXIST POM.TRC DEL POM.TRC

:MAIN
GO-MENU EXAMPLE%2.MNU 01%1 GO-MENU.SAV
IF ERRORLEVEL 10 GOTO QUIT
IF ERRORLEVEL 6 GOTO TRACE
IF ERRORLEVEL 5 GOTO OUTPUT
IF ERRORLEVEL 4 GOTO RUN
IF ERRORLEVEL 3 GOTO POMFILE
IF ERRORLEVEL 2 GOTO INPUT
IF ERRORLEVEL 1 GOTO DOCU

:TRACE
IF EXIST POM.TRC GOTO EOCKTRC
CLS
ECHO ÞßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÝ
ECHO Þ Ý
ECHO Þ The file POM.TRC was not found. There are two possible reasons for this: Ý
ECHO Þ Ý
ECHO Þ (1) You have not yet run the parsing job. Ý
ECHO Þ Ý
ECHO Þ (2) You do not have enough DOS environment space. Ý
ECHO Þ For details, look up the SET command in your DOS manual. Ý
ECHO Þ Ý
ECHO ÞÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÝ
ECHO ÿ
PAUSE
GOTO MAIN
:EOCKTRC
CALL VIEW POM.TRC
GOTO MAIN

:OUTPUT
IF EXIST EXAMPLE%1.LST GOTO EOCKLST
CLS
ECHO ÞßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÝ
ECHO Þ Ý
ECHO Þ You have to run the parsing job before you can view the output. Ý
ECHO Þ Ý
ECHO ÞÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÝ
ECHO ÿ
PAUSE
GOTO MAIN
:EOCKLST
CALL VIEW EXAMPLE%1.LST
GOTO MAIN

:RUN
IF (%1) == (3) SET POM=HDRCNTR/TEST
IF (%1) == (4) SET POM=descrip/price
POM EXAMPLE%1.POM EXAMPLE%1.TXT EXAMPLE%1.LST
SET POM=
IF ERRORLEVEL 1 PAUSE
GOTO MAIN
:POMFILE
CALL VIEW EXAMPLE%1.POM
GOTO MAIN

:INPUT
CALL VIEW EXAMPLE%1.TXT
GOTO MAIN

:DOCU
CALL VIEW EXAMPLE%1.INF
GOTO MAIN

:QUIT
START @ EXAMPLES