Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: A300POSC - Inclusão de revisão de aditivo de prazo para contratos  vinculados com edital


Abrangências:Microsiga Protheus 12
Versões:Microsiga Protheus 12
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todas TotvsDbAccess
Idiomas:Português (Brasil)


Descrição:
Ponto de entrada localizado na função CN300ExcArt, que é responsável por verificar se o processo licitatório contém os artigos que permitem exceções .
Eventos
O ponto de entrada pode ser acionado nos seguintes processos:

- Em uma revisão, quando foi incluído item configurado para geração de base.

Programa Fonte

CNTA300

Sintaxe

A300POSC - Inclusão de revisão de aditivo de prazo para contratos  vinculados com edital

Parâmetros:


NomeTipoDescriçãoDefaultObrigatórioReferência
cCTRFilCaracterVariável com o numero da filial do contrato posicionada na revisão de aditivo


cCodEdCaracterVariável com o código do edital do contrato posicionada na revisão de aditivo


cNumProCaracterVariável com o numero do processo do contrato posicionada na revisão de aditivo



Retorno
lRet
    (Logico)
  • Retorno Logico
Observações
Exemplos
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