HSALTDLD - Manipula tela de Solicitação de Produtos

Descrição

HSALTDLD - Ponto de entrada que permite manipular a tela de Solicitação de Produtos.

Observações

Exemplos

User Function HSALTDLD() Local oHSDataLD @ 015, 150 Say "Data Desp" PIXEL COLOR CLR_BLUE OF oDlg @ 015, 180 MSGet oHSDataLD Var dHSDataLD Picture "@D" Valid FS_VldDLD() PIXEL COLOR CLR_BLACK OF oDlg Return(Nil)
Static Function FS_VldDLD() Local lRet := .T. If dHSDataLD < GAD->GAD_DATATE MsgStop("Data das despesas não pode ser menor que a data do atendimento " + DToC(GAD->GAD_DATATE), "Atenção") lRet := .F. ElseIf !Empty(GAD->GAD_DATALT) .And. dHSDataLD > GAD->GAD_DATALT MsgStop("Data das despesas não pode ser maior que a data da alta " + DToC(GAD->GAD_DATALT), "Atenção") lRet := .F. ElseIf dHSDataLD > dDataBase MsgStop("Data das despesas não pode ser maior que a data basse do sistema " + DToC(dDataBase), "Atenção") lRet := .F. EndIf Return(lRet)

Preview

Veja também

Idioma

Português(Brasil)

Versões

Versões_Anteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Retorno

Nulo()

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

HSPAHM32.PRW