Se alguma pergunta ou resposta lhe foi útil, não deixe de dar seu voto positivo!

Inclusão LoadValue MVC

Galera, Boa Tarde, criei um fonte para fazer uma inclusão de alguns dados da tabela de produtos em MVC.

Porém está dando um problema, nas linhas dos campos de PESO e Peso Bruto, se eu removo essas duas linhas a inclusão é feita, onde será que errei?

                elseif AllTrim(aSB1Str[nX, 1]) == "B1_PESO" 
                    oSB1Mod:LoadValue("B1_PESO",   Alltrim(TRBSB1->B1_PESO))
                elseif AllTrim(aSB1Str[nX, 1]) == "B1_PESBRU"   
                    oSB1Mod:LoadValue("B1_PESBRU", Alltrim(TRBSB1->B1_PESBRU))

Segue o código completo:

   //Pegando o model e setando os campos
            oSB1Mod := oModel:GetModel("SB1MASTER")
            for nX := 1 to Len(aSB1Str)
                if AllTrim(aSB1Str[nX, 1]) == "B1_COD"
                    oSB1Mod:LoadValue("B1_COD", cPrefx + AllTrim(TRBSB1->B1_COD))
                elseif AllTrim(aSB1Str[nX, 1]) $ "B1_LOCPAD"
                    oSB1Mod:LoadValue("B1_LOCPAD", cPrefx)
                elseif AllTrim(aSB1Str[nX, 1]) $ "B1_LOCALIZ"
                    oSB1Mod:LoadValue("B1_LOCALIZ", "S")
                elseif AllTrim(aSB1Str[nX, 1]) == "B1_XCODORI"
                    oSB1Mod:LoadValue("B1_XCODORI", AllTrim(TRBSB1->B1_COD))
                elseif AllTrim(aSB1Str[nX, 1]) == "B1_PESO" 
                    oSB1Mod:LoadValue("B1_PESO",   Alltrim(TRBSB1->B1_PESO))
                elseif AllTrim(aSB1Str[nX, 1]) == "B1_PESBRU"   
                    oSB1Mod:LoadValue("B1_PESBRU", Alltrim(TRBSB1->B1_PESBRU))
                elseif !(AllTrim(aSB1Str[nX, 1]) $ "B1_XDETA|B1_MOPC")
                    if oSB1Mod:HasField(aSB1Str[nX, 1])
                        if aSB1Str[nX, 2] == "D"
                            oSB1Mod:LoadValue(aSB1Str[nX, 1], SToD(&("TRBSB1->"+aSB1Str[nX, 1])))
                        else
                            oSB1Mod:LoadValue(aSB1Str[nX, 1], &("TRBSB1->"+aSB1Str[nX, 1]))
                        endif
                    endif
                endif

            next nX
compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

1 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags mvc ou faça a sua própria pergunta.