5595104 DJURDEP-6195 DT Criação de campo responsável por informar o grupo de aprovação do módulo de Compras

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus^®
Segmento:	Serviços
Módulo:	Gestão Juridica - SIGAJURI
Função:	JURA098 - Garantias/Alvaras JURA024 - Tipo de Garantia JURXFUNB - Genérico
Ticket:	5595104
Requisito/Story/Issue (informe o requisito relacionado) :	DJURDEP-6195

02. SITUAÇÃO/REQUISITO

Na rotina de Garantia quando os parâmetro MV_JINTVAL e MV_JALCADA (parâmetro responsável por definir se a garantia passará por aprovação antes de gerar o titulo) estão habilitados, ao informar o Tipo de Garantia será definido se a integração será feita por Compras ou Financeiro.

Quando é utilizado o tipo de garantia que integra com Compras e o parâmetro MV_JALCADA está habilitado, o responsável pela aprovação da liberação de documentos será o grupo de aprovação que está configurado na rotina Comprador ou o grupo que está preenchido no parâmetro MV_PCAPROV.

03. SOLUÇÃO

Na rotina Garantia foi adicionado o campo Grupo Com. que permite ao usuário preencher o grupo de aprovação de compras, com isso, a aprovação não fica definida somente em um único grupo de aprovação.

04. DEMAIS INFORMAÇÕES

Foi realizado a criação do campo abaixo:

Cadastro	Conteúdo
Campo:	NT2_GRPCOM
Tipo:	C - Caracter
Index Server:	N- Não
Pyme:	S - Sim
Totvs PDV:	1 - Sim
Tamanho:	6
Decimal:	0
Título:	Grupo Com.
Descrição:	Grupo Aprovação - Compras
Picture:	@!
Validação:	Vazio() .Or. JValidGrCom()
Usado:	x
Reservado:	x
Exibe Browse:	Não
Visual:	Alterar
Contexto:	Real
When:	JurLAltera('NT2') .AND. J98VlGpCom()
Consulta Padrão(SXB):	SAL
Agrupamento:	006 - Financeiro

2. Nos Campos abaixo foi efetuado a alteração de acordo com o item 2:

Item	Cadastro	Conteúdo
1	Campo:	NT2_CONDPG
2	When:	JurLAltera('NT2') .AND. J98VlGpCom()

Item	Cadastro	Conteúdo
1	Campo:	NT2_PRODUT
2	When:	JurLAltera('NT2') .AND. J98VlGpCom()

tem	Cadastro	Conteúdo
1	Campo:	NT2_CGRUAP
2	When:	JurLAltera('NT2') .AND. !J98VlGpCom()

Item	Cadastro	Conteúdo
1	Campo:	NT2_CTPGAR
2	Valid:	Vazio().Or.ExistCpo('NQW',M->NT2_CTPGAR,1).And.JurVldRest('NQW',M->NT2_CTPGAR)

3. Foi realizado a criação dos gatilhos abaixo:

	1º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	''
3	Cnt. Domínio (X7_CDOMIN)	NT2_GRPCOM
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Nao
6	Condição (X7_CONDIC)	!J98VLGTGRP()

	2º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	''
3	Cnt. Domínio (X7_CDOMIN)	NT2_CGRUAP
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Nao
6	Condição (X7_CONDIC)	J98VLGTGRP()

	3º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	''
3	Cnt. Domínio (X7_CDOMIN)	NT2_PRODUT
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Nao
6	Condição (X7_CONDIC)	!J98VLGPCOM()

	4º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	''
3	Cnt. Domínio (X7_CDOMIN)	NT2_CONDPG
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Nao
6	Condição (X7_CONDIC)	!J98VLGPCOM()

	5º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	SAL->AL_COD
3	Cnt. Domínio (X7_CDOMIN)	NT2_GRPCOM
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Sim
6	Alias (X7_ALIAS)	SAL
7	Ordem (X7_ORDEM)	1
8	Chave (X7_CHAVE)	xFilial("SAL") + SuperGetMV('MV_JAPROVE',, '')
9	Condição (X7_CONDIC)	J98VLGTGRP("SAL")

	6º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	FRP->FRP_COD
3	Cnt. Domínio (X7_CDOMIN)	NT2_CGRUAP
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Sim
6	Alias (X7_ALIAS)	FRP
7	Ordem (X7_ORDEM)	1
8	Chave (X7_CHAVE)	xFilial("FRP") + SuperGetMV('MV_JAPROVE',, '')
9	Condição (X7_CONDIC)	J98VLGTGRP("FRP")

	7º Gatilho	Detalhes
1	Campo (X7_CAMPO)	NT2_CTPGAR
2	Regra (X7_REGRA)	NQW->NQW_GRPAPR
3	Cnt. Domínio (X7_CDOMIN)	NT2_GRPCOM
4	Tipo (X7_TIPO)	Primário
5	Posiciona (X7_SEEK)	Sim
6	Alias (X7_ALIAS)	NQW
7	Ordem (X7_ORDEM)	1
8	Chave (X7_CHAVE)	XFILIAL("NQW")+M->NT2_CTPGAR
9	Condição (X7_CONDIC)	J98VLGTGRP('NQW')

4. Para atualização de Help de Campos acessar o link.

05. ASSUNTOS RELACIONADOS

Para dúvidas sobre este processo acesse os links a seguir:

Árvore de páginas