IBM OS/2 LAN Server REXX Utility DLL

0.9b (c) 1995 Peter Childs

NETAPP Set Info

The function modifies one of the application definition parameter values.   

Syntax 

MyRc = NetSetInfo(NETAPP, 'PARAMETER', parmValue, SrvName, AppName, UserId)

Parameters 

The parameters required are: 

'PARAMETER'       The parameter name of the application value to be 
                  modified. The parameter values that causes a change of 
                  the alias definitions are specified below. Only one 
                  parameter value can be changed at a time. If the 
                  parameter is invalid or the parameter value is unknown 
                  or in error no changes will occour. 

   o remark 

     The application remark 

   o command 

     The command that starts the application 

   o command_parms 

     The application start parameters 

parmValue         The value of the parameter that is being modified 

SrvName           The server computer name. In this case the computer name 
                  of the domain controller 

AppName           The name of the application 

UserId            The Userid must be specified for private application. 
                  For public applications use the value '' 
  

Note 

The server computer name can be specified as '' for a local domain 
controller.   

Example   

/* Modify existing Public application remark */
call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

NETAPP  = 30
SrvName = '\\ILIDC'
AppName = 'BOOKREAD'
UserId  = ''
appInfo.remark  = 'IBM BookManager Read/2 1.2.1'

myRc = NetSetInfo(NETAPP, 'remark', appInfo.remark, SrvName, AppName, UserId)

if myRc <> '0' then do
 say 'Got error from NetSetInfo() ' myRc
 call DropLsRxutFuncs
 exit 9
end
else do
 say
 say "Application remark modified successfully"
end

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit 0

Example Output   

Application remark modified successfully

Inf-HTML End Run - Successful