0

次のような HL7 ファイルがあります。

MSH|^~\&|ABC|000|ABC|ABC|0000||ABC|000|A|00
PID|1|000|||ABC||000|A||||||||||
OBR|1|||00||00|00|||||||||||ABC|00|0|0||||A|||||00||ABC|7ABC||ABC
OBX|1|ABC|ABC|1|SGVsbG8=
OBX|2|ABC|ABC|1|XYTA
OBX|3|ABC|ABC|1|UYYA

OBX セグメントのみを読み取り、5 番目のパイプ (|) の後にテキストを取得する必要があります。

現在、私はこれを行っています:

 StreamReader reader = new StreamReader(@"C:\Users\vemarajs\Desktop\HL7\Ministry\HSHS.txt");
 string strTest = reader.ReadToEnd();
 string OBX1 = strTest.Split('\n')[3];
 File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\OBX.txt", OBX1 + Environment.NewLine);
 List<string> list = new List<string>();
 using (reader)
 {
    string line;
    while ((line = reader.ReadLine()) != null)
    {
       list.Add(line);
       if (line.StartsWith("OBX|") == true)
       {
          string txt = line.Split('|')[5];
          File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\test.txt", txt+Environment.NewLine);
       }
       else
       {
          //string x = line + Environment.NewLine + OBX1.Distinct();
          File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\newtest.txt", line + Environment.NewLine);   
       }

File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\newtest.txt", OBX1.Distinct().ToList() + Environment.NewLine);

これにより、要素 5 (5 つのパイプの後) で各 OBX セグメントの内容が抽出され、test.text というファイルが書き出されます。 HL7 ファイル内の OBX セグメントの数が 40 以上に達することが予想されるため、OBX|1 は 1 つだけであり、メッセージをメッセージ ボックスに返すときにそれらの数を保持したくないからです。

行番号が 4 であると言わずに OBX|1 の最初のオカレンスを取得するにはどうすればよいですか。これは変更される可能性があります。

これは作業コードです:

     StreamReader reader = new StreamReader(@"C:\Users\vemarajs\Desktop\HL7\Ministry\HSHS.txt");
     string strTest = reader.ReadToEnd();
     reader.DiscardBufferedData();
     reader.BaseStream.Seek(0, SeekOrigin.Begin);
     reader.BaseStream.Position = 0;
     string OBXstr = string.Empty;
     string x = null;
     string fileName = Guid.NewGuid().ToString() + ".txt";
     StringBuilder sb = new StringBuilder();
     List<string> list = new List<string>();
     using (reader)
     {
        string line;
        while ((line = reader.ReadLine()) != null)
        {
           list.Add(line);
           if (line.StartsWith("OBX|") == true)
           {
              string txt = line.Split('|')[5];
              File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\"+fileName, txt + Environment.NewLine);
           }
           else
           {
              sb.AppendLine(line);
           }
        }
        int obx1Index = 0;
        int obx2Index = 0;
        var obx1IDR = "\r" + "OBX" + "|" + "1";
        var obx1IDN = "\n" + "OBX" + "|" + "1";
        var obx2IDR = "\r" + "OBX" + "|" + "2";
        var obx2IDN = "\n" + "OBX" + "|" + "2";
        obx1Index = strTest.IndexOf(obx1IDN);
        if (obx1Index < 1)
           obx1Index = strTest.IndexOf(obx1IDR);

        obx2Index = strTest.IndexOf(obx2IDN);
        if (obx2Index < 1)
           obx2Index = strTest.IndexOf(obx2IDR);
        if (obx1Index > 0)
        {
           OBXstr = strTest.Substring(obx1Index, obx2Index - obx1Index - 1);
           OBXstr = OBXstr.Replace(strTest.Substring(obx1Index, obx2Index - obx1Index - 1).Split('|')[5], fileName);
        }
     }
     sb.Append(OBXstr);
     x = sb.ToString();
     File.WriteAllText(@"C:\Users\vemarajs\Desktop\Test\newtest.txt", x);
     reader.Close();
4

2 に答える 2

0

あなたのコードには多くの欠陥があります。

1) これは、OBX1 が常に 4 行目であることを前提としています。これをループ内および if ロジック内に移動する必要があります。

string OBX1 = strTest.Split('\n')[3];

2) はい、else ステートメントにあるように、変数 OBX1 の書き込みが 1 行おきに発生しています。

3)単一のファイル/メッセージが必要だと言っているときに、複数のファイルに書き込んでいます。

あなたはおそらくもっと似たものが欲しい

 StreamReader reader = new StreamReader(@"C:\Users\vemarajs\Desktop\HL7\Ministry\HSHS.txt");

 File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\OBX.txt", OBX1 + Environment.NewLine);
 List<string> list = new List<string>();
 using (reader)
 {
    string line;
    while ((line = reader.ReadLine()) != null)
    {
       list.Add(line);
       if (line.StartsWith("OBX|1") == true)
       {
          File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\test.txt", line + Environment.NewLine);
       }
       else if (line.StartsWith("OBX|") == true)
       {
          // Don't write
       }
       else
       {
          File.AppendAllText(@"C:\Users\vemarajs\Desktop\Test\test.txt", line + Environment.NewLine);
       }
于 2013-09-18T00:21:32.150 に答える