ALLBASE/SQL Reference Manual (36216-90216)

Appendix C 639
Sample DBEnvironment
CREASEC Command File
CREASEC Command File
/* This file sets up authorities for the PurchDB and RecDB databases.*/
/* The DBA for the sampledb DBEnvironment is the DBEUserID John. */
REVOKE ALL ON ManufDB.SupplyBatches FROM PUBLIC;
REVOKE ALL ON ManufDB.TestData FROM PUBLIC;
REVOKE ALL ON PurchDB.Parts FROM PUBLIC;
REVOKE ALL ON PurchDB.Inventory FROM PUBLIC;
REVOKE ALL ON PurchDB.SupplyPrice FROM PUBLIC;
REVOKE ALL ON PurchDB.Vendors FROM PUBLIC;
REVOKE ALL ON PurchDB.Orders FROM PUBLIC;
REVOKE ALL ON PurchDB.OrderItems FROM PUBLIC;
REVOKE ALL ON PurchDB.Reports FROM PUBLIC;
REVOKE ALL ON RecDB.Members FROM PUBLIC;
REVOKE ALL ON RecDB.Clubs FROM PUBLIC;
REVOKE ALL ON RecDB.Events FROM PUBLIC;
GRANT DBA TO John;
/* The following commands create the group for the Purchasing */
/* Department. This group has SELECT authority on all tables */
/* and views of the PurchDB database. It also has INSERT */
/* and UPDATE authority for reports. */
CREATE GROUP PurchManagers;
ADD Margy TO GROUP PurchManagers;
ADD Ron TO GROUP PurchManagers;
ADD Sharon TO GROUP PurchManagers;
GRANT SELECT ON PurchDB.Parts TO PurchManagers;
GRANT SELECT ON PurchDB.Inventory TO PurchManagers;
GRANT SELECT ON PurchDB.SupplyPrice TO PurchManagers;
GRANT SELECT ON PurchDB.Vendors TO PurchManagers;
GRANT SELECT ON PurchDB.Orders TO PurchManagers;
GRANT SELECT ON PurchDB.OrderItems TO PurchManagers;
GRANT SELECT ON PurchDB.VendorStatistics TO PurchManagers;
GRANT SELECT ON PurchDB.PartInfo TO PurchManagers;
GRANT SELECT, INSERT, UPDATE ON PurchDB.Reports TO PurchManagers;
/* The following commands create the group that will maintain */
/* the database. This group has RESOURCE authority, and all */
/* table and view authorities for the tables and views of the */
/* PurchDB database. */
CREATE GROUP PurchDBMaint;
ADD Annie TO GROUP PurchDBMaint;
ADD Doug TO GROUP PurchDBMaint;
ADD David TO GROUP PurchDBMaint;
GRANT RESOURCE TO PurchDBMaint;
GRANT ALL ON PurchDB.Parts TO PurchDBMaint;
GRANT ALL ON PurchDB.Inventory TO PurchDBMaint;