Histórico da Página

/*/{Protheus.doc} User Function ACD170SEP
    Executado no final da rotina de separação
    @type  Function
    @author TOTVS
    /*/
User Function ACD170SEP()
    Local aArea   := GetArea()
    Local cOrdSEP := PARAMIXB[1]      

    // gravações do cliente
    If CB7->( FieldPos( "CB7_XUSER" ) > 0)   
       CB7->RecLock( "CB7", .F. )
       CB7->CB7_XUSER := cUserName
       CB7->( MsUnlock() )
    Endif

    RestArea( aArea )
Return