설명

checkDate 기능은 다음과 같은 경우에 테스트됩니다:
1. 스프레드시트에서 읽고 GDX에 쓰기
2. GDX에서 읽고 스프레드시트에 쓰기.

기고자: Jan-Erik Justkowiak, 2018년 9월

소형 모델 유형 :무료 슬롯 게임

카테고리 : 무료 슬롯 게임 테스트 라이브러리

메인 파일 : gdxxrw9.gms

$title GDXXRW - checkDate 옵션 테스트(GDXXRW9,SEQ=778)

$onText
checkDate의 기능은 다음과 같은 경우에 테스트됩니다.
1. 스프레드시트에서 읽고 GDX에 쓰기
2. GDX에서 읽고 스프레드시트에 쓰기.

기고자: Jan-Erik Justkowiak, 2018년 9월
$offText

$callTool win32.msappavail Excel
$if errorlevel 1 $abort.noError "사용 가능한 Excel이 없습니다."

* 1. 스프레드시트에서 읽고 GDX에 쓰기
* 먼저 스프레드시트 temp.xlsx를 생성합니다.
$onEcho > createSpreadsheet.gms
스칼라 A / 1 /;

$gdxOut 온도
$unLoad A
$gdx아웃

* 스프레드시트에 스칼라 A 쓰기
$call gdxxrw temp.gdx 출력=temp.xlsx par=A rng=A1 희미=0 추적=0
$ifE errorLevel<>0 $abort temp.xlsx에 스칼라 A를 쓰는 동안 오류가 발생했습니다!
$offEcho

$call 무료 슬롯 게임 createSpreadsheet.gms lo=%무료 슬롯 게임lo%
$ifE errorLevel<>0 $abort createSpreadsheet 호출 중 오류가 발생했습니다!

* temp.xlsx에서 데이터를 읽고 dataBackup.gdx에 씁니다.
$call gdxxrw temp.xlsx 출력=dataBackup.gdx par=A rng=A1 희미=0 추적=0
$ifE errorLevel<>0 $abort 스프레드시트 temp.xlsx에서 스칼라 A를 읽는 중 오류가 발생했습니다!

* temp.gdx를 다른 데이터로 덮어쓰기
스칼라 A / 2 /;

* checkDate 옵션이 실행될 때까지 잠시 기다리십시오.
$통화 수면 2

$gdxOut 임시.gdx
$unLoad A
$gdx아웃

* checkDate가 활성화된 상태에서 GDXXRW를 다시 호출하세요.
$call gdxxrw temp.xlsx 출력=temp.gdx checkDate par=A rng=A1 희미=0 추적=0
$ifE errorLevel<>0 $abort 오류 checkDate가 활성화된 스프레드시트 temp.xlsx에서 스칼라 A를 읽는 중입니다!

* 원본 엑셀파일 temp.xlsx는 수정되지 않았으므로 checkDate
*가 활성화되어 있으면 GDXXRW의 이전 호출이 temp.gdx를 덮어쓰지 않았습니다.
* dataBackup.gdx에서 A=1, temp.gdx에서 A=2
$call gdxdiff temp.gdx dataBackup.gdx > %system.nullfile%
$ifE errorLevel=0 $abort 옵션 checkDate가 작동하지 않았습니다. temp.gdx가 다시 작성되었습니다!
* -----------------------------------------------------------------

* 2. GDX에서 읽고 스프레드시트에 쓰기
* 처음에는 스칼라 A가 temp.gdx(이 파일에서는 A=2)에서 data.xlsx로 기록됩니다.
$call gdxxrw temp.gdx 출력=data.xlsx par=A rng=A1 희미=0 추적=0
$ifE errorLevel<>0 $abort data.xlsx에 스칼라 A를 쓰는 동안 오류가 발생했습니다!

* checkDate 옵션이 실행될 때까지 잠시 기다리십시오.
$통화 수면 2

* 이제 data.xlsx를 temp.xlsx로 덮어씁니다(이 파일에서는 A=1).
$call cp -f temp.xlsx data.xlsx
$ifE errorLevel<>0 $abort data.xlsx를 덮어쓰는 동안 오류가 발생했습니다!

* checkData가 활성화된 상태에서 data.xlsx에 다시 쓰기
$call gdxxrw temp.gdx 출력=data.xlsx checkDate par=A rng=A1 희미=0 추적=0
$ifE errorLevel<>0 $abort checkDate가 활성화된 상태에서 data.xlsx에 스칼라 A를 쓰는 동안 오류가 발생했습니다!

* data.xlsx에서 읽고 data.gdx에 기록하여 나중에 결과를 확인합니다.
$call gdxxrw data.xlsx 출력=data.gdx par=A rng=A1 희미=0 추적=0
$ifE errorLevel<>0 $abort 스프레드시트 data.xlsx에서 스칼라 A를 읽는 중 오류가 발생했습니다!

* temp.gdx는 수정되지 않았지만 data.xlsx는 수정되었기 때문에 A의 값은
* checkDate가 활성화된 경우 temp.gdx(A=2)와 data.gdx(A=1)는 달라야 합니다.
$call gdxdiff temp.gdx data.gdx > %system.nullfile%
$ifE errorLevel=0 $abort 옵션 checkDate가 작동하지 않았습니다. - data.xlsx가 다시 작성되었습니다!