How to create an RPG program that returns a value

["Denis Robitaille" <denis_robitaille@xxxxxxxxxxxx>]

Hello all,

I want to control DDM access with an exit program. To do so, I must specify a program on the DDMACC parameter of the CHGNETA command.

I found the documentation for the different parameters. But the program must retune a value of 0/1. I know how to specify return value on a sub procedure in a service program but not directly on a RPG program. The example on the documentation is written in C.

Can someone point me in the right direction?

Thanks in advance.

Denis Robitaille
Directeur Service technique TI
CASCADES INC.
412 Marie Victorin
Kingsey falls(QuÃbec) Canada J0A 1B0
T : 819 363-6130
F : 819 363-6155