Percorrer linhas Length()

Framework - Linha Protheus LIB
,
1

bom dia, gostaria de saber como eu faço para percorrer as linhas de itens no momento ele só reconhece o ultimo registro

:warning: Atenção: Esta publicação foi transferida automaticamente do fórum antigo, mas os anexos não foram incluídos.

2

Eu sempre usei o SetLine para posicionar na linha desejada, então sugiro usar ela.

Outra questão é que está sendo retornado todas as linhas pelo método Length ( inclusive as deletadas ).

https://tdn.totvs.com/display/framework/FWFormGridModel

3

Bom dia.

Segue um exemplo para ser usado em grids feitos em MVC.


Local oModel    := FWModelActive()
Local oModelZZ4 := oModel:GetModel( 'ZZ4DETAIL' )

For nX := 1 To oModelZZ4:Length()

    oModelZZ4:GoLine(nX)

    If !oModelZZ4:IsDeleted()

        nTotal += oModelZZ4:GetValue("ZZ4_VALOR")

    EndIf

Next nX
4

boa tarde, tenho esse fonte MVC

User Function MaMvc09()

Desenvolvi outro para gerar contas a pagar para chamar no menu do MaMvc09 mas ele aparece o erro abaixo... User Function FIN050INC() Local oModel := FWModelActive()

Local oModelGrid := oModel:GetModel( "Z10DETAIL" )

Private lMsHelpAuto := .T. Private lMsErroAuto := .F.

For nX := 1 To oModelGrid:Length()

oModelGrid:GoLine(nX)

If !oModelGrid:IsDeleted()

ConOut("Inicio: " + (cInicio := Time()))

ConOut(Repl("-",80))

ConOut(PadC("Rotina Automática Contas a Pagar ", 80))

variable is not an object on U_FIN050INC(MAMVC09.PRW) 11/03/2021 16:11:46 line : 242