DT PE DN400INTEMB Despesas Nacionais

//Ponto de Entrada DN400DEFS - (Utilizado em conjunto com o PE DN400INTEMB para que novos campos adicionados possam ser gravados)

User Function DN400DEFS()
Local cID := PARAMIXB

Do Case
	Case cID == "EET_CAPA_CAMPOS_MBROWSE_DESP"
	//Possibilita adicionar ou remover campos no Browse principal da rotina na Visao "1-Despesa"
	
	Case cID == "EET_CAPA_CAMPOS_MBROWSE_FIN"
	//Possibilita adicionar ou remover campos no Browse principal da rotina na Visao "2-Financeiro"
	
	Case cID == "EET_CAPA_CAMPOS_VIEW"
	//Possibilita adicionar campos na View do formulario de dados da despesa (EET)
	
	Case cID == "EET_CAPA_REMOVER_VIEW"
	//Possibilita remover campos na View do formulario de dados da despesa (EET)
		aAdd(aDefs, "EET_CHAR")
		aAdd(aDefs, "EET_NUM")
	
	Case cID == "EET_CAPA_METADADOS_VIEW"
	//Possibilita a inclusao ou alteracao dos metadados da View do formulario de dados da despesa (EET)

	Case cID == "EET_CAPA_ADICIONAR_GRUPOS"
	//Possibilita a inclusao de grupos de campos na View do formulario de dados da despesa (EET)
	
	Case cID == "EET_CAPA_REMOVE_FOLDERS"
	//Possibilita definir se os folders da View do formulario de dados da despesa (EET) devem ser exibidos 
	
	Case cID == "EET_CAPA_CAMPOS_MODEL"
	//Possibilita definir quais campos serao considerados no modelo de dados da despesa (EET)
	
	Case cID == "EET_CAPA_ADICIONAR_MODEL"
	//Possibilita adicionar campos especificos no modelo de dados da despesa (EET)
	
	Case cID == "EET_CAPA_REMOVER_MODEL"
	//Possibilita remover campos especificos no modelo de dados da despesa (EET)
	
	Case cID == "EET_CAPA_METADADOS_MODEL"
	//Possibilita a inclusao ou alteracao dos metadados da Model do formulario de dados da despesa (EET)
	
	Case cID == "EEB_CAMPOS_VIEW"
	//Possibilita adicionar campos na View do formulario de dados do fornecedor da despesa (EEB)
	
	Case cID == "EEB_REMOVER_VIEW"
	//Possibilita remover campos na View do formulario de dados do fornecedor da despesa (EEV)
	
	Case cID == "EEB_METADADOS_VIEW"
	//Possibilita a inclusao ou alteracao dos metadados da View do formulario de dados do fornecedor da despesa (EEB)
	
	Case cID == "EEB_ADICIONAR_GRUPOS"
	//Possibilita a inclusao de grupos de campos na View do formulario de dados do fornecedor da despesa (EEB)
	
	Case cID == "EEB_REMOVE_FOLDERS"
	//Possibilita definir se os folders da View do formulario de dados do fornecedor da despesa (EEB) devem ser exibidos 
	
	Case cID == "EEB_CAMPOS_MODEL"
	//Possibilita definir quais campos serao considerados no modelo de dados do fornecedor da despesa (EEB)
	
	Case cID == "EEB_ADICIONAR_MODEL"
	//Possibilita adicionar campos especificos no modelo de dados do fornecedor da despesa (EET) 
	
	Case cID == "EEB_REMOVER_MODEL"
	//Possibilita definir os campos que serao removidos do modelo de dados do fornecedor da despesa (EEB)
	
	Case cID == "EEB_METADADOS_MODEL"
	//Possibilita a inclusao ou alteracao dos metadados da Model do formulario de dados do fornecedor da despesa (EEB)
	
	Case cID == "EET_EMB_CAMPOS_VIEW"
	//Possibilita adicionar campos na View do formulario de dados da despesa especificos do embarque (EET)
		aAdd(aDefs, "EET_CHAR")
		aAdd(aDefs, "EET_NUM")

	Case cID == "EET_EMB_REMOVER_VIEW"
	//Possibilita remover campos na View do formulario de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_METADADOS_VIEW"
	//Possibilita inclusao ou alteracao dos metadados da View do formulario de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_ADICIONAR_GRUPOS"
	//Possibilita a inclusao de grupos de campos na View do formulario de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_REMOVE_FOLDERS"
	//Possibilita definir se os folders da View do formulario de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_CAMPOS_MODEL"
	//Possibilita definir quais campos serao considerados no modelo de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_ADICIONAR_MODEL"
	//Possibilita adicionar campos especificos no modelo de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_REMOVER_MODEL"
	//Possibilita definir os campos que serao removidos do modelo de dados da despesa especificos do embarque (EET)

	Case cID == "EET_EMB_METADADOS_MODEL"
	//Possibilita definir os campos que serao removidos do modelo de dados da despesa especificos do embarque (EET)

EndCase

Return Nil


//Ponto de Entrada DN400INTEMB
User Function DN400INTEMB()

	oEEB := PARAMIXB[1]//Modelo de dados para informacoes do fornecedor da despesa (EEB)
	oEET := PARAMIXB[2]//Modelo de dados para informacoes gerais da despesa, como por exemplo o documento (EET)
	oEmb := PARAMIXB[3]//Modelo de dados para informacoes da despesa especificas para cada embarque, como por exemplo o proprio numero do embarque ou o valor (EET)
	nLine := PARAMIXB[4]//Linha atual do modelo de dados do Embarque que esta sendo considerada na preparacao de dados para integracao

	//Possibilita adicionar novos campos na integracao da despesa com o Embarque
	aAdd(aEEC[Len(aEEC)][2][1], {"EET_CHAR", oEMB:GetValue("EET_CHAR", nLine), Nil})
	aAdd(aEEC[Len(aEEC)][2][1], {"EET_NUM", oEMB:GetValue("EET_NUM", nLine), Nil})

Return Nil