Puede ser...
Long ll_row, ll_col
Integer li_cont
// Recorre todas las filas
For ll_row = 1 To dw_1.RowCount()
// Inicializa contador por fila
li_cont = 0
// Recorre las N columnas (En este caso las 4)
For ll_col = 1 To 4
If Not IsNull( dw_1.GetItemDate( ll_row, 'dosis'+String(ll_col) ) ) Then
// Incrementa contador
li_cont ++
End If
Next
// Setea el contador de valores no nulos por fila
dw_1.SetItem(ll_row, 'contador', li_cont)
Next
Saludos.