中国DOS联盟

@ECHO OFF

REM
REM NOME FILE :FL440.BAT
REM TIPO FILE :BATCH FILE
REM AUTORE :Luigi Pescosolido
REM DATA :aprile 1994
REM COMMENTO :Crea l'enviroment per lo sviluppo di un'applicazione
REM con USDATA Factory Link IV.
REM Inserire come parametro il nome dell'applicazione
REM (non l'intero path che per default ?predefinito).
REM NOTE :Aggiunte le seguenti variabili di ambiente per uso interno:
REM FL_PATH - Vecchio path
REM FL_ON - Identifica se path per factory link gi?settato
REM FL_APP - Nome applicazione
REM

IF NOT "%1"=="" GOTO YES_APP

IF "%FL_ON%"=="OK" GOTO OLD_APP

ECHO.
ECHO 谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO ?Factory Link 4.4.0 enviroment configuration ?
ECHO ? Usage : FL "application" ?
ECHO ? ?
ECHO ?where "application" is just the name of the ?
ECHO ? application NOT the entire path ! ?
ECHO 滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO.

PAUSE

GOTO END

:OLD_APP

ECHO 谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO ? no new Factory Link application specified ?
ECHO 滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO.
ECHO Factory Link 4.4.0 enviroment already
ECHO configurated for application: "%FL_APP%"
ECHO.

GOTO END

:YES_APP

rem
rem SET FL APPLICATION & VERSION
rem

SET FL_VER=440
SET FL_APP=%1
SET FL_DEV=OK


REM
REM is parameter 2 is used doesn't check Factory Link Version
REM

IF NOT "%2"=="" GOTO OK_VER


REM
REM blank enviromen variables
REM

SET FLUSER=
SET FLAPP=
SET FLINK=
SET FLDOMAIN=
SET FLNAME=
SET FLOPT=
SET FLCOMPILE=

IF EXIST C:\WINAPP\%1\FL_VER.%FL_VER% GOTO OK_VER

REM
REM Factory Link Application created with another Version
REM

ECHO 谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO ? wrong Factory Link version specified ?
ECHO 滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO.
ECHO application "%1" is configurated
ECHO for another Factory Link version
ECHO.

GOTO END


:OK_VER

REM
REM Configure enviroment variables
REM

SET FLAPP=C:\WINAPP\%1
rem SET FLAPP=C:\WINAPP\%1

SET FLDOMAIN=user
SET FLUSER=fluser1
SET FLNAME=flapp1
SET FLOPT=C:\WINAPP\FL_440\OPT
SET FLINK=C:\WINAPP\FL_440

REM
REM SHARE lanciato in automatico da WIN.BAT
REM

rem SHARE /F:8192 /L:50


IF "%FL_ON%"=="OK" GOTO OK_ON
SET FL_PATH=%PATH%
SET FL_ON=OK

:OK_ON

rem PATH=%FL_PATH%;C:\WINAPP\FL_440\BIN;C:\WINAPP\BORLANDC\BIN;
PATH=%FL_PATH%;C:\WINAPP\FL_440\BIN

REM
REM dati per IBM RICA NON UTILIZZATI !!!!
REM

rem SET ICA=C:\ICA
rem ICAINTH
rem %FLINK%\EDI\BIN\RICINTH
rem RICTSR EDI

IF EXIST %FLAPP%\*.* GOTO OK_APP

ECHO 谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO ? Factory Link 4.4.0 enviroment configurated ?
ECHO ? ?
ECHO ? WARNING ?
ECHO ? application not found ?
ECHO 滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?

GOTO END

:OK_APP

ECHO 谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO ? Factory Link 4.4.0 enviroment configurated ?
ECHO 滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
ECHO.

GOTO END

:END


谁能看的懂啊！

这里看得懂的朋友太多了, 您? 问的什么? 看不懂...