Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

ERROR CODE "ABM0" when writing to KSDS from CICS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
bhupesh.dewangan

New User


Joined: 07 Feb 2007
Posts: 1
Location: mumbai

PostPosted: Wed Feb 14, 2007 4:21 pm    Post subject: ERROR CODE "ABM0" when writing to KSDS from CICS
Reply with quote

HII ALL,
ITRIED TO THIS BUT I GOT ERROR CODE "ABM0"
MY PROGRAMS ARE:

APLLICATION PROGRAME:
Code:
  IDENTIFICATION DIVISION.         
  PROGRAM-ID. MAP1.               
  ENVIRONMENT DIVISION.           
  DATA DIVISION.                   
  WORKING-STORAGE SECTION.         
      COPY MAP1.                   
      COPY DFHBMSCA.               
      COPY DFHAID.                 
 *01 WS-REC.                       
 *    02 WS-SRNO PIC X(5).         
 *    02 FILLER PIC X(75).         
 *    02 WS-NAME PIC X(15).       
 *77 WS-LEN PIC S9(4) COMP.       
 *77 WS-KEY PIC 9(5).             
  LINKAGE SECTION.                 
  01 DFHCOMMAREA.                 
     02 WS-REC.                   
       03 WS-SRNO PIC X(5).         
      03 FILLER PIC X(75).           
 *    03 WS-NAME PIC X(15).         
  77 WS-LEN PIC S9(4) COMP.         
 *77 WS-KEY PIC 9(5).               
  PROCEDURE DIVISION.               
       MOVE 5 TO WS-LEN.             
       MOVE LOW-VALUE TO STUDO.     
       MOVE 5 TO WS-KEY.             
      EXEC CICS SEND                 
           MAP('STUD')               
           MAPSET('MAP1')           
           ERASE                     
      END-EXEC.                     
      EXEC CICS RECEIVE             
           MAP('STUD')               
           MAPSET('MAP1')           
           LENGTH(WS-LEN)           
           INTO(WS-REC)             
      END-EXEC.                     
      EXEC CICS WRITE               
               FROM(WS-REC)         
               LENGTH(WS-LEN)       
               FILE('PROJECT')       
               RIDFLD(WS-KEY)       
      END-EXEC.                     
      EXEC CICS RETURN               
      END-EXEC. 
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Wed Feb 14, 2007 4:35 pm    Post subject:
Reply with quote

The fine Manual CICS Messages and Codes clearly states:
Quote:
ABM0
Explanation: The map specified for a basic mapping support (BMS) request could not be located.
System Action: The transaction is abnormally terminated with a CICS transaction dump.
User Response: Check if the map has been defined. If it has, check that it has been specified correctly.
Do you understand?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Feb 14, 2007 9:18 pm    Post subject:
Reply with quote

Hello,

Said slightly differently, you have a map problem, not a vsam problem.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts INDEPENDENT CICS TS 4.1 MRO REGION UP... Kyle Carroll CICS 0 Wed Dec 14, 2016 6:55 pm
No new posts CICS START AND CANCEL blayek CICS 1 Wed Dec 07, 2016 3:27 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us