|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M 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)
└─⟦6a1b9f2c5⟧ Bits:30002675 Open Access II v2.10 Disk 3/5 - Dansk - RC Partner
└─⟦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
!____________________________________________________________________________