[SOLVED] CHAIN im Modul macht mich Wahnsinnig

[VisioX]

Hi

ich habe schon %found probiert. Vor lauter langeweile hab ich auch schon %eof, %error und was auch immer getestet.
Selbst das CHAIN habe ich schon durch SETLL und READE ersetzt.
Das gleiche Ergebniss. :-(

Aber so wie es aussieht hat die Maschine hier wohl eh ein paar Probleme mit Modules und Service-Programm. Beim Compilieren eines Programmes erzaehlt er mir jetzt was von Doppeldefinitionen.... "DEFINITION SUPPLIED MULTIPLE TIMES FOR SYMBOL 'PGMNDS'"
Angeblich 2 mal als EXPORT definiert. Dabei ist es nur im Modul als EXPORT definiert, im Serviceprogram als IMPORT.

Guido

Hi Guido,

hast Du schonmal die Bezugszahl 60 durch "%found" ersetzt?

C KEYPGM CHAIN PGMP2
C If %found(PGMP2)

Gruß Michael

[VisioX]

Hi Ho

Hab's hinbekommen. Hatte ausversehen mein Service program als *MODULE und *SRVPGM im BNDDIRE stehen. Nachdem ich den eintrag fuer das *SRVPGM geloescht habe klappt alles wie am Schnuerchen ;-)

Danke,
Guido