Appendix B. Database generation samples 487
//* STEP 3: GRANT AUTHORITY
//PH01S06 EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=(8,LT)
//STEPLIB DD DSN=DSN610.SDSNLOAD,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(DBA1)
RUN PROGRAM(DSNTIAD) PLAN(DSNTIA61) -
LIB('DSN610.RUNLIB.LOAD')
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
GRANT DBADM ON DATABASE FMNDB2SD TO PUBLIC;
GRANT USE OF TABLESPACE FMNDB2SD.FMNDB2SD TO PUBLIC;
GRANT USE OF TABLESPACE FMNDB2SD.FMNDB2SE TO PUBLIC;
GRANT DELETE, INSERT, SELECT, UPDATE ON TABLE DAVINR1.DEPT
TO PUBLIC AT ALL LOCATIONS;
GRANT DELETE, INSERT, SELECT, UPDATE ON TABLE DAVINR1.EMP
TO PUBLIC AT ALL LOCATIONS;
GRANT DELETE, INSERT, SELECT, UPDATE ON TABLE DAVINR1.VDEPT
TO PUBLIC AT ALL LOCATIONS ...