Hola. Por lo que veo, no est�s enviando par�metros de la CL al programa,
sino que est�s grabando datos en la *lda y ley�ndolos luego en el programa.
En la Cl tienes que hacer
CALL PGM (MONP6F) PARM(&edad &durac &pensio &Sexo........)
y en el PGM:
C *ENTRY PLIST
C PARM Edad 2 0
C PARM Durac 2 0
C PARM Pensio 2 0
C PARM Sexo 1
Si lo que quieres es grabarlos en la *lda para leerlos en el programa, s�lo
tienes que buscarte posiciones vac�as dentro de ella. En la Cl grabas los
datos como (yo he puesto a partir de la 600)
CHGDTAARA DTAARA(*LDA (600 10)) VALUE(&tot1)
CHGDTAARA DTAARA(*LDA (611 12)) VALUE(&tot2)...
y luego recuperarlos en la definici�n de la UDS
0010.00 I*
0011.00 I UDS
0012.00 I 100 1010PARM1
0013.00 I 102 1030PARM2
0014.00 I 121 1356TOTAL
0014.01 I 250 250 PARM11
I 600
6102tot1
I 611
6232Tot2
Si te he entendido bien ,es algo as�.
<<attachment: winmail.dat>>
