Histórico da Página
CRM980BLabel - Adiciona legendas no browse do cadastro de clientes
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | CRM | ||||
Rotina: |
| ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos | ||||
| Versão: | 12.1.18 e superior. |
Ponto de Entrada
Descrição: | A finalidade do ponto de entrada CRM980BLabel é permitir inclusão de legendas no browse do cadastro de clientes. | ||||||||
Localização: | Atualizações/Vendas/Contas/Clientes | ||||||||
Eventos: | CRM980BLabel( ) -> aLabelaRet | ||||||||
Programa Fonte: | CRMA980.prw | ||||||||
Parâmetros: | Nenhum | ||||||||
Retorno: |
|
Exemplo:
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#INCLUDE "PROTHEUS.CH" User Function CRM980BLabel() Local aLabelaRet := {} //----------------------------------- // [n][1] - ExpressionExpressão ADPVLADVPL // [n][2] - Cores da ColorLegenda // [n][3] - LabelDescrição //------------------------------------ aAdd(aLabelaRet,{"SA1->A1_PESSOA=='F'","GREEN","Pessoa Física"}) aAdd(aLabelaRet,{"SA1->A1_PESSOA=='J'","RED" ,"Pessoa Jurídica"}) aAdd(aLabelaRet,{"SA1->A1_PESSOA==' '","BLACK","Não Informado"}) Return( aLabelaRet ) |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas