RMVIFSSHR は ADDIFSSHR で共有化したIFSのフォルダーを解除するコマンドである。

処理の手順は

1. RMVIFSSHR コマンドで共有フォルダーを解除する。
2. OS400のNetServer を次のように再起動する。

   ENDTCPSVR *NETSVR
   STRTCPSVR *NETSVR

RMVIFSSHR は EnterpriseServer Ver3.0 のIFSメニュー（GO IFS）に搭載されている。

【 コマンド RMVIFSSHR 】

0001.00              CMD        PROMPT('IFS 共有の削除 ')                      
0002.00              PARM       KWD(SHARENAME) TYPE(*CHAR) LEN(12) MIN(1) +    
0003.00                           PROMPT(' 共有名 ')

【 コンパイル 】

CRTCMD CMD(MYLIB/RMVIFSSGR) PGM(MYLIB/RMVIFSSHRC) SRCFILE(MYSRCLIB/QCMDSR) AUT(*ALL)

【 CLP : ADDIFSSHRC 】

0001.00              PGM        PARM(&SHARENAME)                         
0002.00 /*---------------------------------------------------------*/    
0003.00 /*   RMVIFSSHR   :    IFS 共有の削除                       */    
0004.00 /*---------------------------------------------------------*/    
0005.00              DCL        VAR(&MSG) TYPE(*CHAR) LEN(80)            
0006.00              DCL        VAR(&SHARENAME) TYPE(*CHAR) LEN(12)      
0007.00              DCL        VAR(&PATHLEN) TYPE(*CHAR) LEN(4)         
0008.00              MONMSG     MSGID(CPF0000) EXEC(GOTO CMDLBL(ERROR))  
0009.00                                                                  
0010.00              CALL       PGM(QZLSRMS) PARM(&SHARENAME X'00000000')
0011.00              SNDPGMMSG  MSG(' 共有 ' *BCAT &SHARENAME *BCAT +    
0012.00                           ' が削除されました。 ') MSGTYPE(*COMP) 
0013.00              RETURN                                              
0014.00                                                                  
0015.00  ERROR:      RCVMSG     RMV(*NO) MSG(&MSG)                       
0016.00  SNDMSG:     SNDPGMMSG  MSG(&MSG) TOMSGQ(*SYSOPR)                
0017.00              ENDPGM

【 コンパイル 】

CRTCLPGM MYLIB/RMVIFSSHRC SRCFILE(MYSRCLIB/QCLSRC) AUT(*ALL)