Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: CN230ROT - Inclusão de opções personalizadas no menu do cadastro de tipos de planilha.
Ponto de entrada localizado na função "MenuDef" da rotina CNTA230. Esse ponto de entrada permite a inclusão de opções personalizadas no menu do cadastro de tipos de planilhas. Programa Fonte Parâmetros:NomeCNTA230 Tipo | Descrição | Default | Obrigatório | Referência | aRotina | Array | Vetor com | cCodEd | Caracter | Variável com o código do edital do contrato posicionada na revisão de aditivo | cNumPro | Caracter | Variável com o numero do processo do contrato posicionada na revisão de aditivo | Retorno aRet (Array) Retorno Logico Retorno aRet - Vetor com as opções a serem adicionadas no menu padrão. Exemplos #Include "protheus.ch" Exemplos#Include "parmtype.ch" User Function CN230ROT() Local aRet := {} AADD( aRet, { "Teste123", "MsgInfo('Opção personalizada')", 0, 4 } ) Return aRet User Function A300POSC() Local aContra := PARAMIXB DbSelectArea("CO1") CO1->(DbSelectArea(1)) If CO1->(DbSeek( aContra[1]+aContra [2]+aContra [3] )) lRet := .T. Else MsgAlert(" Edital Não Encontrado !! ") lRet := .F. EndIf return lRet |
Import HTML Content
Visão Geral
Conteúdo das Ferramentas