Returns True if the specified mapping object is being created and has not been saved in the database yet.
object.IsNew
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISMappingObject interface |
bool
Display IsNew for the mapping object.
Dim aResult
Dim aPatientId
Dim aCaseId
Dim aCase
Dim aMessage
aResult = Profile.Lookup_PatientCaseSearch(aPatientId, aCaseId, "", true)
if not aResult then exit sub
Set aCase = Profile.OpenCase(aCaseId) 'ISCase inherits from ISMappingObject
aMessage = aCase.CaseTitle & vbNewLine &_
"GUID: " & aCase.GUID & vbNewLine &_
"OID: " & aCase.OID & vbNewLine &_
"PartitionId: " & aCase.PartitionId & vbNewLine &_
"IsNew: " & aCase.IsNew
Profile.MsgBox(aMessage)