Home

Linha Microsiga Protheus

Páginas filhas
  • AC180VDU - Validação de mudança de folder

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
AC180VDU - Validação de mudança de folder
AC180VDU - Validação de mudança de folder

Ponto-de-Entrada: AC180VDU - Validação de mudança de folder
Abrangências: Microsiga Protheus 8.11 , Microsiga Protheus 10
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição:
Criação do ponto de entrada “AC180VDU” para validar a mudança de folder dos dias da semana na grade de aulas permitindo ou não a edição.
Programa Fonte
ACAA180.prw
Sintaxe

AC180VDU - Validação de mudança de folder ( [ @ParamIxb[1] ], [ ParamIxb[2] ] ) --> lRet

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
ParamIxb[1]ObjetoObjeto oFolder contendo os dias da semana.X
ParamIxb[2]Array of RecordFolder do dia da semana selecionado.1-Domingo2-Segunda-feira3-Terca-feira 4-Quarta-feira5-Quinta-feira6-Sexta-feira7-Sabado
Retorno
    lRet()
  • Retorna .T. se pode entrar na folder da semana selecionado. Retorna .F. se não permite editar.
Exemplos
User function AC180VDU()Local oFolderU := ParamIxb[1]Local cDia := ParamIxb[2] //dia da semanaLocal lRet := .F.//1-Domingo//2-Segunda-feira//3-Terca-feira  //4-Quarta-feira//5-Quinta-feira//6-Sexta-feira//7-Sabado//ja esta posicionado na JAR do periodo letivolRet := Iif(!Empty(M->JBK_TURNO), JAR->( &("JAR_AULA" + cDia) == "1" ), .T.)If M->JBK_CODCUR =="000007" .and. cDia == "7"	lRet := .T.      EndIfReturn lRet