privat01.gms : 비공개 작업 파일 동작 테스트

설명

비공개 작업 파일이 예상대로 작동하는지 테스트하세요.  이렇게 하려면
일반 저장 파일을 생성하고 그 파일에서 다시 시작한 다음 개인 저장 파일을 저장합니다.
파일을 저장합니다.  그런 다음 우리는
별도의 모델을 사용하여 예상 작동을 확인하기 위한 개인 저장 파일
테스트를 격리합니다.

데모 라이센스를 로컬/활성 라이센스 파일로 사용하고
이 로컬/활성 라이센스 파일도 대상 라이센스로 저장됩니다.

기여자: Steve

소형 모델 유형 :슬롯


카테고리 : 슬롯 테스트 라이브러리


메인 파일 : privat01.gms

$title 개인 작업파일 동작 테스트 (PRIVAT01,SEQ=432)

$onText

개인 작업 파일이 예상대로 작동하는지 테스트합니다.  이렇게 하려면
일반 저장 파일을 생성하고 그 파일에서 다시 시작한 다음 개인 저장 파일을 저장합니다.
파일을 저장합니다.  그런 다음 우리는
별도의 모델을 사용하여 예상 작동을 확인하기 위한 개인 저장 파일
테스트를 격리합니다.

데모 라이센스를 로컬/활성 라이센스 파일로 사용하고
이 로컬/활성 라이센스 파일도 대상 라이센스로 저장됩니다.

기여자: 스티브

$offText

$설정되지 않은 경우 MYPLICENSE $set MYPLICENSE "%슬롯sysdir%plicense.txt"
$if 존재하지 않는 경우 "%MYPLICENSE%" $abort 대상 라이센스 파일 "%MYPLICENSE%"가 존재하지 않습니다. --MYPLICENSE=...를 통해 지정하세요.

$call gamslib -q trnsport

$call 슬롯 tnsport s=노출 lo=%슬롯lo%
$if errorlevel 1 $abort 'trnsport 모델을 실행할 수 없습니다'

$onEcho > tmp1.gms
$모두 숨기기
$ 노출 운송 c z 수요
$offEcho

$call 슬롯 tmp1 r=노출 s=보안 plicense="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 'tmp1 모델을 실행할 수 없습니다'

** ----- 허용된 작동 테스트-------------------------

$onEcho > t1.gms
c, z.l, z.m, Transport.iterlim, Transport.objval, Demand.m을 표시합니다.
$offEcho
$call 슬롯 t1 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't1 테스트를 실행할 수 없습니다'

$call rm -f t2.gdx
$onEcho > t2.gms
$gdxOut t2.gdx
$unLoad c z 수요
$gdx아웃
$offEcho
$call 슬롯 t2 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't2 테스트를 실행할 수 없습니다'
$존재하지 않는 경우 t2.gdx $abort 't2.gdx 누락'

$call rm -f t3.gdx
$onEcho > t3.gms
Execute_unload 't3', c, z, 수요;
$offEcho
$call 슬롯 t3 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't3 테스트를 실행할 수 없습니다'
$존재하지 않는 경우 t3.gdx $abort 't3.gdx 누락'

$call rm -f t4.gdx
$onEcho > t4.gms
스칼라 xx;
xx = 카드(c) + z.l + Demand.m('topeka') + Transport.objval;
Execute_unload 't4', xx;
$offEcho
$call 슬롯 t4 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't4 테스트를 실행할 수 없습니다'
$존재하지 않는 경우 t4.gdx $abort 't4.gdx 누락'

** ----- 금지된 작업 테스트------------

* 실패해야 하는 테스트
* 새로운 매개변수/세트를 만들고, a, i, x, 공급에서 할당

$onEcho > t21.gms
디스플레이 a;
$offEcho
$call 슬롯 t21 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't21 테스트 실행 중 잘못된 결과'
$log 테스트 t21이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t22.gms
나는 디스플레이;
$offEcho
$call 슬롯 t22 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't22 테스트를 실행할 수 없습니다'
$call 슬롯 t22 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't22 테스트 실행 중 잘못된 결과'
$log 테스트 t22가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t23.gms
디스플레이 x.l;
$offEcho
$call 슬롯 t23 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't23 테스트를 실행할 수 없습니다'
$call 슬롯 t23 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't23 테스트 실행 중 잘못된 결과'
$log 테스트 t23이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t24.gms
디스플레이 공급.m;
$offEcho
$call 슬롯 t24 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't24 테스트를 실행할 수 없습니다'
$call 슬롯 t24 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't24 테스트 실행 중 잘못된 결과'
$log 테스트 t24가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t25.gms
$gdxOut tt.gdx
$unLoad
$gdx아웃
$offEcho
$call 슬롯 t25 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't25 테스트를 실행할 수 없습니다'
$call 슬롯 t25 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't25 테스트 실행 중 잘못된 결과'
$log 테스트 t25가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t26.gms
$gdxOut tt.gdx
$unLoad i
$gdx아웃
$offEcho
$call 슬롯 t26 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't26 테스트를 실행할 수 없습니다'
$call 슬롯 t26 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't26 테스트 실행 중 잘못된 결과'
$log 테스트 t26이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t27.gms
$gdxOut tt.gdx
$언로드x
$gdx아웃
$offEcho
$call 슬롯 t27 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't27 테스트를 실행할 수 없습니다'
$call 슬롯 t27 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't27 테스트 실행 중 잘못된 결과'
$log 테스트 t27이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t28.gms
$gdxOut tt.gdx
$unLoad 공급
$gdx아웃
$offEcho
$call 슬롯 t28 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't28 테스트를 실행할 수 없습니다'
$call 슬롯 t28 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't28 테스트 실행 중 잘못된 결과'
$log 테스트 t28이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t29.gms
Execute_unload 'tt', a;
$offEcho
$call 슬롯 t29 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't29 테스트를 실행할 수 없습니다'
$call 슬롯 t29 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't29 테스트 실행 중 잘못된 결과'
$log 테스트 t29가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t30.gms
Execute_unload 'tt', i;
$offEcho
$call 슬롯 t30 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't30 테스트를 실행할 수 없습니다'
$call 슬롯 t30 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't30 테스트 실행 중 잘못된 결과'
$log Test t30이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t31.gms
Execute_unload 'tt', x;
$offEcho
$call 슬롯 t31 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't31 테스트를 실행할 수 없습니다.'
$call 슬롯 t31 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't31 테스트 실행 중 잘못된 결과'
$log 테스트 t31이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t32.gms
Execute_unload 'tt', 공급;
$offEcho
$call 슬롯 t32 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't32 테스트를 실행할 수 없습니다'
$call 슬롯 t32 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't32 테스트 실행 중 잘못된 결과'
$log 테스트 t32가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t33.gms
스칼라 xx;
xx = a('시애틀');
$offEcho
$call 슬롯 t33 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't33 테스트를 실행할 수 없습니다'
$call 슬롯 t33 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't33 테스트 실행 중 잘못된 결과'
$log 테스트 t33이 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t34.gms
스칼라 xx;
xx = 합i,1;
$offEcho
$call 슬롯 t34 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't34 테스트를 실행할 수 없습니다'
$call 슬롯 t34 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't34 테스트 실행 중 잘못된 결과'
$log 테스트 t34가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t35.gms
스칼라 xx;
xx = x.m('시애틀','토피카');
$offEcho
$call 슬롯 t35 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't35 테스트를 실행할 수 없습니다'
$call 슬롯 t35 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't35 테스트 실행 중 잘못된 결과'
$log 테스트 t35가 예상대로 작동했습니다. 당황하지 마세요.

$onEcho > t36.gms
스칼라 xx;
xx = 공급.m('시애틀');
$offEcho
$call 슬롯 t36 r=노출된 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if errorlevel 1 $abort 't36 테스트를 실행할 수 없습니다'
$call 슬롯 t36 r=보안 라이센스="%MYPLICENSE%" lo=%슬롯lo%
$if NOT errorlevel 1 $abort 't36 테스트 실행 중 잘못된 결과'
$log 테스트 t36이 예상대로 작동했습니다. 당황하지 마세요.