Class TbsVXR_V03_231

Unit

BSHL7231

Declaration

type TbsVXR_V03_231 = 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_231

Overview

Methods

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

Properties

	property MSH : TbsMSH_231 read GetMSH write SetMSH;
	property MSA : TbsMSA_231 read GetMSA write SetMSA;
	property QRD : TbsQRD_231 read GetQRD write SetQRD;
	property QRF : TbsQRF_231 read GetQRF write SetQRF;
	property PID : TbsPID_231 read GetPID write SetPID;
	property PD1 : TbsPD1_231 read GetPD1 write SetPD1;
	property NK1[RepCount:Integer]: TbsNK1_231 read GetNK1 write SetNK1;
	property PATIENT_VISIT : TbsVXR_V03_PATIENT_VISIT_231 read GetPATIENT_VISIT write SetPATIENT_VISIT;
	property INSURANCE[RepCount:Integer]: TbsVXR_V03_INSURANCE_231 read GetINSURANCE write SetINSURANCE;
	property ORDER[RepCount:Integer]: TbsVXR_V03_ORDER_231 read GetORDER write SetORDER;

Description

Methods

	function NK1RepCount : Integer ;

	function INSURANCERepCount : Integer ;

	function ORDERRepCount : Integer ;

	procedure Init; override;

Properties

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

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

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

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

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

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

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

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

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

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