web-dev-qa-db-ja.com

csvファイルから読み取り、最初の列の値に基づいて特定のデータ列を抽出する

これは私の最初のバッチプログラムで、オンラインで検索してきましたが、まだ解決策を書くのに苦労しています。

次のCSVファイルがあります。

"RH",2013/06/15 02:14:58 -0400,"X","LQ3SUEEWPWKL6",005,
"FH",01
"SH",2013/06/14 00:00:00 -0400,2013/06/14 23:59:59 -0400,"LQ3SUEEWPWKL6",""
"CH","TransactionID","InvoiceID", 
......

次のことを行う簡単なプログラムを作成しようとしています。

  • Column1 = "RH"の場合、column2の値を抽出します(2013/06/15 02:14:58 -0400)
  • Column1 = "SH"の場合、column4の値を抽出します(LQ3SUEEWPWKL6)

出力をファイルにパイプします。


これは私のコードですが、if条件が機能していません

@echo off
:: Set input file in variable
::Set _InputFile=%1

:: Store input line into different variables
FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
Set _var1=%%A
Set _var2=%%B
Set _var3=%%C
Set _var4=%%D
Set _var5=%%E
Set _var6=%%F
Set _var7=%%G
Set _var8=%%H
Set _var9=%%I
Set _var10=%%J
Set _var11=%%K
Set _var12=%%L
Set _var13=%%M
Set _var14=%%N
Set _var15=%%O
Set _var16=%%P
Set _var17=%%Q
Set _var18=%%R


IF "%_var1%"=="RH" echo %var2%

)

私のCSVファイルはExcelとメモ帳で正常に見えますが、スクリプトを実行して最初の変数を表示すると、最初のレコードの「RH」の直前に文字化けがあり、追加の列を抽出する必要があるため、バイパスできません。 var1 = "RH"の場合のデータ:

"RH"
FH
01
SH
CH
TransactionID,PaymentTrackingID,
SF
SF
SC
RF
CAD,CR,0
RF
USD,CR,0
RC
FF
10
user2550880
(
FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
  if "%%~A"=="RH" echo %%~B
  if "%%~A"=="SH" echo %%~D
 )
)>youroutputfilename

機能するはずです-すべての値を異なる変数に割り当てる必要はありません-しかし、それらを使用する場合は、

FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
...
Set _var17=%%Q
Set _var18=%%R
CALL :PROCESS
)
...
GOTO :EOF

:PROCESS
IF %_var1%=="RH" echo %_var2%
IF %_var1%=="SH" echo %_var4%
GOTO :EOF

この方法では、%%x_varxに割り当てているため、%%xが引用符で囲まれている場合、割り当てられた値に引用符が含まれることに注意してください。囲んでいる引用符(存在する場合)を削除するには、SET _varx=%%~xを使用します。


OPの問題に関する補遺20130703-1956Z

@ECHO OFF
SETLOCAL
SET _Inputfile=u:\noname1.txt
(
FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
  SET "RH="
  SET "SH="
  ECHO(%%A|FINDSTR /l /c:"\"RH\"" >NUL
  IF NOT ERRORLEVEL 1 SET RH=Y
  ECHO(%%A|FINDSTR /l /c:"\"SH\"" >NUL
  IF NOT ERRORLEVEL 1 SET SH=Y
  if DEFINED RH echo %%~B
  if DEFINED SH echo %%~D
 )
)>u:\youroutputfilename
TYPE u:\youroutputfilename
del u:\youroutputfilename
echo========First way

(
FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
  SET _var1=%%A
  SET "RH="
  SET "SH="
  CALL :process
  if DEFINED RH echo %%~B
  if DEFINED SH echo %%~D
 )
)>u:\youroutputfilename

TYPE u:\youroutputfilename
del u:\youroutputfilename
echo========Second way

SETLOCAL ENABLEDELAYEDEXPANSION 
(
FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
  SET _var1=%%A
  IF "!_var1:~-4!"==""RH"" echo %%~B
  IF "!_var1:~-4!"==""SH"" echo %%~D
 )
)>u:\youroutputfilename

TYPE u:\youroutputfilename
del u:\youroutputfilename
echo========Third way
ENDLOCAL

GOTO :EOF

:process
IF "%_var1:~-4%"==""RH"" SET RH=Y
IF "%_var1:~-4%"==""SH"" SET SH=Y
GOTO :EOF
10
Magoo

解析に問題があります。最初にforループを)afterで終了します。これにより、新しい変数を使用できます。

@echo off
:: Set input file in variable
::Set _InputFile=%1

:: Store input line into different variables
FOR /F "tokens=1-18* delims=," %%A IN (%_InputFile%) DO (
    Set "_var1=%%A"
    Set "_var2=%%B"
    Set "_var3=%%C"
    Set "_var4=%%D"
    Set "_var5=%%E"
    Set "_var6=%%F"
    Set "_var7=%%G"
    Set "_var8=%%H"
    Set "_var9=%%I"
    Set "_var10=%%J"
    Set "_var11=%%K"
    Set "_var12=%%L"
    Set "_var13=%%M"
    Set "_var14=%%N"
    Set "_var15=%%O"
    Set "_var16=%%P"
    Set "_var17=%%Q"
    Set "_var18=%%R"
)

IF "%_var1%"=="RH" echo %var2%
4
Endoro

遅延展開 を有効にする必要があります:

@echo off

setlocal EnableDelayedExpansion

set "_InputFile=..."

for /f "tokens=1-18* delims=," %%A in (%_InputFile%) do (
  Set _var1=%%A
  Set _var2=%%B
  ...

  if "!_var1!"=="RH" echo !_var2!
)
3
Ansgar Wiechers

「なぜラインがRH "RHで始まるのか"に対する答えがなかったので、掘り下げてみます。

したがって、theは、ファイルがUTFであることを示すBOM(バイトオーダーマーク)と、必要に応じてバイトが書き込まれる方法から取得されます。答えのために:あなたは使うことができます

if x%_var1:RH=%x NEQ x%_var1%x (echo %_var2%)

これにより、RHが%_var1%にあるかどうかが確認されます(varでRHを置き換えた後、変更されていない場合、RHがvarにない場合)。つまり、Bomがここにいるかどうかは重要ではありません。ただし、完全一致が必要な場合は問題が発生します。

これに対処する別の方法は、ファイルにbomを含めないことです。つまり、ASCIIまたはBOMなしのUTF-8に保存するか、またはツールを使用してUTF-からbomを取り除きます8ファイル。

2
satibel