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

A140NFiscal visualização

Senhores, preciso de chamar a função A140NFiscal como visualização de uma Pre-nota, tentei da forma abaixo mas sem sucesso, algum dica?

SetFunName("MATA140")

cCadastro := ""

FWLoadMenuDef("MATA140")
Private nMostraTela :=  1
PRIVATE aHeadSD1 := {}
PRIVATE l140auto := .F.
Private lIntermed := A103CPOINTER()

A140NFiscal("SF1",SF1->(Recno()),2)

o ultimo erro que peguei foi "ERROR: array out of bounds ( 2 of 0 ) A140NFISCAL - MATA140.PRW(503)"


Resolvido, parece que a abordagem estava no caminho certo iniciei o aRotina como o Eduardo falou mas precisei de declarar tb o nOPCX, mesmo passando 2 no terceiro parâmetro a função A140NFiscal estava em modo de inclusão Trecho finalizado

SetFunName("MATA140")
Private nMostraTela     :=  0
Private cCadastro       := "Pre-Documento de Entrada - VISUALIZAR"
Private aRotina     := FWLoadMenuDef("MATA140")
Private aHeadSD1     := {}
Private l140auto     := .F.
Private lIntermed       := A103CPOINTER()
Private nOpcX         := 2

A140NFiscal("SF1",SF1->(Recno()),nOpcX)
compartilhar
  • Estou passando pela mesma situação, preciso colocar uma visualização de pré-nota em um mbrowse que estou fazendo, tentei utilizar o que voce deixou disponível por aqui mas estou enfrentando outro erro: type mismatch on compare A140NFISCAL - MATA140.PRW(286) - Params: CALIAS:SF1,NREG:106741,NOPCX:2 ) EXECUTE - FWFORMBROWSE.PRW(1147) - Params: CFUNCTION:A140NFISCAL,NOPTION:2,NVERIFY:0,CTITLE:VISUALIZAR,NREALOPC:2,CPARFUNCTION:,COPERATID:VISUALIZAR,CTOOLBAR:,NROTOPC:2 ). Consegue me passar mais trechos do seu código para me ajudar?

    Lucas Tanaka   16 de Jan de 2024
  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!

0 resposta

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