Class TbsVXR_V03_23

Unit

BSHL723

Declaration

type TbsVXR_V03_23 = class(TbsHL7Message)

Description

Represents a VXR_V03(Vaccination record response) message structure. This structure contains the following elements:

1. MSH, required

2. MSA, required

3. QRD, required

4. QRF, optional

5. PID, required

6. PD1, optional

7. NK1, optional repeating

8. PATIENT VISIT, optional

9. INSURANCE, optional repeating

10. ORDER, optional repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsVXR_V03_23

Overview

Methods

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

Properties

	property MSH : TbsMSH_23 read GetMSH write SetMSH;
	property MSA : TbsMSA_23 read GetMSA write SetMSA;
	property QRD : TbsQRD_23 read GetQRD write SetQRD;
	property QRF : TbsQRF_23 read GetQRF write SetQRF;
	property PID : TbsPID_23 read GetPID write SetPID;
	property PD1 : TbsPD1_23 read GetPD1 write SetPD1;
	property NK1[RepCount:Integer]: TbsNK1_23 read GetNK1 write SetNK1;
	property PATIENT_VISIT : TbsVXR_V03_PATIENT_VISIT_23 read GetPATIENT_VISIT write SetPATIENT_VISIT;
	property INSURANCE[RepCount:Integer]: TbsVXR_V03_INSURANCE_23 read GetINSURANCE write SetINSURANCE;
	property ORDER[RepCount:Integer]: TbsVXR_V03_ORDER_23 read GetORDER write SetORDER;

Description

Methods

	function NK1RepCount : Integer ;

	function INSURANCERepCount : Integer ;

	function ORDERRepCount : Integer ;

	procedure Init; override;

Properties

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

	property MSA : TbsMSA_23 read GetMSA write SetMSA;
MSA, Min : 1, Max : 1

	property QRD : TbsQRD_23 read GetQRD write SetQRD;
QRD, Min : 1, Max : 1

	property QRF : TbsQRF_23 read GetQRF write SetQRF;
QRF, Min : 0, Max : 1

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

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

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

	property PATIENT_VISIT : TbsVXR_V03_PATIENT_VISIT_23 read GetPATIENT_VISIT write SetPATIENT_VISIT;
PATIENT_VISIT, Min : 0, Max : 1

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

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