Skip to content

Commit

Permalink
Add support for seeing db performance stats
Browse files Browse the repository at this point in the history
  • Loading branch information
Grahame Grieve committed Sep 26, 2024
1 parent 8e8d09b commit 7f12521
Show file tree
Hide file tree
Showing 22 changed files with 641 additions and 639 deletions.
2 changes: 1 addition & 1 deletion library/v2/v2_dictionary_database.pas
Original file line number Diff line number Diff line change
Expand Up @@ -1143,7 +1143,7 @@ procedure THL7V2OdbcDictionary.LoadSegmentMaps(aVersion : THL7V2Version; oMessag
oStructure := THL7V2ModelMessageStructure.Create;
try
oStructure.Name := sLastName;
oStructure.Description := '(Implicitly Created by HL7Connect)';
oStructure.Description := '(Implicitly Created)';
oMessageStructures.Add(oStructure.Link);
finally
oStructure.free;
Expand Down
136 changes: 68 additions & 68 deletions library/v2/v2_dictionary_v21.pas

Large diffs are not rendered by default.

250 changes: 125 additions & 125 deletions library/v2/v2_dictionary_v22.pas

Large diffs are not rendered by default.

442 changes: 221 additions & 221 deletions library/v2/v2_dictionary_v23.pas

Large diffs are not rendered by default.

244 changes: 122 additions & 122 deletions library/v2/v2_dictionary_v231.pas

Large diffs are not rendered by default.

10 changes: 5 additions & 5 deletions library/v2/v2_dictionary_v24.pas
Original file line number Diff line number Diff line change
Expand Up @@ -12331,31 +12331,31 @@ procedure Definitions24LoadMessageStructures1(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ACK_N02', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('MSA', False, False, gtSingle);
oStructure := oStructures.Add('ACK_Q03', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ACK_Q03', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ACK_Q03', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('MSA', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('ERR', True, False, gtSingle);
oStructure := oStructures.Add('ACK_Q05', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ACK_Q05', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ACK_Q05', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('MSA', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('ERR', True, False, gtSingle);
oStructure := oStructures.Add('ACK_Q16', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ACK_Q16', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ACK_Q16', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('MSA', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('ERR', True, False, gtSingle);
oStructure := oStructures.Add('ACK_Q17', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ACK_Q17', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ACK_Q17', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('MSA', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('ERR', True, False, gtSingle);
oStructure := oStructures.Add('ACK_R01', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ACK_R01', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ACK_R01', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down
24 changes: 12 additions & 12 deletions library/v2/v2_dictionary_v25.pas
Original file line number Diff line number Diff line change
Expand Up @@ -14188,7 +14188,7 @@ procedure Definitions25LoadMessageStructures1(oStructures : THL7V2ModelMessageSt
oGrp1.Children.Add('TXA', False, False, gtSingle);
oGrp1.Children.Add('OBX', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('DSR_Q01', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('DSR_Q01', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('DSR_Q01', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -14200,7 +14200,7 @@ procedure Definitions25LoadMessageStructures1(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap.Children.Add('QRF', True, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSP', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('DSR_Q03', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('DSR_Q03', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('DSR_Q03', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -14249,7 +14249,7 @@ procedure Definitions25LoadMessageStructures1(oStructures : THL7V2ModelMessageSt
oGrp2.Children.Add('SPM', True, True, gtSingle);
oGrp1.Children.Add('ECR', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('ROL', True, False, gtSingle);
oStructure := oStructures.Add('EDR_R07', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('EDR_R07', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('EDR_R07', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -14259,14 +14259,14 @@ procedure Definitions25LoadMessageStructures1(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap.Children.Add('QAK', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSP', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('EQQ_Q04', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('EQQ_Q04', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('EQQ_Q04', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('SFT', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('EQL', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('ERP_R09', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ERP_R09', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ERP_R09', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -16178,7 +16178,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap.Children.Add('SFT', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('QPD', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('RCP', False, False, gtSingle);
oStructure := oStructures.Add('QCK_Q02', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('QCK_Q02', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('QCK_Q02', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -16220,7 +16220,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap.Children.Add('QRD', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('QRF', True, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('QRY_Q02', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('QRY_Q02', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('QRY_Q02', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -16800,7 +16800,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap.Children.Add('NK1', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('GT1', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('NTE', True, True, gtSingle);
oStructure := oStructures.Add('RQQ_Q09', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('RQQ_Q09', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('RQQ_Q09', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -17292,7 +17292,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oGrp2 := oGrp1.Children.Add('PERSONNEL_RESOURCE', True, True, gtGroup);
oGrp2.Children.Add('AIP', False, False, gtSingle);
oGrp2.Children.Add('NTE', True, True, gtSingle);
oStructure := oStructures.Add('SPQ_Q08', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('SPQ_Q08', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('SPQ_Q08', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -17454,7 +17454,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oGrp2.Children.Add('PDC', False, False, gtSingle);
oGrp2.Children.Add('NTE', False, False, gtSingle);
oGrp1.Children.Add('ED', False, False, gtSingle);
oStructure := oStructures.Add('TBR_R08', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('TBR_R08', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('TBR_R08', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -17475,7 +17475,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oGrp1.Children.Add('SPM', True, False, gtSingle);
oGrp1.Children.Add('TCC', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('ROL', True, False, gtSingle);
oStructure := oStructures.Add('UDM_Q05', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('UDM_Q05', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('UDM_Q05', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -17484,7 +17484,7 @@ procedure Definitions25LoadMessageStructures2(oStructures : THL7V2ModelMessageSt
oStructure.SegmentMap.Children.Add('URS', True, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSP', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('VQQ_Q07', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('VQQ_Q07', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('VQQ_Q07', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down
24 changes: 12 additions & 12 deletions library/v2/v2_dictionary_v251.pas
Original file line number Diff line number Diff line change
Expand Up @@ -14590,7 +14590,7 @@ procedure Definitions251LoadMessageStructures1(oStructures : THL7V2ModelMessageS
oGrp1.Children.Add('TXA', False, False, gtSingle);
oGrp1.Children.Add('OBX', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('DSR_Q01', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('DSR_Q01', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('DSR_Q01', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -14602,7 +14602,7 @@ procedure Definitions251LoadMessageStructures1(oStructures : THL7V2ModelMessageS
oStructure.SegmentMap.Children.Add('QRF', True, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSP', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('DSR_Q03', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('DSR_Q03', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('DSR_Q03', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -14651,7 +14651,7 @@ procedure Definitions251LoadMessageStructures1(oStructures : THL7V2ModelMessageS
oGrp2.Children.Add('SPM', True, True, gtSingle);
oGrp1.Children.Add('ECR', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('ROL', True, False, gtSingle);
oStructure := oStructures.Add('EDR_R07', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('EDR_R07', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('EDR_R07', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -14661,14 +14661,14 @@ procedure Definitions251LoadMessageStructures1(oStructures : THL7V2ModelMessageS
oStructure.SegmentMap.Children.Add('QAK', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSP', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('EQQ_Q04', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('EQQ_Q04', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('EQQ_Q04', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('SFT', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('EQL', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('ERP_R09', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('ERP_R09', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('ERP_R09', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -16567,7 +16567,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oStructure.SegmentMap.Children.Add('SFT', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('QPD', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('RCP', False, False, gtSingle);
oStructure := oStructures.Add('QCK_Q02', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('QCK_Q02', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('QCK_Q02', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -16609,7 +16609,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oStructure.SegmentMap.Children.Add('QRD', False, False, gtSingle);
oStructure.SegmentMap.Children.Add('QRF', True, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('QRY_Q02', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('QRY_Q02', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('QRY_Q02', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -17195,7 +17195,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oStructure.SegmentMap.Children.Add('NK1', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('GT1', True, True, gtSingle);
oStructure.SegmentMap.Children.Add('NTE', True, True, gtSingle);
oStructure := oStructures.Add('RQQ_Q09', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('RQQ_Q09', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('RQQ_Q09', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -17686,7 +17686,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oGrp2 := oGrp1.Children.Add('PERSONNEL_RESOURCE', True, True, gtGroup);
oGrp2.Children.Add('AIP', False, False, gtSingle);
oGrp2.Children.Add('NTE', True, True, gtSingle);
oStructure := oStructures.Add('SPQ_Q08', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('SPQ_Q08', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('SPQ_Q08', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down Expand Up @@ -17848,7 +17848,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oGrp2.Children.Add('PDC', False, False, gtSingle);
oGrp2.Children.Add('NTE', False, False, gtSingle);
oGrp1.Children.Add('ED', False, False, gtSingle);
oStructure := oStructures.Add('TBR_R08', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('TBR_R08', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('TBR_R08', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -17869,7 +17869,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oGrp1.Children.Add('SPM', True, False, gtSingle);
oGrp1.Children.Add('TCC', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('ROL', True, False, gtSingle);
oStructure := oStructures.Add('UDM_Q05', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('UDM_Q05', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('UDM_Q05', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand All @@ -17878,7 +17878,7 @@ procedure Definitions251LoadMessageStructures2(oStructures : THL7V2ModelMessageS
oStructure.SegmentMap.Children.Add('URS', True, False, gtSingle);
oStructure.SegmentMap.Children.Add('DSP', False, True, gtSingle);
oStructure.SegmentMap.Children.Add('DSC', True, False, gtSingle);
oStructure := oStructures.Add('VQQ_Q07', '(Implicitly Created by HL7Connect)', '', '', '');
oStructure := oStructures.Add('VQQ_Q07', '(Implicitly Created)', '', '', '');
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create;
oStructure.SegmentMap := THL7V2ModelSegmentGroup.Create('VQQ_Q07', False, False, gtGroup);
oStructure.SegmentMap.Children.Add('MSH', False, False, gtSingle);
Expand Down
Loading

0 comments on commit 7f12521

Please sign in to comment.