Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user admin

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user admin

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
MNTA655SEN - Digitação de Nota Fiscal de Abastecimento
MNTA655SEN - Digitação de Nota Fiscal de Abastecimento

Ponto-de-Entrada: MNTA655SEN - Digitação de Nota Fiscal de Abastecimento
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada criado na rotina Digitação de Nota Fiscal de Abastecimento. Ele é chamado tanto na inclusão, quanto na alteração, logo após o Sistema fazer todas consistências padrões do abastecimento. Com esse ponto de entrada, o cliente poderá incluir novas validações para o abastecimento, de acordo com suas necessidades específicas ou então fazer a gravação dos dados do abastecimento em uma tabela de usuário.
Programa Fonte 
MNTA655.PRX
Sintaxe

MNTA655SEN - Digitação de Nota Fiscal de Abastecimento ( ) --> .T. ou .F.

Retorno
    .T. ou .F.(logico)
  • No caso de fazer uma consistência de Abastecimento, se o registro estiver inconsistente, retornará .F., não deixando gravar o abastecimento
Exemplos 
User Function MNTA655SEN()Local aOldArea := GetArea()//Gravando os dados do Abastecimento em uma tabela de usuáriodbSelectArea("ZZZ")dbSetOrder(01)If dbSeek(xFilial("ZZZ")+M->TQN_NOTFIS)   RecLock("ZZZ",.T.)   ZZZ->ZZZ_FILIAL := xFilial("ZZZ")   ZZZ->ZZZ_POSTO  := M->TQN_POSTO   ZZZ->ZZZ_LOJA   := M->TQN_LOJA   ZZZ->ZZZ_NFISCA := M->TQN_NOTFIS   ZZZ->ZZZ_TOTAL  := M->TQN_VALTOT   MsUnlock("ZZZ")EndifRestArea(aOldArea)Return .t.