Hast du schon probiert den die Handler-Proc genau so zu definieren wie in der Doku beschrieben?
Code:
D info      DS
D attrName        20A VARYING
D haveAttr          N
D attrValue       20A VARYING
* Prototype for procedure "myHandler" defining
* the communication-area parameter as being
* like data structure "info"
D myHandler  PR   10I 0
D commArea              LIKEDS(info)
D event           10I 0 VALUE
D string            *   VALUE
D stringLen       20I 0 VALUE
D exceptionId     10I 0 VALUE
lg Andreas