Imprimi Página | Fechar janela |
Legenda no Cadastro de Produto Impresso de: Helpfacil - Portal do conhecimento Nome do Forum: ADVPL Descrição do Forum: Dúvidas sobre a programação em ADVPL URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=44438 Data da Impressão: segunda-feira, 24 de março de 2025 at 05:35 Topico: Legenda no Cadastro de Produto Postado por: WANDERSONW Assunto: Legenda no Cadastro de Produto Data Postagem: segunda-feira, 12 de fevereiro de 2024 at 16:20 Bom dia Pessoal, Estou precisando colocar legenda no browse do cadastro de produto e, peguei um exemplo no tdn da totvs que esta apresentando erro de array. Vejam o fonte: #Include ‘Protheus.ch‘ USER FUNCTION MT010COR () Local aCores:={} aAdd(aCores,{‘B1_TIPO == "PA"‘,‘BR_VERMELHO‘}) aAdd(aCores,{‘B1_TIPO == "BN"‘,‘BR_PRETO‘}) aAdd(aCores,{‘B1_TIPO == "PA"‘,‘BR_VERDE‘}) aAdd(aCores,{‘B1_TIPO == "MP"‘,‘BR_AZUL‘}) aAdd(aCores,{‘B1_TIPO == "GG"‘,‘BR_AMARELO‘}) aAdd(aCores,{‘B1_TIPO == "MC"‘,‘BR_CINZA‘}) aAdd(aCores,{‘B1_TIPO == "ME"‘,‘BR_PINK‘}) aAdd(aCores,{‘B1_TIPO == "MO"‘,‘BR_LARANJA‘}) RETURN aCores Alguém já passou por isso ou tem um exemplo melhor que possa compartilhar? Respostas: Postado Por: TIAGOFLM Data Postagem: segunda-feira, 12 de fevereiro de 2024 at 18:45 Acho que faltou alguma parte, no TDN ta aAdd(aCores,{‘B1_TIPO == "AI"‘,‘BR_VERMELHO‘, ‘Produto teste‘}) Postado Por: WANDERSONW Data Postagem: terça-feira, 13 de fevereiro de 2024 at 08:08 Bom dia Tiago, Muito obrigado era isso mesmo. |
Imprimir Página | Fechar Janela |