Class TbsCM0_28

Unit

BSHL7DT28

Declaration

type TbsCM0_28 = class(TbsHL7Segment)

Description

Clinical Study Master The Clinical Study Master (CM0) segment contains the information about the study itself. The sending application study number for each patient is sent in the CSR segment. The optional CM0 enables information about the study at the sending application that may be useful to the receiving systems. All of the fields in the segment describe the study status at the sending facility unless otherwise agreed upon.

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Segment
• TbsCM0_28

Overview

Methods

	function AlternateStudyIdRepCount : Integer;
	function ChairmanOfStudyRepCount : Integer;
	function ContactForStudyRepCount : Integer;
	function ContactsAddressRepCount : Integer;

Properties

	property SetIdCm0 : TbsSI_28 read GetSetIdCm0 write SetSetIdCm0;
	property SponsorStudyId : TbsEI_28 read GetSponsorStudyId write SetSponsorStudyId;
	property AlternateStudyId[RepCount:Integer]: TbsEI_28 read GetAlternateStudyId write SetAlternateStudyId;
	property TitleOfStudy : TbsST_28 read GetTitleOfStudy write SetTitleOfStudy;
	property ChairmanOfStudy[RepCount:Integer]: TbsXCN_28 read GetChairmanOfStudy write SetChairmanOfStudy;
	property LastIrbApprovalDate : TbsDT_28 read GetLastIrbApprovalDate write SetLastIrbApprovalDate;
	property TotalAccrualToDate : TbsNM_28 read GetTotalAccrualToDate write SetTotalAccrualToDate;
	property LastAccrualDate : TbsDT_28 read GetLastAccrualDate write SetLastAccrualDate;
	property ContactForStudy[RepCount:Integer]: TbsXCN_28 read GetContactForStudy write SetContactForStudy;
	property ContactsTelephoneNumber : TbsXTN_28 read GetContactsTelephoneNumber write SetContactsTelephoneNumber;
	property ContactsAddress[RepCount:Integer]: TbsXAD_28 read GetContactsAddress write SetContactsAddress;

Description

Methods

	function AlternateStudyIdRepCount : Integer;

	function ChairmanOfStudyRepCount : Integer;

	function ContactForStudyRepCount : Integer;

	function ContactsAddressRepCount : Integer;

Properties

	property SetIdCm0 : TbsSI_28 read GetSetIdCm0 write SetSetIdCm0;
Set Id - Cm0, Min : 0, Max : 1

	property SponsorStudyId : TbsEI_28 read GetSponsorStudyId write SetSponsorStudyId;
Sponsor Study Id, Min : 1, Max : 1

	property AlternateStudyId[RepCount:Integer]: TbsEI_28 read GetAlternateStudyId write SetAlternateStudyId;
Alternate Study Id, Min : 0, Max : 3

	property TitleOfStudy : TbsST_28 read GetTitleOfStudy write SetTitleOfStudy;
Title Of Study, Min : 1, Max : 1

	property ChairmanOfStudy[RepCount:Integer]: TbsXCN_28 read GetChairmanOfStudy write SetChairmanOfStudy;
Chairman Of Study, Min : 0, Max : *

	property LastIrbApprovalDate : TbsDT_28 read GetLastIrbApprovalDate write SetLastIrbApprovalDate;
Last Irb Approval Date, Min : 0, Max : 1

	property TotalAccrualToDate : TbsNM_28 read GetTotalAccrualToDate write SetTotalAccrualToDate;
Total Accrual To Date, Min : 0, Max : 1

	property LastAccrualDate : TbsDT_28 read GetLastAccrualDate write SetLastAccrualDate;
Last Accrual Date, Min : 0, Max : 1

	property ContactForStudy[RepCount:Integer]: TbsXCN_28 read GetContactForStudy write SetContactForStudy;
Contact For Study, Min : 0, Max : *

	property ContactsTelephoneNumber : TbsXTN_28 read GetContactsTelephoneNumber write SetContactsTelephoneNumber;
Contact's Telephone Number, Min : 0, Max : 1

	property ContactsAddress[RepCount:Integer]: TbsXAD_28 read GetContactsAddress write SetContactsAddress;
Contact's Address, Min : 0, Max : *