| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Estoque/Custos |
| Função: | COMXFUN.PRX - Generica de materiais MATA216 - Refaz saldo de terceiros |
LOCALIZAÇÃO : Function MaAtuSB6() - Responsável por atualizar o saldo de poder de terceiros e em terceiros conforme os parametros da rotina.
EM QUE PONTO : É executado após a gravação do arquivo SB6 e pode ser utilizado para atualizar algum campo customizado do SB6
#Include 'Totvs.ch'
User Function SB6GRAVA ()
If SB6->B6_PRODUTO = 'XPTO'
SB6->B6_SEGUM := '**'
EndIf
Return |
A Partir de 31/05/2026 o ponto de entrada similar para uso em procedures estará disponivel, que será instalado com a procedure do pacote 15 e nome M216SB6GRV_15_XX , onde XX é o codigo do grupo de empresas, e não terá efeito ate que seja editado no SGDB com a escrita em query.
USE [P1212510MNTDBEXP]
GO
/****** Object: StoredProcedure [dbo].[M216SB6GRV_15_T1] Script Date: 24/04/2026 17:46:48 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- Procedure creation
ALTER PROCEDURE [dbo].[M216SB6GRV_15_T1] (
@IN_FILIALCOR Char( 8) ,
@IN_RECNOSB6 Integer ,
@OUT_RESULTADO Char( 01 ) output ) AS
DECLARE @cCod char(30)
SELECT @cCod = B6_PRODUTO FROM SB6T10 WHERE R_E_C_N_O_ = @IN_RECNOSB6
IF @cCod = ' COM00000000000000000000000011' begin
UPDATE SB6T10 SET B6_SEGUM = '**' WHERE R_E_C_N_O_ = @IN_RECNOSB6
end
-- Declaration of variables
DECLARE @OutResult VarChar( 01 )
BEGIN
SET @OUT_RESULTADO = '1'
END |