Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: MATA102DN - Devolução Formulário de Despacho - Tipo: 61 / Espécie: RCD
Descrição: A documentação permite inserir uma Devolução Formulário de Despacho através da utilização de rotina automática.No exemplo anexado, no array "_aCabec", o campo: F2_TIPODOC, deve ser passado com "61" . Programa Fonte: MATA102DN.PRW Sintaxe: MATA102DN - Devolução Formulário de Despacho - Tipo: 61 / Espécie: RCD ( ) Retorno:
Exemplos #INCLUDE "RWMAKE.CH" #INCLUDE "TBICONN.CH" //Exemplo de Devolução de Formulario de Despacho //User Function EX008()Local _aCabec := {} //Array com dados do cabecalhoLocal _aItens := {} //Array com dados do itemLocal aLinha := {} //Array de trabalho Private lMsErroAuto := .f. //Controle de execucao da Rotina Private aRecsSF1 := {} //Array para vinculo de Notas//Prepara ambiente de Exemplo //PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "COM" TABLES "SF2", "SD2" //Cabecalhoaadd(_aCabec,{"F2_FILIAL","01"})aadd(_aCabec,{"F2_DOC","1010-DESP"})aadd(_aCabec,{"F2_CLIENTE","1 "})aadd(_aCabec,{"F2_LOJA","01"})aadd(_aCabec,{"F2_SERIE","A "})aadd(_aCabec,{"F2_EMISSAO",dDataBase}) aadd(_aCabec,{"F2_MOEDA",0}) aadd(_aCabec,{"F2_TXMOEDA",1}) aadd(_aCabec,{"F2_TIPODOC","61"})//Itensaadd(_aItens,{"D2_COD","1",nil}) aadd(_aItens,{"D2_QUANT",1,nil})aadd(_aItens,{"D2_PRCVEN",50,nil})aadd(_aItens,{"D2_TOTAL",50,nil})aadd(_aItens,{"D2_TES","501",nil})aadd(aLinha,_aItens) //Executa rotinaMsExecAuto({|x, y, z| Mata102DN(x, y, z)}, _aCabec, aLinha, 3) //FinalizacaoIf lMsErroAuto MostraErro()EndIfRESET ENVIRONMENT Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas