MacKinney Systems, Inc.

Q:

Customer wants only browse function capability in IVU. Wants to remove all other functionality.
Tech support note: this same technique can be used to limit availability of any IVU function


A:

Edit VSMPN10 in ISPPLIB find the section of code shown below:

                &ZSEL = TRANS( TRUNC (&ZCMD,'.')
                ' ','PGM(VSMPG10)'
                'D','CMD(VSDEL)'
                'E','CMD(VSEDIT)'
                'ECTEST','CMD(VSEDIT)'
                'EC','CMD(VSEDIT)'
                'BC','CMD(VSBROW)'
                'B','CMD(VSBROW)'
                'BF','CMD(VSBROW)'
                'R','PGM(VSMPG40)'
                'C','PANEL(VSMPN50)'
                'GARY','PANEL(VSMPN60)'
                'AK','CMD(VSALLOC)'
                'AR','CMD(VSALLOC)'
                'AE','CMD(VSALLOC)'
                'AA','CMD(VSALLOC)'
                'AN','CMD(VSALLOC)'
                'AL','PGM(VSMPG64)'
                'SC','CMD(VSSC)'
                'TEST','PGM(VSMPG99)'
                'T','PGM(ISPTUTOR) PARM(VSMPH000)'
                X,'EXIT'
                *,'?' )


Simply delete the line that contains the command you do not want the users to access. For example, if you do not want them to be able to edit ('E') then delete the line:
                'E','CMD(VSEDIT)'