Class TbsVXU_V04_25

Unit

BSHL725

Declaration

type TbsVXU_V04_25 = 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. PID, required

4. PD1, optional

5. NK1, optional repeating

6. PATIENT, optional

7. GT1, optional repeating

8. INSURANCE, optional repeating

9. ORDER, optional repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsVXU_V04_25

Overview

Methods

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

Properties

	property MSH : TbsMSH_25 read GetMSH write SetMSH;
	property SFT[RepCount:Integer]: TbsSFT_25 read GetSFT write SetSFT;
	property PID : TbsPID_25 read GetPID write SetPID;
	property PD1 : TbsPD1_25 read GetPD1 write SetPD1;
	property NK1[RepCount:Integer]: TbsNK1_25 read GetNK1 write SetNK1;
	property PATIENT : TbsVXU_V04_PATIENT_25 read GetPATIENT write SetPATIENT;
	property GT1[RepCount:Integer]: TbsGT1_25 read GetGT1 write SetGT1;
	property INSURANCE[RepCount:Integer]: TbsVXU_V04_INSURANCE_25 read GetINSURANCE write SetINSURANCE;
	property ORDER[RepCount:Integer]: TbsVXU_V04_ORDER_25 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_25 read GetMSH write SetMSH;
MSH, Min : 1, Max : 1

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

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

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

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

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

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

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

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