INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Jobs

EditInPlace

How do I track the EIP Insert, Change, or Delete? by Gaudalier
Posted: 8 Nov 01

I'd got a EIP browse on Invoice Details, and I needed to Update the some items stuff, so the total number of Products¦items must be:

TotalProductsItems -= DetailQuantity !(Inserting)
TotalProductsItems += DetailQuantity !(Deleting)

I need a way to update the product' file, so I choose to intercept the default delete record, and do it manually!

Here The way I did it:


CASE ACCEPTED()   !LocalObjects ->Browse On XXX. TakeEvent 2500
  OF SELF.INSERTCONTROL  
    LOC:REQUEST = 1   !This value is use in EIP
  OF SELF.CHANGECONTROL  
    LOC:REQUEST = 2
  OF SELF.DELETECONTROL  
    !SELF.WINDOW.UPDATE()
    LOC:REQUEST = 3
      CASE MESSAGE('Delete the selected record',|
        'Please Confirm',ICON:QUESTION,BUTTON:YES+BUTTON:NO,BUTTON:YES,1)
      OF BUTTON:YES
        DO DeleteDetails
        BRW1.ResetFromFile
        IF BRW1.RECORDS() = 0
          Do ClearTotals
        END
        SELECT(?LIST)
      OF BUTTON:NO
        SELECT(?LIST)
      END !END CASE MESSSAGE...
    CLEAR(LOC:REQUEST)
    RETURN !this is for overide the default DELETE action!
END


Adios Amigos!.

Back to SoftVelocity: Clarion solutions FAQ Index
Back to SoftVelocity: Clarion solutions Forum

My Archive

Resources

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close