STRECEST - Altera títulos antes de efetuar o estorno

Este Ponto de Entrada é destinado para a Alteração dos títulos a serem estornados

Este ponto de entrada foi criado para complementar o ponto de entrada o ponto de entrada STRECVER caso seja inserido algum titulo que não seja do Protheus,

fazendo com que ele seja excluído do array antes de enviar para realizar o estorno para não afetar a rotina padrão.

#INCLUDE "PROTHEUS.CH"

User Function STRECEST()
Local aTit := PARAMIXB[1]
Local nPos := 0

nPos := aScan(aTit, {|x| x[11] == "MANUAL"} )
If nPos > 0
aDel(aTit,nPos)
ASize(aTit, Len(aTit) - 1)
EndIf

Return aTit

Português(Brasil)

Microsiga Protheus11

Todos

Todas

PARAMIXB[1] (aListRever) - Array com os titulos que irão realizar o estorno

Seu retorno deve ser um ARRAY contendo os titulos a serem baixados.