Histórico da Página
Ponto de Entrada para adicionar campos ao array no workflow de fechamento de solicitação de serviços
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||||||
Segmento: | Manufatura | ||||||||||||
Módulo: | Manutenção de Ativos | ||||||||||||
Rotina: |
| ||||||||||||
Ponto de Entrada: | MNTW0352 e MNTW0353. | ||||||||||||
Chamados Relacionados | V118 TTUIN4 | ||||||||||||
País(es): | Todos. | ||||||||||||
Banco(s) de Dados: | Todos. | ||||||||||||
Sistema(s) Operacional(is): | Todos. |
Ponto de Entrada
Descrição: | Ponto de Entrada para inclusão de campos no workflow de encerramento de solicitação de serviço (MNTW035). | ||||||||
Localização: | SIGAMNT: Atualizações/Solicitacao Serv./Atendimento SIGAMNT: Atualizações/Solicitacao Serv./Fechamento | ||||||||
Eventos: | Finalização de Solicitação de Serviço | ||||||||
Programa Fonte: | MNTW035 | ||||||||
Função: | MNTW0352() | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function MNTW0352()
Local aRegi := ParamIXB[1]
Local nRecTQB := TQB->(Recno())
dbSelectArea("TQB")
dbSetOrder(1)
dbGoTo(nRecTQB)
If !Empty(TQB->TQB_SOLICI)
aAdd(aRegi[1],{ RetTitle("TQB_DESCSS"),; //Novo campo descrição de abertura SS
MSMM(TQB->TQB_CODMSS,80),; //Novo campo descrição de abertura SS
RetTitle("TQB_DESCSO"),; //Novo campo descrição de fechamento SS
MSMM(TQB->TQB_CODMSO,80)}) //Novo campo descrição de fechamento SS
Endif
Return aRegi