Object: ID_6
Name:
Type:
Bar
Prompt:
R
emove Line Item
Or.:
2
Mark:
Shortcut
Negotiate
Key Label:
CTRL+DEL
Container:
None
Key Text:
Ctrl+Del
Object:
None
Skip For:
!
FormIsObject
(
)
OR
!
_screen
.
Activeform
.
lAllowDelete
OR
TYPE
(
"_screen.Activeform.Activecontrol"
)
<
>
"O"
OR
UPPER
(
_screen
.
Activeform
.
Activecontrol
.
BaseClass
)
<
>
"GRID"
Message:
"Remove items from the current order"
Comment:
Execute type:
Command
_screen
.
Activeform
.
GridRemoveItem
(
)