08.05.2013 Views

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Ejemplo de formato libre<br />

Establecer una conversación de enlace dinámico entre un campo de<br />

entrada y una celda de una hoja de cálculo. Cuando la celda cambie, el<br />

contenido del campo de entrada también cambiará.<br />

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

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

*<br />

C EVAL %setatr('win01':'DDE1':'AppName')='APP01'<br />

C EVAL %setatr('win01':'DDE1':'Topic')='APP01.WG2'<br />

C EVAL %setatr('win01':'DDE1':'Item')='A1'<br />

C<br />

*<br />

EVAL %setatr('win01':'DDE1':'DDEAddLink')='win1|ef1'<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 'DDE1' SETATR 'win1|ef1' 'DDEADDLINK'<br />

*<br />

166 <strong>VisualAge</strong> <strong>RPG</strong> Manual de consulta de componentes

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

Saved successfully!

Ooh no, something went wrong!