CALL PGM(DCXP8731) PARM(U_BIF550 Y)

This Q&A forum allows users to post and respond to "How Do I Do ....." questions. Please do not use to report (suspected) errors - you must use your regional help desk for this. The information contained in this forum has not been validated by LANSA and, as such, LANSA cannot guarantee the accuracy of the information.
Post Reply
mbulka
Posts: 18
Joined: Fri Oct 12, 2018 9:25 am

CALL PGM(DCXP8731) PARM(U_BIF550 Y)

Post by mbulka » Sun Oct 14, 2018 11:27 pm

Hi Everybody,

I have question.

When I try to create service program using CALL PGM(DCXP8731) PARM(U_BIF550 Y)
where U_BIF550 is BIF name and Y debug enabled
and I put QSRVSRC in QTEMP with binder,
why I received the error, that there is no 'current' block, even if I have EXPORT symbols named in and there is No reason to do not work ?
(When I do CRTSRVPGM manually, it works without problems).

Lansa RDMLX Function is RDMLX enabled and *HEAVYUSAGE used.

Thank you in advance
Kind Regards,
Miroslav

mbulka
Posts: 18
Joined: Fri Oct 12, 2018 9:25 am

Re: CALL PGM(DCXP8731) PARM(U_BIF550 Y)

Post by mbulka » Thu Oct 18, 2018 2:28 am

Hi everybody,

*HEAVYUSAGE used is not problem. Its about something else

mbulka
Posts: 18
Joined: Fri Oct 12, 2018 9:25 am

Re: CALL PGM(DCXP8731) PARM(U_BIF550 Y)

Post by mbulka » Thu Oct 18, 2018 8:11 am

I have done manually CRTSRVPGM, but I would like to kindly ask you, if you can say the prerequisites to be done by DCXP8731.

Post Reply