ISPatient.GMSAt

Description

This function returns the GMS code of the patient for the selected date.

Syntax

object.GMSAt(aDate)

Part Attribute Type Description
object Required
ISPatient
The object always implements the ISPatient interface
aDate In, Required
DateTime
The date the GMS code is calculated for

Return Value

string

Returns the GMS code of the patient for the selected date.

Example

Display the GMS code of the patient for the selected date.

Dim aPatient  
Dim aGMSAt

Set aPatient = Profile.SelectPatient 
aGMSAt = aPatient.GMSAt(#01/01/2019#)
Profile.MsgBox(aGMSAt)
Note:

In Profile Client v8 on User Interface GMS can be found in Patient > Alter Patient > Organisation > GMS field.

Version information

Added in v7.8.0
Parent topic: ISPatient