Returns True if the CDO transaction 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
ISCDOTransaction interface |
bool
Display IsNew for the CDO transaction.
Dim aPatient
Dim aForm
Dim aTrans
Dim aMessage
Set aPatient = Profile.SelectPatient
set aForm = Profile.OpenFormByPath(aPatient.Id, "Clinical\Antenatal Form", true, true)
aForm.ShowModal
set aTrans = aForm.CDOTransaction
aMessage =_
"Transaction ID: " & aTrans.ID & vbNewLine &_
"Created On: " & aTrans.CreatedOn & vbNewLine &_
"Is New: " & aTrans.IsNew & vbNewLine
Profile.MsgBox(aMessage) In Profile Client v8 on User Interface Is New cannot be found.