설명

이 테스트는 로드될 때 크기를 알 수 없는 기호를 다룹니다.
컴파일 및 실행 시간에. 컴파일 타임에 차원은 다음과 같아야 합니다.
소스(GDX 또는 임베디드 코드)에 의해 정의됩니다. 실행 시에는
세트의 치수는 1로 설정되고 다른 기호의 경우 0으로 설정됩니다.
(실제 치수와 일치하지 않을 경우 오류가 발생합니다.)

기고자: Lutz Westermann, 2022년 6월

소형 모델 유형 :슬롯 커뮤니티

카테고리 : 슬롯 커뮤니티 테스트 라이브러리

메인 파일 : load16.gms

$title 기호 로드 시 암시적 치수 설정 테스트(LOAD16,SEQ=906)

$onText
이 테스트는 로드될 때 크기를 알 수 없는 기호를 다룹니다.
컴파일 및 실행 시간에. 컴파일 타임에 차원은 다음과 같아야 합니다.
소스(GDX 또는 임베디드 코드)에 의해 정의됩니다. 실행 시에는
세트의 치수는 1로 설정되고 다른 기호의 경우 0으로 설정됩니다.
(실제 치수와 일치하지 않을 경우 오류가 발생합니다.)

기고자: Lutz Westermann, 2022년 6월
$offText

********************************************************************
* 데이터가 포함된 GDX 파일 준비
$onEcho > data.gms
i1dim / i1*i3 / 설정
          i2dim(*,*) / #i1dim:#i1dim /;
매개변수 p0dim / 1895 /
          p1dim(i1dim) / #i1dim 1 /;        
$offEcho
$call.checkErrorLevel 슬롯 커뮤니티 data.gms lo=%슬롯 커뮤니티lo% gdx=data

********************************************************************
* 컴파일 타임에 GDX에서 로드
$onEcho > test.gms
i1dim, i2dim을 설정합니다.
매개변수 p0dim, p1dim;

$gdxIn 데이터.gdx
$load i1dim i2dim p0dim p1dim
$i1dim 차원이 아닌 경우 i1dim $abort는 i1dim에 대해 희미함=1을 기대합니다.
$2차원이 아닌 경우 i2dim $abort는 i2dim에 대해 희미한 값=2를 기대합니다.
$차원이 0이 아닌 경우 p0dim $abort p0dim에 대해 희미함=0 예상
$1차원이 아닌 경우 p1dim $abort p1dim에 대해 희미한 값=1이 필요함
$offEcho
$call.checkErrorLevel 게임 test.gms lo=%슬롯 커뮤니티lo% gdx=테스트

********************************************************************
* 컴파일 타임에 임베디드 코드에서 로드
$onEcho > test.gms
i1dim, i2dim을 설정합니다.
매개변수 p0dim, p1dim;

$onEmbeddedCode 연결:
- GDX리더:
    파일: data.gdx
    기호: [이름: i1dim, 이름: i2dim, 이름: p0dim, 이름: p1dim ]
- 슬롯 커뮤니티작성기:
    기호: 모두
$offEmbeddedCode
$i1dim 차원이 아닌 경우 i1dim $abort는 i1dim에 대해 희미함=1을 기대합니다.
$2차원이 아닌 경우 i2dim $abort는 i2dim에 대해 희미한 값=2를 기대합니다.
$차원이 0이 아닌 경우 p0dim $abort p0dim에 대해 희미함=0 예상
$1차원이 아닌 경우 p1dim $abort p1dim에 대해 희미한 값=1이 필요함
$offEcho
$call.checkErrorLevel 게임 test.gms lo=%슬롯 커뮤니티lo% gdx=테스트

********************************************************************
* 실행 시 GDX에서 로드 - "양호" 기호
$onEcho > test.gms
더미 설정 / i1*i3 /;
i1dim을 설정하십시오.
매개변수 p0dim;

Execute_load 'data.gdx', i1dim, p0dim;
$i1dim 차원이 아닌 경우 i1dim $abort는 i1dim에 대해 희미함=1을 기대합니다.
$차원이 0이 아닌 경우 p0dim $abort p0dim에 대해 희미함=0 예상
$offEcho
$call.checkErrorLevel 게임 test.gms lo=%슬롯 커뮤니티lo% gdx=테스트

********************************************************************
* 실행 시 임베디드 코드에서 로드 - "양호" 기호
$onEcho > test.gms
더미 설정 / i1*i3 /;
i1dim을 설정하십시오.
매개변수 p0dim;

임베디드코드 연결:
- GDX리더:
    파일: data.gdx
    기호: [이름: i1dim, 이름: p0dim ]
- 슬롯 커뮤니티작성기:
    기호: 모두
endEmbeddedCode i1dim, p0dim
$i1dim 차원이 아닌 경우 i1dim $abort는 i1dim에 대해 희미함=1을 기대합니다.
$차원이 0이 아닌 경우 p0dim $abort p0dim에 대해 희미함=0 예상
$offEcho
$call.checkErrorLevel 게임 test.gms lo=%슬롯 커뮤니티lo% gdx=테스트

********************************************************************
* 실행 시 GDX에서 로드 - "잘못된" 기호
$onEcho > test.gms
더미 설정 / i1*i3 /;
i2dim을 설정하십시오.
매개변수 p1dim;

Execute_load 'data.gdx', i2dim, p1dim;
$offEcho
$call 슬롯 커뮤니티 test.gms lo=%슬롯 커뮤니티lo% gdx=test
$ifE errorlevel=0 $abort %system.line% 라인에 오류가 예상됩니다.

********************************************************************
* 실행 시 임베디드 코드에서 로드 - "잘못된" 기호
$onEcho > test.gms
더미 설정 / i1*i3 /;
i2dim을 설정하십시오.
매개변수 p1dim;

임베디드코드 연결:
- GDX리더:
    파일: data.gdx
    기호: [이름: i2dim, 이름: p1dim ]
- 슬롯 커뮤니티작성기:
    기호: 모두
endEmbeddedCode i2dim, p1dim
$offEcho
$call 슬롯 커뮤니티 test.gms lo=%슬롯 커뮤니티lo% gdx=test
$ifE errorlevel=0 $abort %system.line% 라인에 오류가 예상됩니다.