|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC759 "Piccoline" |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC759 "Piccoline" Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 636 (0x27c)
Types: TextFile
Names: »MY_DEL.TXT«
└─⟦6a1b9f2c5⟧ Bits:30005310/disk3.imd Open Access II v2.10 (dansk)
└─⟦this⟧ »MY_DEL.TXT«
!==============================================================ø
! my_del: Delete a record. Get user to verify before deleting.ø
! Assumes view defined and used in main program. ø
!==============================================================ø
LIST data !allow user to select record
message = 'Delete the Record?'
DO my_veri
IF do_it
DELETE data !delete the record from the database
USE data DISPLAY cust !re-activate the view
END IF
!____________________________________________________________________________