Visual LANSA Forum

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

Hi everybody,

*HEAVYUSAGE used is not problem. Its about something else

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