CPF950D error in QMHRDQM API

This is a Mainframe COBOL forum - you can post your queries on Mainframe COBOL, VS COBOL II, COBOL/370 , Enterprise COBOL

Moderators: dbzTHEdinosauer, Moderator Group

Post Reply
Posts: 1
Joined: Tue Feb 17, 2015 2:32 am

CPF950D error in QMHRDQM API

Post by ecgberht » Tue Feb 17, 2015 2:35 am

I am trying to make the QMHRDQM API work and am getting the error CPF950D The specified message selection template length is not valid. I believe I have followed the IBM documentation to the letter in setting up my working storage. Anyone have a clue?

Code: Select all

01  WS-LOCAL-VARIABLES.                                         
    05  QMHRDQM-DATA          PIC X(1000).                      
    05  QMHRDQM-LENGTH        PIC 9(04) BINARY.                 
    05  QMHRDQM-FORMAT        PIC X(8) VALUE "RDQM0100".        
    05  QMHRDQM-NAME          PIC X(20).                        
    05  QMHRDQM-MSI.                                            
        10  MSI-SELTYPE       PIC X(1) VALUE 'F'.               
        10  MSI-FILLER        PIC X(3) VALUE SPACES.            
        10  MSI-CNT           PIC 9(4) BINARY.                         
    05  QMHRDQM-MSIL          PIC 9(4) BINARY.                  
    05  QMHRDQM-MSIF          PIC X(8) VALUE "RDQS0100".        
    05  QMHRDQM-ERROR         PIC X(100).                        
The code for the actual call looks like this:

* Read data queue

Code: Select all

      INITIALIZE QMHRDQM-DATA                              
      INITIALIZE MSI-FILLER                                
      MOVE 1000 TO QMHRDQM-LENGTH                          
      MOVE 8 TO QMHRDQM-MSIL                               
      MOVE 'F' TO MSI-SELTYPE                              
      MOVE 10 TO MSI-CNT                                   
      CALL "QMHRDQM" USING  QMHRDQM-DATA                   

code tags added by dbz

Posts: 1
Joined: Thu May 28, 2015 1:12 pm

Post by Generalfres » Thu May 28, 2015 1:42 pm

I can not find any information in this section.

ibcbet mobile
Last edited by Generalfres on Mon May 29, 2017 8:47 am, edited 1 time in total.

William Collins
Active Member
Posts: 732
Joined: Thu May 24, 2012 4:07 am

Post by William Collins » Thu May 28, 2015 3:12 pm

That's because you're just scamming around. The system has noticed that, and realises there is no point showing you anything of actual value.

User avatar
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Mon Jun 01, 2015 6:50 pm

what is the Qualified data queue name?
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

Post Reply


Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Mainframe Interview questions

Other References
Mainframe Tools and others