Histórico da Página

||Descrição|| Possui a finalidade de efetuar o lançamento automático de condição de pagamento 
||Sintaxe|| Mata360 ( \[xAutoCab] ,\[xAutoItens], nOpcAuto ) -> Nil
||Observações|| 
||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 CabecalhoCabeç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

||Preview|| 
||Veja também|| 
||Idioma|| Português(Brasil)
||Versões|| Microsiga_Protheus10_e_Microsiga_Protheus11
||Sistemas Operacionais Suportados||Todos
||Compatível com as Bases de Dados||Todas
||Updates|| 
||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
||Eventos de chamada do Ponto de Entrada|| 
||Variáveis|| 
||Programa Fonte|| Mata360.prx