Função: MATA101N - Factura de Entrada - Beneficiamento - Tipo: 12 / Espécie: NF
| Abrangências: | Microsiga Protheus 11 , Protheus 10 |
| Versões: | Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Nível de Acesso: | Nível 1 (Acesso Clientes) |
| Idiomas: | Português (Brasil) , Português (Portugal) , Espanhol , Inglês |
Descrição:
A documentação permite inserir uma Factura de Entrada tipo: Beneficiamento através da utilização de rotina automática.No exemplo anexado, no array "_aCabec", o campo: F1_TIPODOC, deve ser passado com "12" para indicar que é uma Factura do tipo: Beneficiamento.
Programa Fonte:
MATA101N.PRW
Sintaxe:
MATA101N - Factura de Entrada - Beneficiamento - Tipo: 12 / Espécie: NF ( )
Retorno:
-
()
Observações
Exemplos
#INCLUDE "RWMAKE.CH" #INCLUDE "TBICONN.CH" //Exemplo de Factura de Entrada - Tipo - Beneficiamento //User Function EX003()Local _aCabec := {} //Array com dados do cabecalhoLocal _aItens := {} //Array com dados do itemLocal aLinha := {} //Array de trabalho Private aRecsSF1 := {} //Array para vinculo de NotasPrivate lMsErroAuto := .f. //Controle de execucao da Rotina //Prepara ambiente de Exemplo //PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "COM" TABLES "SF1", "SD1" //Cabecalhoaadd(_aCabec,{"F1_FILIAL","01"})aadd(_aCabec,{"F1_DOC","0120"})aadd(_aCabec,{"F1_SERIE","UN"})aadd(_aCabec,{"F1_FORNECE","1 "})aadd(_aCabec,{"F1_LOJA","01"})aadd(_aCabec,{"F1_TIPO","N"})aadd(_aCabec,{"F1_FORMUL","N"})aadd(_aCabec,{"F1_EMISSAO",dDataBase}) aadd(_aCabec,{"F1_TXMOEDA",1}) aadd(_aCabec,{"F1_ESPECIE","NF"})aadd(_aCabec,{"F1_COND","1 "}) aadd(_aCabec,{"F1_TIPODOC","12"})//Itensaadd(_aItens,{"D1_COD","1",nil})aadd(_aItens,{"D1_QUANT",1,nil})aadd(_aItens,{"D1_VUNIT",100,nil})aadd(_aItens,{"D1_TOTAL",100,nil})aadd(_aItens,{"D1_TES","001",nil}) aadd(aLinha,_aItens)//Executa rotinaMsExecAuto({|x, y, z| Mata101N(x, y, z)}, _aCabec, aLinha, 3) //FinalizacaoIf lMsErroAuto MostraErro()Endif RESET ENVIRONMENT Return