VisualAge RPG Parts Reference - IBM

|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
RmvSrcEvt
Elimina un evento de origen de la lista de eventos que supervisa el componente de
referencia a componente lógico. Este atributo, junto con el atributo AddSrcEvt,
permite a un componente de referencia a componente lógico supervisar varios
eventos. Para añadir nuevos eventos de origen, utilice el atributo AddSrcEvt.
Para identificar el evento de origen que se elimina, especifique juntos los nombres
del componente lógico, la ventana, el componente y el evento. El formato de la
serie es:
'NOMBRECOMPLÓGICO | NOMBREVENTANA | NOMBRECOMP | NOMBREVENTO'
Dado que el compilador no realiza ninguna comprobación de validez, deberá
identificar correctamente cada evento de origen.
Tipo Serie
Se aplica a los componentes
Referencia a
componente lógico
Códigos de operación
SETATR
Operativo en tiempo de ejecución
sí
GETATR no
Ejemplo de formato libre
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+.
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
D Event
*
S 100
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----
*
C EVAL Event='compb|win02|ef02|change'
C EVAL %setatr('win01': 'CRP1':
C
*
'RmvSrcEvt')=Event
Ejemplo de formato fijo
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+.
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
D Event
*
S 100
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----
*
C EVAL Event='compb|win02|ef02|change'
C
*
'CRP1' SETATR Event 'RMVSRCEVT'
360 VisualAge RPG Manual de consulta de componentes