Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: MATA466N - Nota de Crédito/Débito - Form Proprio = Não / Tipo: Débito - Tipo: 09 / Espécie: NDP
Descrição: A documentação permite inserir uma Nota de Crédito / Débito - com Formulário Próprio = Não / Tipo = Débito através da utilização de rotina automática.No exemplo anexado, no array "_aCabec", o campo: F1_TIPODOC, deve ser passado com "09". Programa Fonte: MATA466N.PRW Sintaxe: MATA466N - Nota de Crédito/Débito - Form Proprio = Não / Tipo: Débito - Tipo: 09 / Espécie: NDP ( ) Retorno:
Exemplos #INCLUDE "RWMAKE.CH" #INCLUDE "TBICONN.CH" //Exemplo de Nota de Crédito/Debito - Form.Proprio: Nao / Tipo Factura: Debito //User Function EX009()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","0311"})aadd(_aCabec,{"F1_SERIE","UN"})aadd(_aCabec,{"F1_FORNECE","1 "})aadd(_aCabec,{"F1_LOJA","01"})aadd(_aCabec,{"F1_FORMUL","N"})aadd(_aCabec,{"F1_EMISSAO",dDataBase}) aadd(_aCabec,{"F1_COND","1"}) aadd(_aCabec,{"F1_MOEDA",1}) aadd(_aCabec,{"F1_TXMOEDA",1})aadd(_aCabec,{"F1_TIPODOC","09"})//Itensaadd(_aItens,{"D1_COD","1",nil})aadd(_aItens,{"D1_VUNIT",50,nil})aadd(_aItens,{"D1_TOTAL",50,nil})aadd(_aItens,{"D1_TES","001",nil})aadd(aLinha,_aItens) //Executa rotinaMsExecAuto({|x, y, z| Mata466N(x, y, z)}, _aCabec, aLinha, 3) //FinalizacaoIf lMsErroAuto MostraErro()EndIfRESET ENVIRONMENT Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas