Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 25

changes.mady.by.user Leonardo Maria Pereira

Gravado em

comparado com

Nova versão 26

changes.mady.by.user Leonardo Maria Pereira

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

07. CAMPOS CUSTOMIZADOS/CALCULADOS

CAMPODESCRIÇÃOCódigo

E1_ATRASO

Para o cálculo dos dias de atraso

jItems[self:aStruct[nX][1]] :=dDatabase-StoD((cAlias)->E1_VENCREA)

Realiza uma subtração da data do dia "dDatabase' com a data de vencimento do título E1_VENCREA.

E1_CREDITO


Para cálculo do valor do crédito.

nVlrCre:=0
         If (!Empty(jParams['MV_PAR03'][1]) .And.sTod((cAlias)->E1_EMISSAO) <Min(FwDateTimeToLocal( jParams['MV_PAR03'][1] )[1],dDatabase) ) .OR. (!Empty(jParams['MV_PAR05'][1]) .And.sTod((cAlias)->E1_VENCREA) <FwDateTimeToLocal( jParams['MV_PAR05'][1] )[1])
            nVlrCre:=IIf(lTipoNg.OR.SubStr( (cAlias)->E1_TIPO,3,1 ) =="-",(cAlias)->E1_CREDITO,0)
         ElseIf (Alltrim((cAlias)->E1_TIPO) <>Alltrim(GetMV("MV_SIMB1") ))
            If ( !Empty(jParams['MV_PAR04'][1]) .AND.sTod((cAlias)->E1_EMISSAO) <=FwDateTimeToLocal( jParams['MV_PAR04'][1] )[1]) .OR. ( !Empty(jParams['MV_PAR06'][1]) .AND.sTod((cAlias)->E1_VENCREA) <=FwDateTimeToLocal( jParams['MV_PAR06'][1] )[1])
               nVlrCre:=IIf(lTipoNg.OR.SubStr( (cAlias)->E1_TIPO,3,1 ) =="-",(cAlias)->E1_CREDITO,0)
            EndIf                      
         EndIf

Realiza uma sumarização dos valores no campo E1_CREDITO para determinar os créditos dos titulos.

08. TABELAS UTILIZADAS

  • SE1 - Contas a Receber
  • SA1 - Clientes
  • SED - Naturezas

...