ALERT: Some images may not load properly within the Knowledge Base Article. If you see a broken image, please right-click and select 'Open image in a new tab'. We apologize for this inconvenience.

ACF2 ASMA028E Invalid displacement Error and *** ERROR *** MINI-LID FIELD SUM when trying to assemble the ACFFDR

book

Article ID: 213520

calendar_today

Updated On:

Products

ACF2 ACF2 - MISC ACF2 - z/OS

Issue/Introduction

When assembling the ACFFDR getting errors related to the MLACICS CICS minilid. 

SMP/E errors:

GIM24001E ** ASSEMBLER PROCESSING FOR SYSMOD UM99901 FAILED FOR MODULE ACFFDR IN THE CAX1SRC0 LIBRARY. THE RETURN CODE  
              (08) EXCEEDED THE ALLOWABLE VALUE. DATE 21.112 - TIME 15:23:13.                                            
GIM30216I    APPLY PROCESSING FAILED FOR SYSMOD UM99901. SYSTEM UTILITY PROCESSING FAILED FOR AN ELEMENT IN UM99901. 

Assembler errors:

008AA8 0000002E                   21427+         DC    A(MLACICSL)

008AF0                                     21497+         DC    0S(L24131-MLACICSL) *** ERROR ***  MINI-LID FIELD SUM [email protected]
 ** ASMA028E Invalid displacement                                                                                        
 ** ASMA435I Record 124 in SYS1.ACF.CAX1MAC0(@GEN001) on volume: MG4DA6     

Resolution

The above errors will occur if the DSECT for a MLID specifies more fields which total to a value more than the fields defined in the @MLID macro. For example in the DESCT below the length of the mlid dsect contains 11 fields that add up to x'2E' and the @MLID macro only specifies 8 of the 11 fields that add up to x'20':

0000000                00000 0002E   974+MLACICS  DSECT ,                  START OF DSECT                ACF 400 03-ACDEF
 000000                              975+MLACOPCL DS    CL3                     OPERATOR CLASS           TS77227 02-MLACI
 000003                              976+MLACOPID DS    CL3                     OPERATOR ID              TS77227 02-MLACI
 000006                              977+MLACRSV1 DS    XL3                     RESERVED - MLACOPKY      TA7963J 02-MLACI
 000009                              978+MLACOPRL DS    XL3                     RESOURCE LEVEL KEY       TS77227 02-MLACI
 00000C                              979+MLACOPPR DS    XL1                     OPERATOR PRIORITY        TS77227 02-MLACI
 00000D                              980+MLACIDLE DS    XL1                     MAX IDLE TIME IN MINUTES TS75717 02-MLACI
 00000E                              981+MLACAUTH DS    XL1                     CICS AUTHORIZATION BYTE  TS77227 02-MLACI
 00000F                              982+MLACRSV2 DS    CL5                     RESERVED - MLACOPKX      TA7963J 02-MLACI
 000014                              983+MLATEST0 DS    CL12                    TEST0 NUMBER                  LG 02-MLACI
 000020                              984+MLATEST1 DS    CL6                     TEST1 LOCATION CODE           LG 02-MLACI
 000026                              985+MLAFLD12 DS    CL8                     FLD12 LOCATION CODE           LG 02-MLACI
                       0002E         986+MLACICSL EQU   *-MLACICS               LENGTH OF CICS MINI LID  T

and the @MLID macro only specifies 8 of the 11 fields that add up to x'20':

3642          @MLID CICS,MLACICS,MLACICSL,  NAME, START, LENGTH      TS77227X01010000
                                                        (LIDCOPCL,MLACOPCL),    OPERATOR CLASS         
                                                        (LIDCOPID,MLACOPID),    OPERATOR ID             
                                                        (LIDCRSV1,MLACRSV1),     RESERVED - DON'T USE   
                                                        (LIDCOPRL,MLACOPRL),    RESOURCE LEVEL KEY      
                                                        (LIDCOPPR,MLACOPPR),    OPERATOR PRIORITY       
                                                        (LIDIDLE,MLACIDLE),     MAX IDLE TIME IN MINUTES
                                                        (LIDM2FLG,MLACAUTH),    CICS SIGNON AUTH BYTE; 
                                                        (LIDCRSV2,MLACRSV2)      RESERVED - DON'T USE