Class TbsRCL_I06_25

Unit

BSHL725

Declaration

type TbsRCL_I06_25 = class(TbsHL7Message)

Description

Represents a RCL_I06(Return clinical information) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. MSA, required

4. QRD, required

5. QRF, optional

6. PROVIDER, required repeating

7. PID, required

8. DG1, optional repeating

9. DRG, optional repeating

10. AL1, optional repeating

11. NTE, optional repeating

12. DSP, optional repeating

13. DSC, optional

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsRCL_I06_25

Overview

Methods

	function SFTRepCount : Integer ;
	function PROVIDERRepCount : Integer ;
	function DG1RepCount : Integer ;
	function DRGRepCount : Integer ;
	function AL1RepCount : Integer ;
	function NTERepCount : Integer ;
	function DSPRepCount : 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 QRD : TbsQRD_25 read GetQRD write SetQRD;
	property QRF : TbsQRF_25 read GetQRF write SetQRF;
	property PROVIDER[RepCount:Integer]: TbsRCL_I06_PROVIDER_25 read GetPROVIDER write SetPROVIDER;
	property PID : TbsPID_25 read GetPID write SetPID;
	property DG1[RepCount:Integer]: TbsDG1_25 read GetDG1 write SetDG1;
	property DRG[RepCount:Integer]: TbsDRG_25 read GetDRG write SetDRG;
	property AL1[RepCount:Integer]: TbsAL1_25 read GetAL1 write SetAL1;
	property NTE[RepCount:Integer]: TbsNTE_25 read GetNTE write SetNTE;
	property DSP[RepCount:Integer]: TbsDSP_25 read GetDSP write SetDSP;
	property DSC : TbsDSC_25 read GetDSC write SetDSC;

Description

Methods

	function SFTRepCount : Integer ;

	function PROVIDERRepCount : Integer ;

	function DG1RepCount : Integer ;

	function DRGRepCount : Integer ;

	function AL1RepCount : Integer ;

	function NTERepCount : Integer ;

	function DSPRepCount : 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 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 PROVIDER[RepCount:Integer]: TbsRCL_I06_PROVIDER_25 read GetPROVIDER write SetPROVIDER;
PROVIDER, Usage : R, Min : 1, Max : *

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

	property DG1[RepCount:Integer]: TbsDG1_25 read GetDG1 write SetDG1;
DG1, Usage : O, Min : 0, Max : *

	property DRG[RepCount:Integer]: TbsDRG_25 read GetDRG write SetDRG;
DRG, Usage : O, Min : 0, Max : *

	property AL1[RepCount:Integer]: TbsAL1_25 read GetAL1 write SetAL1;
AL1, Usage : O, Min : 0, Max : *

	property NTE[RepCount:Integer]: TbsNTE_25 read GetNTE write SetNTE;
NTE, Usage : O, Min : 0, Max : *

	property DSP[RepCount:Integer]: TbsDSP_25 read GetDSP write SetDSP;
DSP, Usage : O, Min : 0, Max : *

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