// Display the table
Table (1,1) (10,80) name="salesOrder" title="Sales Order Items"
Column "Position" size=10 name="position" -readOnly
Column "Material" size=20 name="material"
Column "Quantity" size=10 name="quantity"
Column "Price" size=15 name="price"
// Add a delete button column
Column "Action" size=10 -pushButton label="@11\QDelete Position@Delete" _
process="delete_position.txt"
PushButton (11,64) "Fill example data" "?" process="fill_example_data.txt"
/// Get the row number of the selected position
Set V[RowToDelete] "&V[_tabrow]"
// Ensure the row number is valid before deleting
DeleteRow table=V[salesOrder] index=&V[RowToDelete]
if Q[ok]
Message "Position &V[RowToDelete] deleted successfully." -statusline
else
Message "Failed to delete position. Invalid row selected." -statusline
endif
Return