Mainview AutoOPERATOR: IMS commands /MOD and /MSV may fail with error message AA1310E  when issued from MainView AutoOPERATOR

Version 4
    Share This:

    This document contains official content from the BMC Software Knowledge Base. It is automatically updated when the knowledge article is modified.


    PRODUCT:

    MainView AutoOPERATOR


    COMPONENT:

    MainView AutoOPERATOR



    PROBLEM:

    IMS commands /MOD and /MSV may fail with error message AA1310E ERROR ISSUING IMS/VS COMMAND when issued from MainView AutoOPERATOR. The error occurs if there is a timing problem with the outstanding IMS WTOR


    SOLUTION:

    The following automation can be implemented to reissue command /MOD COMMIT if /MOD command fails with error message AA1310E. The solution is to create the following AutoOPERATOR Rules. Make sure these Rules are saved in a Ruleset that is either defined with Ruleset Strategy = ALL, or the order of the Rules is such that will allow all these Rules to fire.

    The following three Rules will set variable MODCMD indicating a /MOD command is active...
      SELECT(TEXTID('/MOD') TEXT('*PREPARE*') ORIGIN('IMS')) +        
     ACTION(DISPLAY(Y) SETVAR('&MODCMD' 'ACTIVE PREPARE'))        
     
     SELECT(TEXTID('/MOD') TEXT('*COMMIT*') ORIGIN('IMS')) +         
     ACTION(DISPLAY(Y) SETVAR('&MODCMD' 'ACTIVE COMMIT'))        
     
     SELECT(TEXTID('/MOD') TEXT('*ABORT*') ORIGIN('IMS')) +         
     ACTION(DISPLAY(Y) SETVAR('&MODCMD' 'ACTIVE ABORT'))        
     
    The following two Rules will reset variable MODCMD to INACT when the command is successful ...
     SELECT(TEXTID('DFS3499I') NAME('&QIMSNAME') ORIGIN('IMS') +     
    ASV('SUBSTR(&MODCMD,1,6)=ACTIVE')) +                            
    ACTION(DISPLAY(Y) SETVTGT('&QIMSNAME') SETVAR('&MODCMD' 'INACT'))

      SELECT(TEXTID('DFS058I') NAME('&QIMSNAME') ORIGIN('IMS') +         
     WHEN(&WORD3 EQ 'MODIFY'))+                                         
     ACTION(DISPLAY(Y) SETVAR('&&MODCMD' 'INACT'))                     
     
    The following Rule will retry the command if it fails with AA1310E...
    SELECT(TEXTID('AA1310E') ORIGIN('JRNL') +
    ASV('SUBSTR(&MODCMD,1,6)=ACTIVE')) +    
    ACTION(DISPLAY(Y) CMDIMS('MOD COMMIT'))

    Note:
    If you determine that you need to wait a few seconds for the next IMS WTOR to reappear before repeating /MOD COMMIT, you can update the last Rule to specify the DLY parameter before reissuing the command. For example to wait 3 seconds: CMD (Type IMS )  ===> DLY(3):MOD COMMIT
     


    Article Number:

    000188639


    Article Type:

    Solutions to a Product Problem



      Looking for additional information?    Search BMC Support  or  Browse Knowledge Articles