Histórico da Página
CA290MNUXML - Edição do Menu da Área de Trabalho do CRM
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | Faturamento | ||||
Rotina: |
| ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos |
Descrição
Através deste PE é possível alterar as opções do menu da área de trabalho do CRM.
O PE ira receber o menu padrão através de uma expressão carácter, contendo um array xml e deverá retornar o array este mesmo editado.
Ponto de Entrada
Descrição:Informe o Menu em que estará localizada a rotina | CA290MNUXML - Edição do Menu da Área de Trabalho do CRM | ||||||||||
Localização:Informe o Submenu em que estará localizada a rotina | Atualizações/Área de Trabalho | ||||||||||
Eventos:Informe o Título da rotina | CA290GXML() --> cRet | ||||||||||
Programa Fonte: | Informe o Fonte da rotina | Função: | Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”CRMA290 | ||||||||
Parâmetros: | PARAMIXB[1] - Tipo: Caracter--> String do XML | ||||||||||
Retorno: |
|
Bloco de código |
---|
|
|
|
|
|
Exemplo:
#Include 'Protheus.ch'
User Function CN120ALT()
Local aCab:= PARAMIXB[1]
Local cTipo:= PARAMIXB[2]
If cTipo == '1'
aCab[4][2]:= 'NF' //Validações do usuário
EndIf
Return aCab
| |
#Include 'PROTHEUS.CH'
User Function CA290MNUXML ()
Local cPEXml := PARAMIXB[1]
cPEXml := "<?xml version='1.0' encoding='UTF-8'?>"
cPEXml += "<MenuContent>"
cPEXml += " <Folder>
cPEXml += " <Description>" + "Novo Menu" + "</Description>"
cPEXml += " <Content>
cPEXml += " <Description>" + "Alerta 1" + "</Description>"
cPEXml += " <Function> ALERT("Botão 1") </Function>"
cPEXml += " </Content>"
cPEXml += " <Content>
cPEXml += " <Description>" + "Alerta 2" +"</Description>"
cPEXml += " <Function> ALERT("Botão 2") </Function>"
cPEXml += " </Content>"
cPEXml += " </Folder>"
cPEXml += "</MenuContent>"
Return( cPEXml ) |