VisualAge RPG Parts Reference - IBM
VisualAge RPG Parts Reference - IBM VisualAge RPG Parts Reference - IBM
AddRcd Añade un registro nuevo a un contenedor Tipo Serie Se aplica a los componentes Contenedor Códigos de operación SETATR Operativo en tiempo de ejecución sí GETATR no Valor permitido El valor que se transfiere a este atributo debe ser una serie que conste de los parámetros siguientes, cada uno separado por un espacio: Estructura de registro ID Valor numérico utilizado para identificar el registro. Declare este valor de modo que pueda contener la cantidad máxima de registros que espera que contenga el contenedor. Nota: Puede utilizar el atributo GetNewID para que VisualAge RPG genere un identificador exclusivo para usted. Text Texto que aparecerá junto al icono del registro cuando el contenedor esté en la vista de iconos o en la vista de árbol. FileName Nombre de archivo del icono. ParentID Identificador del registro padre de este registro. Si el registro no tiene padre, este parámetro tendrá el valor 0. field_data Este valor es opcional. Si se especifica, los datos se situarán en los campos correspondientes del registro. Es necesario proporcionar datos para todos los campos del registro. El número de campos de cada registro del componente contenedor en el diseñador GUI ya está definido; por tanto, sólo debe especificar ese número. Nota: Si los datos de un campo no están disponibles, utilice el carácter de subrayado (_)como reserva de posición para el campo. Si un campo contiene blancos intercalados, deben sustituirse por el carácter de subrayado antes de añadir el registro. Los blancos intercalados aparecerán en los datos del campo del registro añadido. Los datos de los campos se pueden actualizar después de añadir el registro utilizando el atributo SetRcdFld. Ejemplo de formato libre 62 VisualAge RPG Manual de consulta de componentes
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+. DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++ D NewRecord D RecordID 1 6 D FileName 8 64 D Parent 1 6 INZ(0) D Text 8 20 INZ('Next record') * *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C Eval RecordID=%getatr('win01': 'CN1': 'GetNewID') C Eval FileName = 'D:\VRPG\NEW.ICO' C Eval %setatr('win01': 'CN1': 'AddRcd') = NewRecord * Ejemplo de formato fijo *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C 'CN1' SETATR NewRecord 'ADDRCD' * Capítulo 2. Atributos de componente 63
- Page 30 and 31: | Contenedor Utilice el componente
- Page 32 and 33: Campo de entrada Utilice el compone
- Page 34 and 35: | Gráfica El componente gráfica l
- Page 36 and 37: Atributos de componente Bottom Enab
- Page 38 and 39: Barra de desplazamiento horizontal
- Page 40 and 41: Atributos de componente AddLink* Al
- Page 42 and 43: Recuadro de lista Utilice el compon
- Page 44 and 45: Panel de medios Nota: Este componen
- Page 46 and 47: Elemento de menú Utilice los eleme
- Page 48 and 49: Edición de múltiples líneas Util
- Page 50 and 51: Página de cuaderno Utilice el comp
- Page 52 and 53: Interfaz ODBC/JDBC El componente In
- Page 54 and 55: Recuadro de contorno Utilice un rec
- Page 56 and 57: Barra de progreso Utilice el compon
- Page 58 and 59: Botón de selección Utilice botone
- Page 60 and 61: Selector cíclico Utilice el compon
- Page 62 and 63: Barra de estado Utilice el componen
- Page 64 and 65: Submenú Utilice un submenú para:
- Page 66 and 67: Barra de desplazamiento vertical Ut
- Page 68 and 69: | Ventana con lienzo Las ventanas s
- Page 70 and 71: Activate Establezca este atributo e
- Page 72 and 73: AddEvent Añade el nombre de evento
- Page 74 and 75: AddLineEnd Añade una nueva línea
- Page 76 and 77: Tipo Serie Se aplica a los componen
- Page 78 and 79: AddMsgText Añade un mensaje al com
- Page 82 and 83: | | | | | | | | | | | | | | | | | |
- Page 84 and 85: Alignment Este atributo determina c
- Page 86 and 87: AllowChg * Restricción: Este atrib
- Page 88 and 89: AllowLink * Restricción: Este atri
- Page 90 and 91: AppData Contiene datos globales a l
- Page 92 and 93: Arrange Ordena los elementos de un
- Page 94 and 95: AudioMode Establece la modalidad de
- Page 96 and 97: | | | | | AutoScroll * Restricción
- Page 98 and 99: AutoSelect Indica si se resalta el
- Page 100 and 101: 11 Rosa oscuro 12 Verde oscuro 13 C
- Page 102 and 103: BarLabel Indica cuál es la etiquet
- Page 104 and 105: | | | | | BindPart Restricción: Es
- Page 106 and 107: Border Determina si el componente t
- Page 108 and 109: | | | | | BufferDec * Restricción:
- Page 110 and 111: BufferPtr * Restricción: Este atri
- Page 112 and 113: Se aplica a los componentes Interfa
- Page 114 and 115: ButtonIdx Establece y obtiene el í
- Page 116 and 117: ButtonTip Define el texto de la ayu
- Page 118 and 119: CapsLock Determina si el texto que
- Page 120 and 121: CellBGClr Valor numérico que deter
- Page 122 and 123: CellBGMix Consulta o establece la m
- Page 124 and 125: 11 Rosa oscuro 12 Verde oscuro 13 C
- Page 126 and 127: Center Cuando se establece en 1, la
- Page 128 and 129: CharOffset Determina el valor de de
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+.<br />
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++<br />
D NewRecord<br />
D RecordID 1 6<br />
D FileName 8 64<br />
D Parent 1 6 INZ(0)<br />
D Text 8 20 INZ('Next record')<br />
*<br />
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />
*<br />
C Eval RecordID=%getatr('win01': 'CN1': 'GetNewID')<br />
C Eval FileName = 'D:\V<strong>RPG</strong>\NEW.ICO'<br />
C Eval %setatr('win01': 'CN1': 'AddRcd') = NewRecord<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 'CN1' SETATR NewRecord 'ADDRCD'<br />
*<br />
Capítulo 2. Atributos de componente 63