Árvore de páginas

Versões comparadas

Chave

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

...

  1. Agregar la siguiente función de usuario y compilar.
USER FUNCTION M447FIGE
 
    Local aArea    := GetArea()
    Local nValor    := 0
    If lUsoRSG
        If TMPRSG->(DBSeek(TMPRSH->RSH_FACT+TMPRSH->RSH_SERIE+TMPRSH->RSH_PROV+TMPRSH->RSH_TDA+TMPRSH->RSH_ITEM))
                nValor := TMPRSH->RSH_IMPPAG
        EndIf
    EndIf
    RestArea(aArea)
RETURN  nValor


2. Por configurador modificar el "Modo  Edición" del campo RSH_IMPPAG, como sigue:

...