Class TbsRSP_K25_271

Unit

BSHL7271

Declaration

type TbsRSP_K25_271 = class(TbsHL7Message)

Description

Represents a RSP_K25(Personnel Information by Segment Response) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. UAC, optional

4. MSA, required

5. ERR, optional repeating

6. QAK, required

7. QPD, required

8. RCP, required

9. STAFF, required repeating

10. DSC, optional

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsRSP_K25_271

Overview

Methods

	function SFTRepCount : Integer ;
	function ERRRepCount : Integer ;
	function STAFFRepCount : Integer ;
	procedure Init; override;

Properties

	property MSH : TbsMSH_271 read GetMSH write SetMSH;
	property SFT[RepCount:Integer]: TbsSFT_271 read GetSFT write SetSFT;
	property UAC : TbsUAC_271 read GetUAC write SetUAC;
	property MSA : TbsMSA_271 read GetMSA write SetMSA;
	property ERR[RepCount:Integer]: TbsERR_271 read GetERR write SetERR;
	property QAK : TbsQAK_271 read GetQAK write SetQAK;
	property QPD : TbsQPD_271 read GetQPD write SetQPD;
	property RCP : TbsRCP_271 read GetRCP write SetRCP;
	property STAFF[RepCount:Integer]: TbsRSP_K25_STAFF_271 read GetSTAFF write SetSTAFF;
	property DSC : TbsDSC_271 read GetDSC write SetDSC;

Description

Methods

	function SFTRepCount : Integer ;

	function ERRRepCount : Integer ;

	function STAFFRepCount : Integer ;

	procedure Init; override;

Properties

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

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

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

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

	property ERR[RepCount:Integer]: TbsERR_271 read GetERR write SetERR;
ERR, Usage : O, Min : 0, Max : *

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

	property QPD : TbsQPD_271 read GetQPD write SetQPD;
QPD, Min : 1, Max : 1

	property RCP : TbsRCP_271 read GetRCP write SetRCP;
RCP, Min : 1, Max : 1

	property STAFF[RepCount:Integer]: TbsRSP_K25_STAFF_271 read GetSTAFF write SetSTAFF;
STAFF, Usage : R, Min : 1, Max : *

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