08.05.2013 Views

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

GetRcdFld<br />

Devuelve el contenido de un campo de un registro de contenedor. El atributo<br />

RecordID del contenedor debe estar establecido para indicar qué registro de<br />

contenedor se ha de utilizar. También debe estar establecido el atributo<br />

ColNumber para indicar el campo del que se recuperarán los datos.<br />

Tipo Serie<br />

Se aplica a los componentes<br />

Contenedor<br />

Códigos de operación<br />

SETATR<br />

Operativo en tiempo de ejecución<br />

no<br />

GETATR sí<br />

Ejemplo de formato libre<br />

*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />

CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />

*<br />

C EVAL %setatr('win01': 'CN1': 'RecordID')=ID<br />

C EVAL %setatr('win01': 'CN1': 'ColNumber')=1<br />

C<br />

*<br />

EVAL data = %getatr('win01': 'CN1': 'GetRcdFld')<br />

Ejemplo de formato fijo<br />

*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />

CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />

*<br />

C 'CN1' SETATR ID 'RECORDID'<br />

C 'CN1' SETATR 1 'COLNUMBER'<br />

C<br />

*<br />

'CN1' GETATR 'GETRCDFLD' data<br />

Capítulo 2. Atributos de componente 221

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!