Consultor Eletrônico



Kbase 35756: How to delete a table and it's corresponding objects via the 4GL
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   10/05/1998
Solution ID: P5756

GOAL:

How to delete a table and it's corresponding objects via the 4GL

FIX:

The following procedure will delete a table and its related objects. Be sure to consult with the database administrator before this program is run.

FIND _File WHERE _File._File-name = "ENTER TABLE_NAME HERE".
FOR EACH _Index OF _File:
FOR EACH _Index-field OF _Index:
DELETE _Index-field.
END.
DELETE _Index.
END.
FOR EACH _File-trig OF _File:
DELETE _File-trig.
END.
FOR EACH _Field OF _File:
FOR EACH _Field-trig OF _Field:
DELETE _Field-trig.
END.
DELETE _Field.
END.
DELETE _File.