Boa Tarde Pessoal. Estou tentando fazer um FWBrowse com edição de campos porem ele abre a edição porem não salva a edição o campo continua em branco ou com o conteúdo inicial. Abaixo segue trecho do fonte.
DEFINE MsDIALOG o3Dlg TITLE 'Informações Complementares Medicamentos' of o3Dlg From 0, 4 To 650, 1180 Pixel
@ 5,20 SAY "Tipo:" SIZE 50,15 OF o3Dlg PIXEL
@ 5,80 SAY "S-Saida" SIZE 050,15 OF o3Dlg PIXEL
@ 5,180 SAY "Extemporânea:" SIZE 50,15 OF o3Dlg PIXEL
@ 5,240 SAY "1-Ext. Regular" SIZE 050,15 OF o3Dlg PIXEL
@ 5,340 SAY "Data Recebimento:" SIZE 50,15 OF o3Dlg PIXEL
@ 5,400 SAY DTOC(SF2->F2_EMISSAO) SIZE 050,15 OF o3Dlg PIXEL
@ 30,20 SAY "Nota Fiscal:" SIZE 50,15 OF o3Dlg PIXEL
@ 30,80 SAY cDoc SIZE 050,15 OF o3Dlg PIXEL
@ 30,180 SAY "Serie:" SIZE 50,15 OF o3Dlg PIXEL
@ 30,240 SAY cSerie SIZE 050,15 OF o3Dlg PIXEL
@ 30,340 SAY "Espécie:" SIZE 50,15 OF o3Dlg PIXEL
@ 30,400 SAY SF2->F2_ESPECIE SIZE 050,15 OF o3Dlg PIXEL
@ 55,20 SAY "Cliente:" SIZE 50,15 OF o3Dlg PIXEL
@ 55,80 SAY cCliefor SIZE 050,15 OF o3Dlg PIXEL
@ 55,180 SAY "Loja:" SIZE 50,15 OF o3Dlg PIXEL
@ 55,240 SAY cLoja SIZE 050,15 OF o3Dlg PIXEL
@ 55,340 SAY "Frete:" SIZE 50,15 OF o3Dlg PIXEL
@ 55,400 SAY "9-Sem Frete" SIZE 050,15 OF o3Dlg PIXEL
@ 300,20 BUTTON "Processar" SIZE 36,16 PIXEL OF o3Dlg ACTION (xGravaCDT(),o3Dlg:End())
oPnMaster := tPanel():New(80,20,,o3Dlg,,,,,,550,200)
oDespesBrw := fwBrowse():New()
oDespesBrw:setOwner( oPnMaster )
oDespesBrw:setDataArray()
oDespesBrw:setArray( aItSD2 )
oDespesBrw:disableConfig()
oDespesBrw:disableReport()
//oDespesBrw:SetLocate() // Habilita a Localização de registros
oDespesBrw:addColumn({"Item" , {||aItSD2[oDespesBrw:nAt,01]}, "C", "@!" , 1, 4 , , .F. , , .F.,, ,, .F., .T., , "ETaItSD21" })
oDespesBrw:addColumn({"Produto" , {||aItSD2[oDespesBrw:nAt,02]}, "C", "@!" , 1, 15 , , .F. , , .F.,, ,, .F., .T., , "ETaItSD22" })
oDespesBrw:addColumn({"Lote" , {||aItSD2[oDespesBrw:nAt,03]}, "C", "@!" , 1, 50 , , .T. , , .F.,, "ETaItSD23" ,, .F., .T., , "ETaItSD23" })
oDespesBrw:addColumn({"Quantidade" , {||aItSD2[oDespesBrw:nAt,04]}, "N", "999999", 1, 6 , 0 , .F. , , .F.,, ,, .F., .T., , "ETaItSD24" })
oDespesBrw:addColumn({"Dt. Fabricacao" , {||aItSD2[oDespesBrw:nAt,05]}, "D", "" , 1, 8 , , .T. , , .F.,, "ETaItSD25",, .F., .T., , "ETaItSD25" })
oDespesBrw:addColumn({"Dt. Validade" , {||aItSD2[oDespesBrw:nAt,06]}, "D", "" , 1, 8 , , .T. , , .F.,, "ETaItSD26",, .F., .T., , "ETaItSD26" })
oDespesBrw:addColumn({"Cod. ANVISA" , {||aItSD2[oDespesBrw:nAt,07]}, "C", "@!" , 1, 13 , , .F. , , .F.,, ,, .F., .T., , "ETaItSD27" })
oDespesBrw:addColumn({"Motivo Isencao" , {||aItSD2[oDespesBrw:nAt,08]}, "C", "@!" , 1, 254 , , .F. , , .F.,, ,, .F., .T., , "ETaItSD28" })
oDespesBrw:setEditCell( .T. , {||.T.} ) //activa edit and code block for validation
oDespesBrw:Activate(.T.)
Activate MsDialog o3Dlg
Alguem pode me ajudar? Não consegui descobrir o pq não fica salvo o conteúdo que digito.