Histórico da Página
Wiki Markup |
---|
||Descrição|| Possui a finalidade de efetuar o lançamento automático de condição de pagamento ||Sintaxe|| Mata360 ( \[xAutoCab] ,\[xAutoItens], nOpcAuto ) -> Nil ||Exemplos||User Function MyMata360() //DEFININDO variáveis Local aItemAux := {} //Array auxiliar para inserção dos itens Local aCabecalho := {} //Array do cabeçalho (SE4) Local aItens := {} //Array que irá conter os itens (SEC) Private lMsErroAuto := .F. //Indicador do status pós chamada //Populando Cabeçalho aAdd\(aCabecalho, \{“E4_CODIGO” , “811”, Nil\}) aAdd\(aCabecalho, \{“E4_TIPO”, “B”, Nil\} \) aAdd\(aCabecalho, \{“E4_COND”, “16”, Nil\} \) aAdd\(aCabecalho, \{“E4_DESCRI”, “Descricao”, Nil\} \) //Populando Item auxiliar aAdd(aItemAux, \{“EC_ITEM”, “01”, Nil\} ) aAdd(aItemAux, \{“EC_TIPO”, “2”, Nil\} ) aAdd(aItemAux, \{“EC_COND”, “3”, Nil\} ) aAdd(aItemAux, \{“EC_IPI”, “N”, Nil\} ) aAdd(aItemAux, \{“EC_DDD”, “D”, Nil\} ) aAdd(aItemAux, \{“EC_SOLID”, “N”, Nil\} ) aAdd(aItemAux, \{“EC_RATEIO”, 100.00, Nil\} ) aAdd(aItens, aItemAux) //Chamando rotina automática de inclusão MSExecAuto(\{\|x,y,z\|mata360(x,y,z)\},aDados,aItens, 3) //Verificando status da rotina executada If !lMsErroAuto ConOut(“Incluido com sucesso”) Else ConOut(“Erro na inclusão”) EndIf Return ||Idioma|| Português(Brasil) ||Versões|| Microsiga_Protheus10_e_Microsiga_Protheus11 ||Sistemas Operacionais Suportados||Todos ||Compatível com as Bases de Dados||Todas ||Parâmetros|| xAutoCab: Array com os dados do cabeçalho xAutoItens: Array com os dados dos itens. nOpcAuto: Opção de rotina a ser utilizada ||Retorno|| Nil ||Programa Fonte|| Mata360.prx |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas