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.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas