Power Builder - TIP - Recorrer un Datawindow campo por campo

   
Vista:

TIP - Recorrer un Datawindow campo por campo

Publicado por JeinnerH (638 intervenciones) el 01/07/2010 20:00:17
Aquí les dejo otro Tìp, para que lo tomen en cuenta, de cómo recorrer un DW y cambiar un atributo.

For li_Columna=1 to Integer(dw_empleado.Object.DataWindow.Column.Count)
// Desplegar Información de Las Columnas.
Messagebox('Columna', 'C('+String(li_Columna)+') Nombre:'+String(dw_empleado.Describe('#'+String(li_Columna)+'.Name'))+' Tipo:'+String(dw_empleado.Describe('#'+String(li_Columna)+'.Type'))+' Dato:'+String(dw_empleado.Object.Data[1, li_columna]))

// Modificar el Color de Fondo y Revisar si el Modify Produce ERROR.
ls_error=dw_empleado.Modify('#'+String(li_Columna)+".Background.Color="+String(RGB(192, 192, 192)))
If ls_error <> '' Then &
Messagebox('ERROR', 'ERROR:'+ls_error)

// Proteger Todos Los Campos.
dw_empleado.Modify('#'+String(li_Columna)+'.Backgroud.Protect=1')
Next
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder