Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Updating a record
Message
 
To
14/08/2002 19:35:25
Henry Ravichander
RC Management Systems Inc.
Saskatchewan, Canada
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00689782
Message ID:
00690086
Views:
22
So, what's your problem?

>Hi All:
>
>I have the following code in the click event of the Save Button.
>
>
IF mcheck = 0
> thisform.command2.Enabled = .t.
> mlcl_doc_nm = FoundNumber.doc_number
> if this.caption = "Save"
> update memos set Memos.FromDoc = mRefDocDispName,;
> Memos.FromDocNum = mLCL_DOC_NM,;
> Memos.ToWhom = mToAddress,;
> Memos.NameOfPat = mRefPatDispName,;
> Memos.HealthNum = mHealthCard,;
> Memos.Contents = mNOTES;
> WHERE Memos.MemoRefNum = EditThisReferralLetter.MemoRefNum
> MESSAGEBOX('Changes have been saved.', 0+64+256,'Information')
> ELSE
> messagebox ('Some of the fields on this form are empty. Please complete the form.',0+64+256,'Information')
> ENDIF
>ENDIF
- Jayesh
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform