Histórico da Página
QDOXCTB - Ponto de
entradaEntrada para validar a integração RH/Centro de Custo com o Quality (Departamento)
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | SIGAQDO - Controle de Documentos | ||||
Rotina: |
| ||||
Cadastros Iniciais: | GPEA010 - Cadastro de Funcionário - GPEA010.PRX | ||||
Ponto de Entrada: | QDOXCTB | ||||
Chamados Relacionados | TVLFKQ | ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos Homologados pela TOTVS | ||||
Tabelas Utilizadas: | QAD - Departamento. SI3 - Centros de Custos. | ||||
Sistemas Operacionais: | Todos Homologados pela TOTVS |
Descrição
Ponto
Disponibilizado Ponto de
entradaEntrada para validar a integração RH/Centro de Custo com o Quality.
Observações : No momento que em que o ponto Ponto for acionado o mesmo vai estar posicionado na tabela SI3 (Centro de Custo).
Retorno: Logico
Descrição: | Ponto de entrada Entrada para validar a integração do RH/Centro de Custo X Quality. | ||||||||||||
Localização: | Localizado antes da gravação do Departamento (Tabela QAD). | ||||||||||||
Eventos: | Ao realizar a Inclusão de Centro de Custo. | ||||||||||||
Programa Fonte: | QDOXFUN.PRW | ||||||||||||
Função: | QD_QUALITY() | ||||||||||||
Parâmetro: |
|
Exemplo:
#include 'totvs.ch'
#Include 'Protheus.ch'
User Function QDOXCTB()
Local cEmpDe := ParamIXB [1]
Local cFilDep := ParamIXB [2]
Local lRet := .T.
IF IsInCallStack("GPEA030CTBA030")
IF ALLTRIM(cEmpDe) == "T1"
lRet := .F.
EndIF
EndIF
Return lRet // Retorno Logico.