Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • AM080CM2 - Adição de colunas

Ponto-de-Entrada: AM080CM2 - Adição de colunas
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição: 
Ponto de entrada para permitir adicionar colunas na sub-tela onde apresenta os títulos dos alunos (ao efetuar duplo clique) na consulta da simulação.
Programa Fonte 
ACAM080.PRW
Sintaxe

AM080CM2 - Adição de colunas ( [ ExpC1 ], [ ExpC2 ], [ ExpC3 ], [ ExpC4 ], [ ExpC5 ], [ ExpC6 ], [ ExpC7 ], [ ExpC8 ] ) --> aRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
ExpC1 Caracter Identifica qual retorno que o Ponto de Entrada deverá retornar. Se "1": retornar o nome dos campos Se "2": Retornar os valores dos campos
ExpC2 Array of Record RA do Aluno
ExpC3 Array of Record Código do Processo da simulação
ExpC4 Array of Record Prefixo do Título
ExpC5 Array of Record Número do Titulo
ExpC6 Array of Record Parcela do título
ExpC7 Array of Record Natureza do Título
ExpC8 Array of Record Tipo do Título
Retorno
    aRet(vetor)
  • Retornar o nome dos campos ou os valores dos campos adicionados.
Exemplos 
User Function AM080CM2()Local aRet := {}Local cOperacao := ParamIXB[1] //Se 1 Retornar o nome dos campos; Se 2 Retornar os valores dos camposLocal cNumRA 	:= ParamIXB[2] //RA do AlunoLocal cProcesso := ParamIXB[3] //Numero do ProcessoLocal cPrefixo 	:= ParamIXB[4] //PrefixoLocal cNumTit 	:= ParamIXB[5] //Num. TituloLocal cParcela 	:= ParamIXB[6] //ParcelaLocal cNatureza := ParamIXB[7] //NaturezaLocal cTipo 	:= ParamIXB[8] //Tipoif cOperacao == "1" //Retornar nome dos campos	aAdd( aRet, "CAMPO A")	aAdd( aRet, "CAMPO B")elseif cOperacao == "2" //Retornar os valores dos campos	aAdd( aRet, "Valor A")	aAdd( aRet, "Valor B")endifReturn aRet