DSERSGS-10424 DT Implementação da Movimentação do Armamento Multi-filial

01. DADOS GERAIS

Produto:	TOTVS Prestadores de Serviços Terceirização
Linha de Produto:	Linha Protheus
Segmento:	Serviços
Módulo:	Prestadores de Serviços
Função:	teca710.prw teca720.prw teca730.prw teca750.prw teca880.prw tecxfunb.prw
País:	Brasil
Ticket:	Não há
Requisito/Story/Issue (informe o requisito relacionado) :	DSERSGS-10424

02. SITUAÇÃO/REQUISITO

O sistemana não permitia movimentar armamentos, munições e coletes entre filais de locais internos ou de clientes.

03. SOLUÇÃO

Implementada alteração para que seja possível movimentar as armas, munições e coletes entre as filiais.

Esta funcionalidade estará disponível a partir do release 12.1.33. Caso deseje habilitá-la em releases anteriores, efetive as seguintes alterações:

1) Entre no configurador e crie os seguintes campos, consultas, parâmetro e altere os índices mencionados:

Campo	Valor
X3_ARQUIVO	TE0
X3_ORDEM	53 [Modificar se necessário]
X3_CAMPO	TE0_FILLOC
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Local
X3_DESCRIC	Filial do Local
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("TE0_FILLOC"))
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN	At710WLocal()
X3_GRPSXG	033
X3_FOLDER	3
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	TE1
X3_ORDEM	49 [Modificar se necessário]
X3_CAMPO	TE1_FILLOC
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Local
X3_DESCRIC	Filial do Local
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("TE1_FILLOC"))
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN	At720WLocal()
X3_GRPSXG	033
X3_FOLDER	3
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	T49
X3_ORDEM	17 [Modificar se necessário]
X3_CAMPO	T49_FILLOC
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Local
X3_DESCRIC	Filial do Local
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("T49_FILLOC")) .And. At730VlLoc()
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN
X3_GRPSXG	033
X3_FOLDER
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	TFP
X3_ORDEM	18 [Modificar se necessário]
X3_CAMPO	TFP_FILLOC
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Local
X3_DESCRIC	Filial do Local
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID
X3_RELACAO
X3_F3	SM0
X3_WHEN
X3_GRPSXG	033
X3_FOLDER
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	TFQ
X3_ORDEM	35 [Modificar se necessário]
X3_CAMPO	TFQ_FILORI
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Orig.
X3_DESCRIC	Filial de Origem
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("TFQ_FILORI"))
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN	!Empty(FwFldGet("TFQ_ENTORI"))
X3_GRPSXG	033
X3_FOLDER	1
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	TFQ
X3_ORDEM	36 [Modificar se necessário]
X3_CAMPO	TFQ_FILDES
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Dest.
X3_DESCRIC	Filial de Destino
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("TFQ_FILDES"))
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN	!Empty(FwFldGet("TFQ_ENTDES"))
X3_GRPSXG	033
X3_FOLDER	1
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	TE4
X3_ORDEM	32 [Modificar se necessário]
X3_CAMPO	TE4_FILLOC
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Local.
X3_DESCRIC	Filial do Local
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("TE4_FILLOC"))
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN	If(FwFldGet("TE4_OCPOST") == "S",.T.,.F.)
X3_GRPSXG	033
X3_FOLDER	1
Obrigatório?	Não
Usado?	Sim

Campo	Valor
X3_ARQUIVO	TE4
X3_ORDEM	33 [Modificar se necessário]
X3_CAMPO	TE4_FILINT
X3_TIPO	C (Caractere)
X3_TAMANHO	8 [Modificar se necessário]
X3_DECIMAL	0
X3_TITULO	Filial Inter
X3_DESCRIC	Filial de Local Interno
X3_PICTURE	@!
X3_VISUAL	A (Alterar)
X3_CONTEXT	R (Real)
X3_VALID	ExistCpo("SM0",cEmpAnt+FwFldGet("TE4_FILINT"))
X3_RELACAO	cFilAnt
X3_F3	SM0
X3_WHEN	If(FwFldGet("TE4_OCPOST") == "N",.T.,.F.)
X3_GRPSXG	033
X3_FOLDER	1
Obrigatório?	Não
Usado?	Sim

INDICE	ODERDEM	CHAVE
TFP	7	TFP_FILIAL+TFP_ENTIDA+TFP_CODINT+TFP_PRODUT+TFP_FILLOC
TFP	8	TFP_FILIAL+TFP_ENTIDA+TFP_CODLOC+TFP_PRODUT+TFP_FILLOC

Campo	Valor
X6_FIL
X6_VAR	MV_GSARMFL
X6_TIPO	L
X6_DESCRIC	Movimentação de armamento entre filiais
X6_CONTEUD	.T.

Campo	Valor
Tipo de Consulta	Consulta Específica
Consulta	TERFIL
Descrição	Local Interno
Tabela	TER
Expressão	TecFlArma()
Retorno	TecArmFlF3()

Importante

Para o multi-filial funcionar corretamente é necessário que as tabelas TE0 - Cadastro de Armas, TE1 - Cadastro de Coletes, TE2 - Cadastro de Munições, T49 - Entrada de Munição e TFP - Histórico de Movimentação de Munições estejam totalmente compartilhadas.

2) Acesse a rotina de cadastro de armamentos, preencha os campos obrigatórios e verifique se o campo de filial é apresentado na aba "Localização", preencha o campo de filial e o local que deseja implantar a arma:

3) Entre na rotina de movimentação de armamentos e realize a movimentação entre locais internos:

4) Após realizar a movimentação para local interno podemos realizar também a movimentação para o local do cliente:

04. DEMAIS INFORMAÇÕES

Não há

05. ASSUNTOS RELACIONADOS

DSERSGS-10488 DT Relatórios de Armamentos Multi-Filial

Árvore de páginas