설명
쉼표 필드 구분 기호는 다양한 소수 구분 기호와 함께 테스트되었습니다.
기고자 Jan-Erik Justkowiak, 2018년 5월
gdxdiff와 비교하기 위한 컨트롤 세트 및 매개변수 정의
소형 모델 유형 :슬롯 사이트 추천
메인 파일 : csv2gdx11.gms
$title CSV2GDX - 필드 구분 기호 쉼표 테스트(CSV2GDX11,SEQ=756)

$onText
쉼표 필드 구분 기호는 다양한 소수 구분 기호와 함께 테스트됩니다.

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

* gdxdiff와 비교하기 위한 컨트롤 세트 및 매개변수 정의
$onEcho > controlData1.gms
Dim1 / a, b, c / 설정;
매개변수 x / a 1.3, b 2.5, c 3.9 /;

$gdxOut 제어 데이터1
$unLoad Dim1 x
$gdx아웃
$offEcho
$call 슬롯 사이트 추천 controlData1.gms lo=%슬롯 사이트 추천lo%
$ifE errorLevel<>0 $abort controlData1에 문제가 발생했습니다!
*------------------------------------------------------------------

* 1. DecimalSep이 올바르게 설정되었습니다.
* 성공해야 합니다!
$onEcho > dataCommaP.csv
a,b,c
1.3,2.5,3.9
$offEcho

$log
$log 1. 쉼표로 구분 <-> fieldSep=쉼표, 마침표 소수 <-> 소수점=기간
$call csv2gdx dataCommaP.csv id=x fieldSep=commadecimalSep=기간 useHeader=y 값=1..3 추적=0
$ifE errorLevel<>0 $abort 오류: CSV2GDX는 1. 실행 시 성공했어야 합니다.!
$call gdxdiff dataCommaP.gdx controlData1.gdx > %system.nullfile%
$ifE errorLevel<>0 $abort 실행 후 데이터가 올바르지 않습니다 1.!
$로그
*------------------------------------------------------------------

* 2. DecimalSep이 올바르게 설정되지 않았습니다.
* 마침표는 여전히 소수 구분 기호로 해석됩니다.
* 성공해야 합니다!
$log
$log 2. 쉼표로 구분 <-> fieldSep=comma, 소수점 마침표 <-> 소수점=comma
$call csv2gdx dataCommaP.csv id=x fieldSep=쉼표 십진수Sep=쉼표 useHeader=y 값=1..3 추적=0
$ifE errorLevel<>0 $abort 오류: CSV2GDX는 2.를 실행할 때 성공했어야 합니다.!
$call gdxdiff dataCommaP.gdx controlData1.gdx > %system.nullfile%
$ifE errorLevel<>0 $abort 2. 실행 후 데이터가 정확하지 않습니다!
$log
*------------------------------------------------------------------

* 3. 쉼표로 구분 <-> fieldSep=쉼표, 쉼표 소수 <-> 소수점=마침표
* 이것은 실패할 것이다!
$onEcho > dataCommaC.csv
a,b,c
1,3,2,5,3,9
$offEcho

$log
$log 3. 쉼표로 구분된 <-> fieldSep=쉼표, 쉼표 소수 <-> 소수점=기간
$call csv2gdx dataCommaC.csv id=x fieldSep=comma useHeader=y 값=1..3 추적=0
$ifE errorLevel=0 $abort CSV2GDX는 3.을 실행할 때 실패했어야 합니다!
$log 예상 오류: 열 번호가 열 수를 초과합니다!
$log
*------------------------------------------------------------------

* 4. 쉼표로 구분 <-> fieldSep=comma, 쉼표 십진수 <->decimalSep=comma
* 이것은 실패할 것이다!
$log
$로그 4a. 쉼표로 구분된 <-> fieldSep=comma, 쉼표 십진수 <->decimalSep=comma
$call csv2gdx dataCommaC.csv id=x fieldSep=쉼표 십진수Sep=쉼표 useHeader=y 값=1..3 추적=0
$ifE errorLevel=0 $abort CSV2GDX는 4a를 실행할 때 실패해야 합니다.!
$log 예상 오류: 열 번호가 열 수를 초과합니다!
$log

* 인용된 쉼표가 작동해야 합니다.
$onEcho > temp.csv
a,b,c
"1,3","2,5","3,9"
$offEcho

$log
$로그 4b. 쉼표로 구분된 <-> fieldSep=comma, 쉼표 십진수 <->decimalSep=comma
$call csv2gdx temp.csv id=x fieldSep=쉼표 십진수Sep=쉼표 useHeader=y 값=1..3 추적=0
$ifE errorLevel<>0 $abort 오류: 4b를 실행할 때 CSV2GDX가 성공했어야 합니다.!
$call gdxdiff temp.gdx controlData1.gdx > %system.nullfile%
$ifE errorLevel<>0 $abort 4b 실행 후 데이터가 올바르지 않습니다.!
$log
*------------------------------------------------------------------

* 5. 쉼표로 구분 <-> fieldSep=tab
* 헤더 행에 탭이 없으므로 이 작업은 실패합니다!
$log
$log 5. 쉼표로 구분 <-> fieldSep=tab
$call csv2gdx dataCommaP.csv id=x fieldSep=tab useHeader=y 값=1..3 추적=0
$ifE errorLevel=0 $abort 오류: 5.를 실행할 때 CSV2GDX가 실패했어야 합니다!
$log 예상 오류: 값 열 번호가 열 수를 초과합니다!
$log
*------------------------------------------------------------------

* 6. 쉼표로 구분 <-> fieldSep=세미콜론
* 헤더 행에 세미콜론이 없으므로 이 작업은 실패합니다!
$log
$log 6. 쉼표로 구분된 <-> fieldSep=세미콜론
$call csv2gdx dataCommaP.csv id=x fieldSep=세미콜론 useHeader=y 값=1..3 추적=0
$ifE errorLevel=0 $abort 오류: 6.을 실행할 때 CSV2GDX가 실패했어야 합니다!
$log 예상 오류: 값 열 번호가 열 수를 초과합니다!
$log
*------------------------------------------------------------------

* 대부분의 다른 옵션과 함께 불쾌한 데이터에 대한 fieldSep=comma 테스트
* 또한 일부 인덱스 및 값 열에서는 필드 구분 기호가 따옴표로 묶여 있습니다.
$onEcho > 특수값.csv
하나, 둘, 셋, 넷, 다섯, 여섯
빨간색,빨간색,,Undef,'3.3',빨간색
빨간색,빨간색,"4,4",5.5,Eps,녹색
"빨간색, 1",'녹색',7.7e+02,8.8°,-Inf,파란색
파란색,파란색,"10%",0,NA,"'보라색,'"
녹색, 파란색, "Eps", "NA", "Undef", "pur , ple"
녹색,파란색,"0",""," ",'녹색'
$offEcho

$onEcho > controlData2.gms
세트
   희미한1 / r1*r6 /
   Dim2 / 빨간색, 녹색, "빨간색, 1", 파란색 /
   Dim3 / 빨간색, "'녹색'", 파란색/
   Dim4 / 빨간색, 녹색, "'green'", "'purple,'", "purple, ple", 파란색/
   Dim5 / c1*c3 /;

매개변수 A
$onUNDF
/
r1.red.red.red.c2 Undf
r1.red.red.red.c3 Undf
r2.red.red.green.c1 Undf
r2.red.red.green.c2 5.5
r2.red.red.green.c3 Eps
r3."빨간색, 1"."'녹색'".blue.c1 770
r3."red , 1"."'green'".blue.c2 Undf
r3."빨간색, 1"."'녹색'".blue.c3 -Inf
r4.blue.blue."'보라색,'".c1 Undf
r4.blue.blue."'보라색,'".c2 Eps
r4.blue.blue."'보라색,'".c3 NA
r5.green.blue."pur, ple".c1 Eps
r5.green.blue."pur, ple".c2 NA
r5.green.blue."pur, ple".c3 Undf
r6.green.blue."'녹색'".c1 Eps
/;
$offUNDF

$gdxOut 제어 데이터2
$unLoad Dim1 Dim2 Dim3 Dim4 Dim5 A
$gdx아웃
$offEcho
$call 슬롯 사이트 추천 controlData2.gms lo=%슬롯 사이트 추천lo%
$ifE errorLevel<>0 $abort controlData2에 문제가 발생했습니다!

$log
$로그 7.
$call csv2gdx SpecialValues.csv id=A fieldSep=쉼표 색인=1,2,6 값=3..5 colCount=6 autoRow=r autoCol=c valueDim=y useHeader=y storeZero=y 추적=0
$ifE errorLevel<>0 $abort 7.에서 CSV2GDX로 데이터를 읽는 데 문제가 있습니다!
$call gdxdiff SpecialValues.gdx controlData2.gdx > %system.nullfile%
$ifE errorLevel<>0 $abort 7. 실행 후 데이터가 정확하지 않습니다!
*------------------------------------------------------------------