Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: QMT140Cert - Número de certificado opcional
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil) , Espanhol , Inglês
Descrição: 
Ponto de entrada criado para possibilitar a customização pelo cliente do número do certificado de calibração para padrões internos,no lugar do numero do certificado sequencial.Ponto de chamada : No final da inclusão da calibração com medições, após as aprovações e ativações.
Programa Fonte 
QMTA140.PTW
Sintaxe

QMT140Cert - Número de certificado opcional ( [ ParamIXB ] ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
ParamIXB Array of Record 1- Cod. Instrumento
2-Revisão
3-Data
4-Array Medições
4.1-Faixa
4.2-Padrão
4.3-Valor Especificado
4.4-Medições
4.4.1-Medição
4.4.2-Logico .T. .F.
Retorno
    lRet()
  • Número do Certificado
Exemplos 
USER FUNCTION QMT140Cert ()            Local Lret     Local Ctime := Time()    Local cInst    := PARAMIXB[1]   // Instrum    Local cRev    := PARAMIXB[2]   // Rev    Local dData  := PARAMIXB[3]   // Data     Local aMatriz:= PARAMIXB[4]  // Matriz Medições    lret:= cvaltochar(Month(date()))+cvaltochar(Day(date()))+cvaltochar(SUBSTR(cTime, 1, 2))+cvaltochar(SUBSTR(cTime, 4, 2))    alert ('O instr. '+cInst+'/'+cRev+' de '+dtoc(ctod(ddata))+' recebeu o certificado '+lret)Return Lret
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não