Home

Linha Microsiga Protheus

Páginas filhas
  • AcDocStat - Customização da gravação do campo

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
AcDocStat - Customização da gravação do campo
AcDocStat - Customização da gravação do campo

Ponto-de-Entrada: AcDocStat - Customização da gravação do campo
Abrangências: Microsiga Protheus 8.11 , Microsiga Protheus 10
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Brasil
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todas TotvsDbAccess
Descrição:
Permite ao usuário customizar a gravação do campo JC6_STATUS preenchido automaticamente quando realizada a matricula de um aluno em um curso vigente que possua um grupo de documentos cadastrados.
Programa Fonte
ACAXFUN.PRW
Sintaxe

AcDocStat - Customização da gravação do campo ( [ cNumRa ], [ cCodCur ], [ cCodDoc ], [ cNomRot ] ) --> cRet

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
cNumRaCaracterNumero do registro academico do aluno matriculado/modificado.
cCodCurArray of RecordCódigo do curso vigente qual o aluno foi matriculado/modificado.
cCodDocArray of RecordCódigo do documento em questão.
cNomRotArray of RecordNome da rotina em execução (ponto de entrada pode ser executado por diversas rotinas)
Retorno
    cRet()
  • '1' - Pendente'2' - Ok'3' - Não Requerido
Exemplos
User Function AcDocStat()Local cNumra  := ParamIxb[1]Local cCodCur := ParamIxb[2]Local cCodDoc := ParamIxb[3]Local cRotIni := ParamIxb[4]Local cRet	  := ''Local cMens   := ''//Monta a mensagem de alertacMens += '#####################################################' + chr(13) + chr(10)cMens += 'Qual status voce deseja atribuir para o documento: ' + alltrim(cCodDoc) + " ?" + chr(13) + chr(10)cMens += 'Aluno referencia: ' + alltrim(cNumRa) + chr(13) + chr(10)cMens += 'Curso referencia: ' + alltrim(cCodCur) + chr(13) + chr(10)cMens += 'Rotina executada: ' + alltrim(cRotIni) + chr(13) + chr(10)cMens += '#####################################################' + chr(13) + chr(10)//Exibe a mensagem de alerta e define o retorno da funcaocRet := alltrim(str(Aviso('Ponto de Entra AcDocStat',cMens,{'1 - Pendente','2 - Ok','3 - Ñ Req.'})))Return cRet
Variáveis
NomeTipoEscopoPode Alterardescrição
Array of RecordGlobalNão