||Descrição|| Criado o Ponto de Entrada P720BPAD para alterar a Busca Padrão do campo BD5_LOCATE
||Observações||
||Exemplos||
User Function P720BPAD
Local aDadRda := paramixb[1]
aDadRda[18] := "007006" //Indicando para qual posição a consultar
msgStop("Ponto de Entrada - Alterando o código Local Atendimento: " + aDadRda[18],"PE - Rede Locais de Atendimento")
Return(aDadRda)
||Preview||
||Veja também||
||Idioma|| Português(Brasil)
||Versões|| Microsiga_Protheus10
||Sistemas Operacionais Suportados||Todos
||Compatível com as Bases de Dados||Todas
||Updates||
||Parâmetros|| {.T.,BAU->BAU_CODIGO,BAW->BAW_CODANT,BAU->(BAU->BAU_ESTCR+BAU->BAU_CONREG+BAU->BAU_SIGLCR),BAU->BAU_CODBB0, BAU->BAU_NOME,BAU->BAU_NREDUZ,BAU->BAU_TIPPE,BAU->BAU_DATBLO,BAU->BAU_CODBLO,.F.,BB8->BB8_CODLOC,BB8->BB8_LOCAL,cCodInt,BAX->BAX_CODESP,BAU->BAU_CPFCGC, BAQ->BAQ_DESCRI,BB8->(BB8_CODLOC+BB8_LOCAL),BB8->BB8_DESLOC, AllTrim(BB8->BB8_END)+"+"+AllTrim(BB8->BB8_NR_END)+"-"+AllTrim(BB8->BB8_COMEND)+"-"+AllTrim(BB8->BB8_BAIRRO),BAX->BAX_CODSUB,BA0->BA0_GRUOPE,BB8->BB8_OBRCLI, cTrtExe,BAU->BAU_CATHOS,aCarRDA,BAU->BAU_TIPPRE,BAU->BAU_CODOPE,lRdaInt,BAU->BAU_ALTCUS,BAU->BAU_SIGLCR,BAU->BAU_CONREG}
||Retorno|| aDadRda(array_of_record)
||Eventos de chamada do Ponto de Entrada||
||Variáveis||
||Programa Fonte|| PLSA720 |