Guten Tag zusammen,

ich versuche aus einem Programm "PAR801" eine Prozedur eines Serviceprogramms
"PAR999" anzusprechen, bekomme jedoch beim Wandeln von "PAR801" folgende
Fehlernachricht:
" Objekt QZDMMDTA der Art *SRVPGM in Bibliothek QSOC nicht gefunden. Definition für Symbol 'pr_art800' nicht gefunden."

PAR999 ist als Modul und dann als Serviceprogramm gewandelt.
Ich habe ein Binderverzeichnis "PAR999_BND" erstellt mit Modul "PAR999".

BNDDIR Eintrag in PAR801:
Code:
 H Bnddir('PAR999_BND')
Prototyp im PAR801:
Code:
     D test            PR              *   extproc('pr_art800')                                             
     D  Firma                        10I 0 value                                                            
     D  Artnr                        10I 0 value                                                            
     Dgetlabz          S               *
Der Aufruf in PAR801:
Code:
  
firm = 1;                                                                                     
arte = 278442;                                                                                 
getlabz = test(firm:arte);                                                                   
labz = %str(%addr(getlabz));
Prozedurdefinition in PAR999:
Code:
       dcl-proc pr_art800 export ;
     D pr_art800       PI              *
     D FIRMA                         10I 0
     D ARTNR                         10I 0
     d LABZ            S               *   inz
weiß jmd Rat, weshalb die Prozedur nicht gefunden wird?