Árvore de páginas

01. Visão Geral 

Essa rotina disponibiliza opções para efetuar o lançamento automático de códigos postais de municípios, de acordo com o cadastro do IBGE: inclusão, exclusão e visualização. Assim, visualizando esta tabela de códigos, é possível facilitar o preenchimento do campo "município".


02. Exemplo de Utilização 

Sintaxe:
Rotina Automática - FISA010 ( [xAutoCab],[nCallOpcx] ) --> Nil


Retorno:
Nil
(nulo)


Exemplo:

Rotina Automática - FISA010
#Include "RwMake.CH"
#include "tbiconn.ch"

User Function TFISA010()
	Local aCab := {}
	private lMsErroAuto := .F.

	PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "FIS"

	aVetor:= {{"CC2_EST", "AL", Nil},;  // Sigla do Estado
            	{"CC2_MUN", "Exemplo", Nil}}  // Nome do Município                               

	MSExecAuto({|x,y| FISA010(x,y)},aCab,3) //-- Opção 3 - Inclusão do registro 
	conout("Acabou de executar a rotina automática do Cadastro de Municípios")
	
	//-- Retorno de erro na execução da rotina
	If lMsErroAuto 
		conout("erro")    
		cErro:=MostraErro()
	Else 
		conout("Ok")
	Endif 

Return



Parâmetros:

NomeTipoDescriçãoDefaultObrigatórioReferência
[xAutoCab],Array of RecordCabeçalho
X
[nCallOpcx]NuméricoOpção Incluir,Alterar,Visualizar e etc
X



03. Informações Técnicas

ProdutoMicrosiga Protheus
Função EnvolvidaFISA010