Histórico da Página

#INCLUDE "PROTHEUS.CH"
 
User Function FA986NF()
Local oObj   := ParamIxb[1]
Local cAlias := ParamIxb[2]
Local cCont cCont1 := "1"
Local cCont2 := "01"Campo  Customizado"

ifIf cAlias == "SF2"  //Complemento de Título do Contas a Receber 
    oObj:SetValue( "FKFMASTER","FKF_TPREPA" , cContcCont1 )
    oObj:SetValue( "FKFMASTER","FKF_TPSERV" , cContcCont2 )

elseifElseIf cAlias == "SF1"  //Complemento de Título do Contas a Pagar   
    oObj:SetValue( "FKFMASTER","FKF_TPREPA" , cContcCont1 )
    oObj:SetValue( "FKFMASTER","FKF_TPSERV" , cContcCont2 )
endifEndIf 


Return