Hi Harm

I thought it was a simple web list error not so. I am dynamically creating web list and that's when it occurs.

Code:
Use cWebView.pkg
Use cWebDynamicObjectContainer.pkg


Class cMyList is a cWebList


    Procedure OnManualLoadData tWebRow[] ByRef aTheRows String ByRef sCurrentRowID
        Integer iNum
        
        Forward Send OnManualLoadData (&aTheRows) (&sCurrentRowID)
        
        Move 0 To iNum
        Move iNum       To aTheRows[iNum].sRowID
        Move "Planet"   To aTheRows[iNum].sCssClassName
        Move "Mercury"  To aTheRows[iNum].aCells[0].sValue
        Move (ConvertToClient(typeNumber, 0.387)) To aTheRows[iNum].aCells[1].sValue
        
        Increment iNum
        Move iNum       To aTheRows[iNum].sRowID
        Move "Planet"   To aTheRows[iNum].sCssClassName
        Move "Venus"    To aTheRows[iNum].aCells[0].sValue
        Move (ConvertToClient(typeNumber, 0.722)) To aTheRows[iNum].aCells[1].sValue
        
        Increment iNum
        Move iNum       To aTheRows[iNum].sRowID
        Move "Planet"   To aTheRows[iNum].sCssClassName
        Move "Mars"     To aTheRows[iNum].aCells[0].sValue
        Move (ConvertToClient(typeNumber, 1.52)) To aTheRows[iNum].aCells[1].sValue
        
        Increment iNum
        Move iNum       To aTheRows[iNum].sRowID
        Move "Planet"   To aTheRows[iNum].sCssClassName
        Move "Jupiter"  To aTheRows[iNum].aCells[0].sValue
        Move (ConvertToClient(typeNumber, 5.2)) To aTheRows[iNum].aCells[1].sValue
    End_Procedure
End_Class


Object orefreshgrid is a cWebView
    Set peWebViewStyle to wvsDrillDown
    Set peViewType to vtZoom
    Set pbShowCaption to False
    Set Verify_Save_msg to 0 // don't confirm saves
    Set psCaption To "refreshgrid"
    Set piMaxWidth to 1024


    Object oListContainer is a cWebDynamicObjectContainer
        Set piColumnSpan To -1
        Set pbFillHeight To True
        
        Procedure Create_Grid
            Handle ohId ohList


            Send ResetContainer


            Get CreateDynamicObject (RefClass(cMyList)) "oList" "" To ohList
            Send InitDynamicProp Of ohList "pbFillHeight" True
            Send InitDynamicProp Of ohList "pbDataAware" False
            Send InitDynamicProp Of ohList "peDbGridType" gtManual


            Get CreateDynamicObject (RefClass(cWebColumn)) "oPlantColumn" "oList" To ohId
            Send InitDynamicProp Of ohId "psCaption" "Planet"


            Get CreateDynamicObject (RefClass(cWebColumn)) "oDistanceColumn" "oList" To ohId
            Send InitDynamicProp Of ohId "psCaption" "Distance from Sun"
            Send InitDynamicProp Of ohId "peAlign" alignRight
            Send InitDynamicProp Of ohId "peDataType" typeNumber
            Send InitDynamicProp Of ohId "psMask" "*.## AU"
            
            Send Activate
            
            Send GridRefresh Of ohList
        End_Procedure
    End_Object


    Set pbServerOnShow To True
    Procedure OnShow
        Send Create_Grid To oListContainer
    End_Procedure
End_Object