User Function PLCSAUOC()
Local aRet	:= {}

// Ponto de entrada para customização de tipos de atendimento de saúde ocupacional segmentado por empresa

// Descrição:
// A necessidade desse ponto de entrada surgiu baseado na regra do cliente que determina que para
// Empresa '0001' os códigos de saude ocupacional são BD5_TIPATE $ 14|15|16...etc e
// Empresa '0003' considera todos os códigos da BD5_TIPATE, sem restrição.

// Parâmetros de Retorno
// aRet - Array de retorno multidimensional com duas colunas, sendo necessário retornar
// o conteudo do código da empresa na primeira coluna (BD7_CODEMP)   
// e tipos de atendimento no formato "XX|XX|XX|XX|XX|XX|XX" na segunda coluna.

// O ponto de entrada deve retornar o seguinte:
// aRet := { {'0001', '14|15|16|17|18|19|20|21'}, {'0003',''} }

//Importante: Quando não existir valor na segunda coluna, serão considerados todos os códigos.

    aAdd(aRet, {'0001', '14|15|16|17|18|19|20|21'} )
    aAdd(aRet, {'0003', ''} )
                                                                                                              	
Return(aRet)