Class TbsADT_A01_28

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TbsADT_A01_28 = class(TbsHL7Message)

Description

Represents a ADT_A01(Admit/visit notification) message structure. This structure contains the following elements:

  1. MSH, required

  2. SFT, optional repeating

  3. UAC, optional

  4. EVN, required

  5. PID, required

  6. PD1, optional

  7. ARV, optional repeating

  8. ROL, optional repeating

  9. NK1, optional repeating

  10. PV1, required

  11. PV2, optional

  12. ARV, optional repeating

  13. ROL, optional repeating

  14. DB1, optional repeating

  15. OBX, optional repeating

  16. AL1, optional repeating

  17. DG1, optional repeating

  18. DRG, optional

  19. PROCEDURE, optional repeating

  20. GT1, optional repeating

  21. INSURANCE, optional repeating

  22. ACC, optional

  23. UB1, optional

  24. UB2, optional

  25. PDA, optional

Hierarchy

Overview

Methods

Public function SFTRepCount : Integer ;
Public function ARVRepCount : Integer ;
Public function ROLRepCount : Integer ;
Public function NK1RepCount : Integer ;
Public function ARV2RepCount : Integer ;
Public function ROL2RepCount : Integer ;
Public function DB1RepCount : Integer ;
Public function OBXRepCount : Integer ;
Public function AL1RepCount : Integer ;
Public function DG1RepCount : Integer ;
Public function PROCEDURE_RepCount : Integer ;
Public function GT1RepCount : Integer ;
Public function INSURANCERepCount : Integer ;
Public procedure Init; override;

Properties

Public property MSH : TbsMSH_28 read GetMSH write SetMSH;
Public property SFT[RepCount:Integer]: TbsSFT_28 read GetSFT write SetSFT;
Public property UAC : TbsUAC_28 read GetUAC write SetUAC;
Public property EVN : TbsEVN_28 read GetEVN write SetEVN;
Public property PID : TbsPID_28 read GetPID write SetPID;
Public property PD1 : TbsPD1_28 read GetPD1 write SetPD1;
Public property ARV[RepCount:Integer]: TbsARV_28 read GetARV write SetARV;
Public property ROL[RepCount:Integer]: TbsROL_28 read GetROL write SetROL;
Public property NK1[RepCount:Integer]: TbsNK1_28 read GetNK1 write SetNK1;
Public property PV1 : TbsPV1_28 read GetPV1 write SetPV1;
Public property PV2 : TbsPV2_28 read GetPV2 write SetPV2;
Public property ARV2[RepCount:Integer]: TbsARV_28 read GetARV2 write SetARV2;
Public property ROL2[RepCount:Integer]: TbsROL_28 read GetROL2 write SetROL2;
Public property DB1[RepCount:Integer]: TbsDB1_28 read GetDB1 write SetDB1;
Public property OBX[RepCount:Integer]: TbsOBX_28 read GetOBX write SetOBX;
Public property AL1[RepCount:Integer]: TbsAL1_28 read GetAL1 write SetAL1;
Public property DG1[RepCount:Integer]: TbsDG1_28 read GetDG1 write SetDG1;
Public property DRG : TbsDRG_28 read GetDRG write SetDRG;
Public property PROCEDURE_[RepCount:Integer]: TbsADT_A01_PROCEDURE_28 read GetPROCEDURE_ write SetPROCEDURE_;
Public property GT1[RepCount:Integer]: TbsGT1_28 read GetGT1 write SetGT1;
Public property INSURANCE[RepCount:Integer]: TbsADT_A01_INSURANCE_28 read GetINSURANCE write SetINSURANCE;
Public property ACC : TbsACC_28 read GetACC write SetACC;
Public property UB1 : TbsUB1_28 read GetUB1 write SetUB1;
Public property UB2 : TbsUB2_28 read GetUB2 write SetUB2;
Public property PDA : TbsPDA_28 read GetPDA write SetPDA;

Description

Methods

Public function SFTRepCount : Integer ;
 
Public function ARVRepCount : Integer ;
 
Public function ROLRepCount : Integer ;
 
Public function NK1RepCount : Integer ;
 
Public function ARV2RepCount : Integer ;
 
Public function ROL2RepCount : Integer ;
 
Public function DB1RepCount : Integer ;
 
Public function OBXRepCount : Integer ;
 
Public function AL1RepCount : Integer ;
 
Public function DG1RepCount : Integer ;
 
Public function PROCEDURE_RepCount : Integer ;
 
Public function GT1RepCount : Integer ;
 
Public function INSURANCERepCount : Integer ;
 
Public procedure Init; override;
 

Properties

Public property MSH : TbsMSH_28 read GetMSH write SetMSH;

MSH, Min : 1, Max : 1

Public property SFT[RepCount:Integer]: TbsSFT_28 read GetSFT write SetSFT;

SFT, Usage : O, Min : 0, Max : *

Public property UAC : TbsUAC_28 read GetUAC write SetUAC;

UAC, Min : 0, Max : 1

Public property EVN : TbsEVN_28 read GetEVN write SetEVN;

EVN, Min : 1, Max : 1

Public property PID : TbsPID_28 read GetPID write SetPID;

PID, Min : 1, Max : 1

Public property PD1 : TbsPD1_28 read GetPD1 write SetPD1;

PD1, Min : 0, Max : 1

Public property ARV[RepCount:Integer]: TbsARV_28 read GetARV write SetARV;

ARV, Usage : O, Min : 0, Max : *

Public property ROL[RepCount:Integer]: TbsROL_28 read GetROL write SetROL;

ROL, Usage : O, Min : 0, Max : *

Public property NK1[RepCount:Integer]: TbsNK1_28 read GetNK1 write SetNK1;

NK1, Usage : O, Min : 0, Max : *

Public property PV1 : TbsPV1_28 read GetPV1 write SetPV1;

PV1, Min : 1, Max : 1

Public property PV2 : TbsPV2_28 read GetPV2 write SetPV2;

PV2, Min : 0, Max : 1

Public property ARV2[RepCount:Integer]: TbsARV_28 read GetARV2 write SetARV2;

ARV, Usage : O, Min : 0, Max : *

Public property ROL2[RepCount:Integer]: TbsROL_28 read GetROL2 write SetROL2;

ROL, Usage : O, Min : 0, Max : *

Public property DB1[RepCount:Integer]: TbsDB1_28 read GetDB1 write SetDB1;

DB1, Usage : O, Min : 0, Max : *

Public property OBX[RepCount:Integer]: TbsOBX_28 read GetOBX write SetOBX;

OBX, Usage : O, Min : 0, Max : *

Public property AL1[RepCount:Integer]: TbsAL1_28 read GetAL1 write SetAL1;

AL1, Usage : O, Min : 0, Max : *

Public property DG1[RepCount:Integer]: TbsDG1_28 read GetDG1 write SetDG1;

DG1, Usage : O, Min : 0, Max : *

Public property DRG : TbsDRG_28 read GetDRG write SetDRG;

DRG, Min : 0, Max : 1

Public property PROCEDURE_[RepCount:Integer]: TbsADT_A01_PROCEDURE_28 read GetPROCEDURE_ write SetPROCEDURE_;

PROCEDURE, Usage : O, Min : 0, Max : *

Public property GT1[RepCount:Integer]: TbsGT1_28 read GetGT1 write SetGT1;

GT1, Usage : O, Min : 0, Max : *

Public property INSURANCE[RepCount:Integer]: TbsADT_A01_INSURANCE_28 read GetINSURANCE write SetINSURANCE;

INSURANCE, Usage : O, Min : 0, Max : *

Public property ACC : TbsACC_28 read GetACC write SetACC;

ACC, Min : 0, Max : 1

Public property UB1 : TbsUB1_28 read GetUB1 write SetUB1;

UB1, Min : 0, Max : 1

Public property UB2 : TbsUB2_28 read GetUB2 write SetUB2;

UB2, Min : 0, Max : 1

Public property PDA : TbsPDA_28 read GetPDA write SetPDA;

PDA, Min : 0, Max : 1


Generated by PasDoc 0.14.0.