ACPlPg01 - Escolha da forma de pagamento

Ponto de entrada executado quando é realizada a escolha da forma de pagamento durante a matrícula ou alteração da rotina Alocação do aluno (ACAA060), para os cursos vigentes que sejam do tipo "Forma de Pagamento". Através do botão "Pl. Pagto", após selecionar uma forma de pagamento cadastrada e clicar no botão "prosseguir", este ponto de entrada será executado.

ACAA060.PRW

ACPlPg01 - Escolha da forma de pagamento ( ) --> Nil

Nil(nulo)
• Não existe retorno cadastrado para este ponto de Entrada

#INCLUDE "TOPCONN.CH"#INCLUDE "PROTHEUS.CH"#INCLUDE "RWMAKE.CH" User Function ACPlPg01()Local cNumRa  := ParamIxb[1]           //Registro Acadêmico do Aluno Selecionado.Local cCodCur := ParamIxb[2]           //Código do Curso Vigente Selecionado na Alocação.Local cPerLet := ParamIxb[3]           //Período Letivo do Curso Vigente Selecionado na Alocação.Local cHabili := ParamIxb[4]           //Habilitação do Curso Vigente Selecionado na AlocaçãoLocal nOpc    := ParamIxb[5]           //Opção Desejada (Alteracao, Inclusao, Exclusao, Visualizacao, etc)Local aResp   := aClone(ParamIxb[6])   //Array com os dados dos Responsáveis Financeiros escolhidos e percentuais Local aServ   := aClone(ParamIxb[7])   //Array com os dados do 'Serviço' forma de pagamento escolhidoLocal cMens   := ''cMens += 'O ponto de Entrada ACPlPag01 (Inclusao) foi executado com Sucesso. 'cMens += 'O Aluno escolhido foi: '+cNumRa+' Curso Padrao: '+cCodCur+' Periodo Letivo: '+cPerLet       Aviso('Ponto de Entrada executado',cMens,{'Finalizar'})Return