Class TbsRPI_I01_25

Unit

BSHL725

Declaration

type TbsRPI_I01_25 = class(TbsHL7Message)

Description

Represents a RPI_I01(Return patient information) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. MSA, required

4. PROVIDER, required repeating

5. PID, required

6. NK1, optional repeating

7. GUARANTOR INSURANCE, optional

8. NTE, optional repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsRPI_I01_25

Overview

Methods

	function SFTRepCount : Integer ;
	function PROVIDERRepCount : Integer ;
	function NK1RepCount : Integer ;
	function NTERepCount : 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 PROVIDER[RepCount:Integer]: TbsRPI_I01_PROVIDER_25 read GetPROVIDER write SetPROVIDER;
	property PID : TbsPID_25 read GetPID write SetPID;
	property NK1[RepCount:Integer]: TbsNK1_25 read GetNK1 write SetNK1;
	property GUARANTOR_INSURANCE : TbsRPI_I01_GUARANTOR_INSURANCE_25 read GetGUARANTOR_INSURANCE write SetGUARANTOR_INSURANCE;
	property NTE[RepCount:Integer]: TbsNTE_25 read GetNTE write SetNTE;

Description

Methods

	function SFTRepCount : Integer ;

	function PROVIDERRepCount : Integer ;

	function NK1RepCount : Integer ;

	function NTERepCount : 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 PROVIDER[RepCount:Integer]: TbsRPI_I01_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 NK1[RepCount:Integer]: TbsNK1_25 read GetNK1 write SetNK1;
NK1, Usage : O, Min : 0, Max : *

	property GUARANTOR_INSURANCE : TbsRPI_I01_GUARANTOR_INSURANCE_25 read GetGUARANTOR_INSURANCE write SetGUARANTOR_INSURANCE;
GUARANTOR_INSURANCE, Min : 0, Max : 1

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