library/classes/class.Parser_HL7v2.php

   1 <?php
   2
   3 /**
   4  * Parser_HL7v2 Class.
   5  *
   6  * @package OpenEMR
   7  * @link    https://www.open-emr.org
   8  * @author Stephen Waite <stephen.waite@cmsvt.com>
   9  * @copyright Copyright (c) 2021 Stephen Waite <stephen.waite@cmsvt.com>
  10  * @license https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
  11  */
  12
  13 use Aranyasen\HL7\Message;
  14 use Aranyasen\HL7\Segment;
  15
  16 class Parser_HL7v2
  17 {
  18     /**
  19     * @var Message
  20     */
  21     protected $message;
  22
  23     public function __construct(string $message)
  24     {
  25         $this->message = new Message($message);
  26     }
  27
  28     public function parse(): array
  29     {
  30         $segments = $this->message->getSegments();
  31
  32         // Fail if there are no or one segments
  33         if (count($segments) <= 1) {
  34             return [];
  35         }
  36
  37         // create return array
  38         $cmp = array();
  39
  40         // Loop through messages
  41         $segmentMethods = get_class_methods(new Segment('XYZ'));
  42         foreach ($segments as $key => $segment) {
  43             $type = $segment->getName();
  44
  45             $classMethods = get_class_methods($segment);
  46
  47             foreach ($classMethods as $index => $method) {
  48                 if (
  49                     substr($method, 0, 3) == "get" &&
  50                     !in_array($method, $segmentMethods) &&
  51                     $segment->$method()
  52                 ) {
  53                     $data = $segment->$method();
  54                     if (is_array($data)) {
  55                         $data = $this->implode_recursive(', ', $segment->$method());
  56                     }
  57                     $cmp[$type][] = substr($method, 3) . " " . $data;
  58                 }
  59             }
  60         }
  61         return $cmp;
  62     }
  63
  64
  65     /**
  66      * Recursively implode arrays in the hl7 fields.
  67      *
  68      * https://gist.github.com/jimmygle/2564610#gistcomment-3634215
  69      */
  70     private function implode_recursive(string $separator, array $array): string
  71     {
  72         $string = '';
  73         foreach ($array as $i => $a) {
  74             if (is_array($a)) {
  75                 $string .= $this->implode_recursive($separator, $a);
  76             } else {
  77                 $string .= $a;
  78                 if ($i < count($array) - 1) {
  79                     $string .= $separator;
  80                 }
  81             }
  82         }
  83
  84         return $string;
  85     }
  86 }