Class TbsVXU_V04_26

Unit

BSHL726

Declaration

type TbsVXU_V04_26 = class(TbsHL7Message)

Description

Represents a VXU_V04(Unsolicited vaccination record update) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. UAC, optional

4. PID, required

5. PD1, optional

6. NK1, optional repeating

7. PATIENT, optional

8. GT1, optional repeating

9. INSURANCE, optional repeating

10. ORDER, optional repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsVXU_V04_26

Overview

Methods

	function SFTRepCount : Integer ;
	function NK1RepCount : Integer ;
	function GT1RepCount : Integer ;
	function INSURANCERepCount : Integer ;
	function ORDERRepCount : Integer ;
	procedure Init; override;

Properties

	property MSH : TbsMSH_26 read GetMSH write SetMSH;
	property SFT[RepCount:Integer]: TbsSFT_26 read GetSFT write SetSFT;
	property UAC : TbsUAC_26 read GetUAC write SetUAC;
	property PID : TbsPID_26 read GetPID write SetPID;
	property PD1 : TbsPD1_26 read GetPD1 write SetPD1;
	property NK1[RepCount:Integer]: TbsNK1_26 read GetNK1 write SetNK1;
	property PATIENT : TbsVXU_V04_PATIENT_26 read GetPATIENT write SetPATIENT;
	property GT1[RepCount:Integer]: TbsGT1_26 read GetGT1 write SetGT1;
	property INSURANCE[RepCount:Integer]: TbsVXU_V04_INSURANCE_26 read GetINSURANCE write SetINSURANCE;
	property ORDER[RepCount:Integer]: TbsVXU_V04_ORDER_26 read GetORDER write SetORDER;

Description

Methods

	function SFTRepCount : Integer ;

	function NK1RepCount : Integer ;

	function GT1RepCount : Integer ;

	function INSURANCERepCount : Integer ;

	function ORDERRepCount : Integer ;

	procedure Init; override;

Properties

	property MSH : TbsMSH_26 read GetMSH write SetMSH;
MSH, Min : 1, Max : 1

	property SFT[RepCount:Integer]: TbsSFT_26 read GetSFT write SetSFT;
SFT, Usage : O, Min : 0, Max : *

	property UAC : TbsUAC_26 read GetUAC write SetUAC;
UAC, Min : 0, Max : 1

	property PID : TbsPID_26 read GetPID write SetPID;
PID, Min : 1, Max : 1

	property PD1 : TbsPD1_26 read GetPD1 write SetPD1;
PD1, Min : 0, Max : 1

	property NK1[RepCount:Integer]: TbsNK1_26 read GetNK1 write SetNK1;
NK1, Usage : O, Min : 0, Max : *

	property PATIENT : TbsVXU_V04_PATIENT_26 read GetPATIENT write SetPATIENT;
PATIENT, Min : 0, Max : 1

	property GT1[RepCount:Integer]: TbsGT1_26 read GetGT1 write SetGT1;
GT1, Usage : O, Min : 0, Max : *

	property INSURANCE[RepCount:Integer]: TbsVXU_V04_INSURANCE_26 read GetINSURANCE write SetINSURANCE;
INSURANCE, Usage : O, Min : 0, Max : *

	property ORDER[RepCount:Integer]: TbsVXU_V04_ORDER_26 read GetORDER write SetORDER;
ORDER, Usage : O, Min : 0, Max : *