Assunto

Produto:	Datasul
Ocorrência:	Documentação de BO
Nome Físico:	inbo/boin786.p
Include com Parâmetros:	Inbo/boin786.i
Banco	mgind
Tabela	mla-usuar-aprov-altern

Objetivo

Esta BO tem como objetivo a manipulação dos dados referentes a tabela mla-usuar-aprov-altern(Aprovadores alternativos MLA).

Funcionamento

Na forma padrão, realiza-se a chamada através de um comando RUN normal, passando-se as temp-tables carregadas com as informações necessárias.

A execução na forma persistente é realizada através da chamada de um comando RUN conforme exemplo a seguir.

A sintaxe para executar a BO em modo persistente é:

RUN inbo/boin786.p PERSISTENT SET h-handle.

A variável denominada h-handle irá receber o “handle” do programa, permitindo o acesso aos “métodos” internos da BO.

Tabelas Temporárias

Nos atributos das tabelas temporárias de entrada e saída:

RowObject					Entrada/Saída
Aprovadores alternativos					Entrada/Saída
Atributo	Tipo	Formato	Descrição	Obrigatório	Evolução
cod-usuar	character	X(12)	Usuário	Sim
validade-ini	date	99/99/9999	Validade Ini	Não
validade-fim	date	99/99/9999	Validade Fim	Não
cod-usuar-altern	character	X(12)	Alternativo	Sim
char-1	character	x(100)		Não
char-2	character	x(100)		Não
dec-1	decimal	->>>>>>>>>>>9.9999 9999		Não
dec-2	decimal	->>>>>>>>>>>9.9999 9999		Não
int-1	integer	>>>>>>>>>9		Não
int-2	integer	>>>>>>>>>9		Não
log-1	logical	Sim/Não		Não
log-2	logical	Sim/Não		Não
data-1	date	99/99/9999		Não
data-2	date	99/99/9999		Não
char-3	character	x(100)		Não
char-4	character	x(100)		Não
char-5	character	x(100)		Não
dec-3	decimal	->>>>>>>>>>>9.9999 9999		Não
dec-4	decimal	->>>>>>>>>>>9.9999 9999		Não
dec-5	decimal	->>>>>>>>>>>9.9999 9999		Não
int-3	integer	>>>>>>>>>9		Não
int-4	integer	>>>>>>>>>9		Não
int-5	integer	>>>>>>>>>9		Não
log-3	logical	Sim/Não		Não
log-4	logical	yes/no		Não
log-5	logical	yes/no		Não
data-3	date	99/99/9999		Não
data-4	date	99/99/9999		Não
data-5	date	99/99/9999		Não
ep-codigo	character	x(3)	Empresa	Não

tt-mla-usuar-aprov-altern-origem					Entrada/Saída
Lista de aprovadores alternativos (do usuário origem – Utilizado pela procedure pi-copia-substituicao-alternativos). OBS: Mesmos campos da RowObject, mais os campos definidos abaixo.					Entrada/Saída
Atributo	Tipo	Formato	Descrição	Obrigatório	Evolução
Id-sit	Integer		Situação	Não
Situacao	Character	x(20)	Descrição da situação	Não
r-rowid	Rowid		Rowid do registro	Não

tt-mla-usuar-aprov-altern-destino					Entrada/Saída
Lista de aprovadores alternativos (do usuário destino – Utilizado pela procedure pi-copia-substituicao-alternativos) OBS: Mesmos campos da temp-table tt-mla-usuar-aprov-altern-origem.					Entrada/Saída
Atributo	Tipo	Formato	Descrição	Obrigatório	Evolução

tt-mla-alternativos-def					Entrada/Saída
Usuários alternativos					Entrada/Saída
Atributo	Tipo	Formato	Descrição	Obrigatório	Evolução
cod-usuar	character	X(12)	Usuário	Sim
cod-usuar-altern	character	X(12)	Usuário alternativo	Não
da-inicial	date	99/99/9999	Data inicial	Não
da-final	date	99/99/9999	Data final	Não

Metodo Básico

Quando a BO for executada em modo persistente, os seguintes métodos estarão disponíveis para execução:

getCharField
Requisito	Query posicionada no registro.
Sintaxe	RUN getCharField IN handle (INPUT <character>, OUTPUT <character>).
Descrição	Retorna valor dos campos do tipo caracter
	Parâmetros	Descrição
	pFieldName	Nome do campo caracter que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo caracter que foi solicitado.

getDateField
Requisito	Query posicionada no registro.
Sintaxe	RUN getDateField IN handle (INPUT <character>, OUTPUT <date>).
Descrição	Retorna valor dos campos do tipo data
	Parâmetros	Descrição
	pFieldName	Nome do campo data que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo data que foi solicitado a BO.

getDecField
Requisito	Query posicionada no registro.
Sintaxe	RUN getDecField IN handle (INPUT <character>, OUTPUT <decimal>).
Descrição	Retorna valor dos campos do tipo decimal
	Parâmetros	Descrição
	pFieldName	Nome do campo decimal que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo decimal que foi solicitado a BO.

getIntField
Requisito	Query posicionada no registro.
Sintaxe	RUN getIntField IN handle (INPUT <character>, OUTPUT <integer>).
Descrição	Retorna valor dos campos do tipo inteiro
	Parâmetros	Descrição
	pFieldName	Nome do campo inteiro que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo inteiro que foi solicitado a BO.

getLogField
Requisito	Query posicionada no registro.
Sintaxe	RUN getLogField IN handle (INPUT <character>, OUTPUT <logical>).
Descrição	Retorna valor dos campos do tipo logico
	Parâmetros	Descrição
	pFieldName	Nome do campo logico que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo logico que foi solicitado a BO.

getRawField
Requisito	Query posicionada no registro.
Sintaxe	RUN getRawField IN handle (INPUT <character>, OUTPUT <raw>).
Descrição	Retorna valor dos campos do tipo raw
	Parâmetros	Descrição
	pFieldName	Nome do campo raw que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo raw que foi solicitado a BO.

getRecidField
Requisito	Query posicionada no registro.
Sintaxe	RUN getRecidField IN handle (INPUT <character>, OUTPUT <recid>).
Descrição	Retorna valor dos campos do tipo recid
	Parâmetros	Descrição
	pFieldName	Nome do campo recid que será retornado o valor
	pFieldValue	Valor contido no campo solicitado
Retorno	A BO irá retornar o valor contido no campo recid que foi solicitado a BO.

getKey
Requisito	Query posicionada no registro.
Sintaxe	RUN getKey IN handle (OUTPUT <character>, OUTPUT <character>).
Descrição	Retorna valores dos campos do índice primário e único da tabela.
	Parâmetros	Descrição
	pcod-usuar pcod-usuar-altern	Usuário Usuário alternativo
Retorno	A BO irá retornar o valor contido nos campos do índice primário e único da tabela.

goToKey
Requisito	Query posicionada no registro.
Sintaxe	RUN goToKey IN h-handle (INPUT <character>, INPUT <character>).
Descrição	Reposiciona registro com base no índice primário e único da tabela.
	Parâmetros	Descrição
	pcod-usuar pcod-usuar-altern	Usuário Usuário Alternativo
Retorno	A BO irá reposicionar no registro que foi solicitado a BO.

goToKeyValidade
Requisito	Query posicionada no registro.
Sintaxe	RUN goToKeyValidade IN h-handle (INPUT <character>, INPUT <character>).
Descrição	Reposiciona registro com base no índice alternativo e demais parâmetos recebidos.
	Parâmetros	Descrição
	pep-codigo pcod-usuar pcod-usuar-altern pda-validade	Empresa Usuário Usuário Alternativo Validade
Retorno	A BO irá reposicionar no registro que foi solicitado a BO.

validateRecord
Requisito	Query posicionada no registro.
Sintaxe	Run validateRecord in handle (intpu pType).
Descrição	Validações pertinentes ao DBO.
	Parâmetros	Descrição
	pType	Recebe o tipo de validação(Create, Update, Delete) create: Indica a criação de um registro update: Indica a atualização de um registro delete: Indica a eliminação de um registro
Retorno

Metodo Negócio

getAlternativos
Requisito	Nenhum
Sintaxe	RUN getAlternativos in handle (INPUT <character >, OUTPUT TABLE tt-mla-alternativos-def)
Descrição	Fornece a ista de usuários alternativos de um determinado aprovador
	Parâmetros	Descrição
	p-cod-usuar	Usuário
	tt-mla-alternativos-def	Temp-table com os usuários alternativos
Retorno	Lista de usuários alternativos do aprovador.

getAprovadorAlternativo
Requisito	Query estar posicionada no registro e execução da procedure setMlaParamAprovDtGeracao
Sintaxe	RUN getAprovadorAlternativo in handle.
Descrição	Indica se o usuário alternativo é válido no período
	Parâmetros	Descrição

Retorno	Retorna OK se o usuário é válido e NOK se não é válido.

getAprovAlternativos
Requisito	Nenhum
Sintaxe	RUN getAprovAlternativos in handle(INPUT <character>, OUTPUT TABLE tt-mla-alternativos-def).
Descrição	Fornece a ista de usuários para os quais o aprovador em questão é alternativo.
	Parâmetros	Descrição
	p-cod-usuar-altern	Usuário alternativo
	tt-mla-alternativos-def	Lista de usuários
Retorno	Lista de usuários para os quais o usuário é aprovador alternativo

setMlaParamAprovDtGeracao
Requisito	Nenhum
Sintaxe	RUN setMlaParamAprovDtGeracao in handle(INPUT <character>, INPUT <character>, INPUT <date>).
Descrição	Seta parâmetros utilizados pela procedure getAprovadorAlternativo
	Parâmetros	Descrição
	pc-empresa-mla pc-cod-estab-mla pd-data-geracao	Empresa Estabelecimento Data da geração
Retorno

setValidateAlternativos
Requisito	Nenhum
Sintaxe	RUN setValidateAlternativos in handle(INPUT <character>, INPUT TABLE tt-mla-alternativos-def).
Descrição	Atualiza a data de validade dos usuários alternativos
	Parâmetros	Descrição
	p-cod-usuar	Usuário
	tt-mla-alternativos-def	Lista de usuários alternativos e suas datas de validade
Retorno	Retorna OK se a atualização foi realizada com sucesso e NOK caso não tenha sido

pi-copia-substituicao-alternativos
Requisito	Nenhum
Sintaxe	RUN pi-copia-substituicao-alternativos in handle (INPUT <character>, INPUT <character>, INPUT <character>, INPUT <character>, INPUT <integer>, INPUT <logical>, OUTPUT TABLE tt-mla-usuar-aprov-altern-origem, OUTPUT TABLE tt-mla-usuar-aprov-altern-dest).
Descrição	Copia e/ou substitui os usuários alternativos de um usuário pelos usuários alternativos de um outro.
Descrição	Parâmetros	Descrição
	pcEmpresaIni	Empresa inicial a ser considerada para cópia/substituição das aprovações.
	pcEmpresaFim	Empresa final a ser considerada para cópia/substituição das aprovações
	pcOrigem	Usuário origem a ser considerado para cópia/substituição das aprovações
	pcDestino	Usuário destino a ser considerado para cópia/substituição das aprovações
	piOpcao	Indica qual opção foi selecionada pelo usuário
	plSimulaAlteracao	Indica se é apenas um simulação(cria as temp-tables porém não efetiva as alterações na base).
	tt-mla-usuar-aprov-altern-origem	Contém os dados dos registros(Usuários alternativos) do usuário origem.
	tt-mla-usuar-aprov-altern-dest	Contém os dados dos registros(Usuários alternativos) do usuário destino.
Retorno	Retorna as temp-tables tt-mla-usuar-aprov-altern-origem e tt-mla-usuar-aprov-altern-dest com informações com os usuários alternativos. As temp-tables contem a situação da atualização de cada um dos registros.

OpenQuery / SetConstraint / LinkTo

openQuery
Requisito	Nenhum
Sintaxe	run openQuery in h-handle (input <character>).
Descrição	Faz abertuda das querys.
	Parâmetros	Descrição
	p-ordem	Ordenação da abertura. “main” – Abertura da query principal.
Retorno	Retorna um return-value com o valor “OK” se foi executado com sucesso.

openQueryMain
Requisito	Nenhum
Sintaxe	run openQueryStatic in h-handle (input "Main":U).
Descrição	Faz a abertura da tabela principal.
	Parâmetros	Descrição

Retorno

Árvore de páginas

BOIN786 - Aprovadores Alternativos MLA

Assunto

Tabelas Temporárias

Metodo Básico

Metodo Negócio

OpenQuery / SetConstraint / LinkTo