VisualAge RPG Parts Reference - IBM

AddLineEnd
Añade una nueva línea después de la última línea de un campo de edición de
múltiples líneas.
Tipo Serie
Se aplica a
Edición de múltiples
líneas
Códigos de operación
SETATR
Operativo en tiempo de ejecución
sí
GETATR no
Valor permitido
La nueva línea de texto
Ejemplo de formato libre
Obtener el valor de texto de un campo de entrada y añadirlo al final de un
campo de edición de múltiples líneas
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----
*
C EVAL %setatr('win01':'MLE1':'AddLineEnd')=newtext
*
Ejemplo de formato fijo
Añadir una línea al final de un campo de edición de múltiples líneas.
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----
*
C 'MLE1' SETATR 'NEWTEXT' 'ADDLINEEND'
*
56 VisualAge RPG Manual de consulta de componentes