Descrição

Classifica pacote para o SIP

Observações

O ponto de entrada foi criado para que o cliente possa classificar eventos do tipo pacote durante o processamento do SIP.

Exemplos

User Function PL992PCT

Local cChaveGuia    := ParamIxb[1]

Local cTipoTabela    := ParamIxb[2]

Local cCodigoProc    := ParamIxb[3]

Local aClassif    := {}

Local aAreaBR8    := BR8->(GetArea())

        dbSelectArea("BR8")

        BR8->(DbSetOrder(1)) //BR8_FILIAL + BR8_CODPAD + BR8_CODPSA + BR8_ANASIN

        If BR8->(MsSeek(xFilial("BR8")+cTipoTabela+cCodigoProc))    

           aClassif:={BR8->BR8_CLASIP,BR8->BR8_TPCONS,'0'}//BR8->BR8_TPPROC}

        Endif            

RestArea(aAreaBR8)

Return aClassif

Preview

Veja também

 

Idioma

Português(Brasil)

Versões

Versões_Anteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

TOTVSDBAccess

Updates

 

Parâmetros

ChaveGuia - BD7_CODOPE+BD7_CODLDP+BD7_CODPEG+BD7_NUMERO+BD7_ORIMOV
TipoTabela - BR8_CODPAD
CodProc - BR8_CODPSA

Retorno

cClaSip - classificao para o SIP
cTpCons - tipo consulta
cTipoPro - tipo de procedimento

Eventos de chamada do Ponto de Entrada

Classificação de eventos do SIP

Variáveis

 

Programa Fonte

plsa992.prw