Guten Tag zusammen,

bei dem Versuch, eine MSG Subfile anzuzeigen, erhalte ich den Fehler CPF2479 (Aufrufstapeleintrag nicht gefunden.)

Die DDS Definition:
Code:
A          R MSGSFL                    SFL              
A                                      SFLMSGRCD(24)    
A            MSGKEY                    SFLMSGKEY        
A            PGMQ                      SFLPGMQ          
A*                                                      
A          R MSGCTL                    SFLCTL(MSGSFL)   
A                                      OVERLAY          
A                                      SFLDSP           
A                                      SFLDSPCTL        
A                                      SFLINZ           
A                                                       
A  30                                  SFLEND           
A                                      SFLSIZ(0003)     
A                                      SFLPAG(0001)     
A            PGMQ                      SFLPGMQ
Die Prozedurdefinition:
Code:
D sndpgmmsg       PR                  ExtPgm('QMHSNDPM') 
D  MsgID                         7A   Const              
D  MsgFile                      20A   Const              
D  MsgData                     256A   Const              
D  MsgDtaLen                    10I 0 Const              
D  MsgType                      10A   Const              
D  StackEntr                    10A   Const              
D  StackCoun                    10I 0 Const              
D  MsgKey                        4A   Const              
D  ErrorCode                    16A   Const
der Aufruf:

Code:
   sndpgmmsg(          $MsgId                  
                     : $MsgFile                
                     : $MsgDta                 
                     : %len( %trimr($MsgDta))  
                     : '*INFO'                 
                     : '*'                     
                     : 1                       
                     : *blanks                 
                     : ErrorCode );            
   msg_sflend = *on;                           
   write msgctl;
Im Joblog sind zu der gesendeten Nachricht diese Details zu finden:
Code:
Von Programm . . . . . . . . . :   Q98924A551          
  Von Bibliothek . . . . . . . :     QRPLOBJ           
  Von Modul  . . . . . . . . . :     SSTMON100R        
  Von Prozedur . . . . . . . . :     SNDCSV            
  Von Anweisung  . . . . . . . :     129900            
                                                       
An Programm  . . . . . . . . . :   Q98924A551          
  An Bibliothek  . . . . . . . :     QRPLOBJ           
  An Modul . . . . . . . . . . :     SSTMON100R        
  An Prozedur  . . . . . . . . :     FAKDET_SFLPROCESS 
  An Anweisung . . . . . . . . :     109800
Vor dem Senden der Nachricht sieht der Aufrufstapel so aus:
Code:
Von Programm . . . . . . . . . :   Q98924A551          
  Von Bibliothek . . . . . . . :     QRPLOBJ           
  Von Modul  . . . . . . . . . :     SSTMON100R        
  Von Prozedur . . . . . . . . :     SNDCSV            
  Von Anweisung  . . . . . . . :     129900            
                                                       
An Programm  . . . . . . . . . :   Q98924A551          
  An Bibliothek  . . . . . . . :     QRPLOBJ           
  An Modul . . . . . . . . . . :     SSTMON100R        
  An Prozedur  . . . . . . . . :     FAKDET_SFLPROCESS 
  An Anweisung . . . . . . . . :     109800            
       SSTMON100R WINTEST       129800            SNDCSV       
       QTEVIREF   QSYS                     /0475               
       QTESTOPH   QSYS                            _C_pep       
       QTESTOPH   QSYS          200               main         
       QTENPTS    QSYS          20                qtescren     
       QTENPTS    QSYS          36                ProgramSource
       QUIDSPP    QSYS                     /00E4               
       QUIMGFLW   QSYS                     /03C3               
       QUIEXFMT   QSYS                     /0099               
       QUIINMGR   QSYS                     /05C4               
       QWSGET     QSYS                     /0667               
       QT3REQIO   QSYS                     /0256
Wo habe ich da den Denkfehler?

Vielen Dank im Voraus für die Unterstützung.

Hubert