Class TbsADR_A19_25

Unit

BSHL725

Declaration

type TbsADR_A19_25 = class(TbsHL7Message)

Description

Represents a ADR_A19(Patient query) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. MSA, required

4. ERR, optional

5. QAK, optional

6. QRD, required

7. QRF, optional

8. QUERY RESPONSE, required repeating

9. DSC, optional

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsADR_A19_25

Overview

Methods

	function SFTRepCount : Integer ;
	function QUERY_RESPONSERepCount : Integer ;
	procedure Init; override;

Properties

	property MSH : TbsMSH_25 read GetMSH write SetMSH;
	property SFT[RepCount:Integer]: TbsSFT_25 read GetSFT write SetSFT;
	property MSA : TbsMSA_25 read GetMSA write SetMSA;
	property ERR : TbsERR_25 read GetERR write SetERR;
	property QAK : TbsQAK_25 read GetQAK write SetQAK;
	property QRD : TbsQRD_25 read GetQRD write SetQRD;
	property QRF : TbsQRF_25 read GetQRF write SetQRF;
	property QUERY_RESPONSE[RepCount:Integer]: TbsADR_A19_QUERY_RESPONSE_25 read GetQUERY_RESPONSE write SetQUERY_RESPONSE;
	property DSC : TbsDSC_25 read GetDSC write SetDSC;

Description

Methods

	function SFTRepCount : Integer ;

	function QUERY_RESPONSERepCount : 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 MSA : TbsMSA_25 read GetMSA write SetMSA;
MSA, Min : 1, Max : 1

	property ERR : TbsERR_25 read GetERR write SetERR;
ERR, Min : 0, Max : 1

	property QAK : TbsQAK_25 read GetQAK write SetQAK;
QAK, Min : 0, Max : 1

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

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

	property QUERY_RESPONSE[RepCount:Integer]: TbsADR_A19_QUERY_RESPONSE_25 read GetQUERY_RESPONSE write SetQUERY_RESPONSE;
QUERY_RESPONSE, Usage : R, Min : 1, Max : *

	property DSC : TbsDSC_25 read GetDSC write SetDSC;
DSC, Min : 0, Max : 1