Preventing program deletion

Michael

Hola all,

My client just had an issue where a beginner programmer accidentally deleted a program from the main OI screen. The OI checkin/checkout is not used. I don't think the repository keeps a backup copy?

Two questions:
1. Is there a good system/repository setting to prevent deletion of programs (source and object)
2. Is there any other option to prevent deletion on SYSPROCS/SYSOBJ?

I'm about to write an MFS. Just checking before I take the plunge.

Gracias!

Michael

DonBakke

If this is a beginner programmer perhaps you can change their access level from System Administrator to just Administrator. I think that should disable the Entity menu and avoid accidental deletes.

Michael

Got it. But the authorities want to lock it down.

Do I need to just write an MFS to block deletes?

DonBakke

That is a solution. Not sure if it is the best solution.

Michael

I'm definitely open to better!

DonBakke

I can't offer better because you are obviously under constraints from "powers that be", and I don't know enough to offer alternatives that would satisfy their expectations. Otherwise this would be playing 20 questions and nobody got time for that. ;)

Michael

Thanks anyway, sir

Michael

So I wrote the MFS and it works to prevent deletion in SYSPROCS. But if someone deletes from the OI main window, it leave the SYSPROCS record but deletes the rest and it's no longer considered a "stored procedure." To make it work again, one would need to edit the SYSPROCS record, copy and then paste into a new stored procedure and recompile.

Is there a better way to handle? Ideally I'd like to completely block the all the deletes associated with the program in question. Do I need to put the MFS on SYSREPOS or SYSOBJ or ?

Thanks again!

DonBakke

Putting an MFS on SYSREPOS is doable but I consider it to be too risky. I suggest creating a hook for the Repository function and adding logic that bypasses the DELETE request for certain conditions.