#Include 'Protheus.ch' /* No exemplo, a contabilização das filiais 01, 02, 03, 04 e 05 é centralizada na filial 01 */ User Function GP110ACT() Local aRet := { "01", "01"} //Retira a chave única da tabela SRZ, devido necessidade de atualização da SRZ If SX2->( dbSeek("SRZ") ) SX2->( Reclock("SX2", .F.) ) SX2->X2_UNICO := "" SX2->( MsUnlock() ) EndIf //Efetua alteração da filial da tabela SRZ, conforme código enviado para a função SRZFilReplace() SRZFilReplace( "01" , /*bCondReplace*/ ) Return( aRet ) //aRet array [ 1 ] = Código da filial onde a contabilização será efetuada // [ 2 ] = Código da filial onde a contabilização será centralizada