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.

InsertLine<br />

Inserta la serie especificada en el campo de edición de múltiples líneas en la<br />

posición especificada mediante el atributo LineNumber actual. Todas las líneas<br />

siguientes a la que se ha insertado descienden una línea.<br />

Tipo Serie<br />

Se aplica a los componentes<br />

Edición de múltiples<br />

líneas<br />

Códigos de operación<br />

SETATR<br />

Operativo en tiempo de ejecución<br />

sí<br />

GETATR no<br />

Valor permitido<br />

La serie que se añadirá al campo de edición de múltiples líneas<br />

Ejemplo de formato libre<br />

Insertar texto en el desplazamiento 10 en un campo de edición de<br />

múltiples líneas:<br />

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

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

*<br />

C EVAL %setatr('win01': 'MLE1': 'LineNumber') = 10<br />

C EVAL %setatr('win01': 'MLE1': 'InsertLine') = 'text'<br />

*<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 'MLE1' SETATR 10 'LINENUMBER'<br />

C<br />

*<br />

'MLE1' SETATR 'text' 'INSERTLINE'<br />

256 <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!