Histórico da Página

#include "totvs.ch"

User Function SPDFIS07()
Local cCodProduto 	:= PARAMIXB[1] // Código do Produto
Local nTipo 		:= PARAMIXB[2] // Tipo Local
Local cRetorno 		:= ""
	/*nTipo 
		1 - Saldo em Estoque
		2 - Saldo em Processo 
		3 - Sem finalidade 
		4 - Saldo de Terceiros 
		5 - Saldo em Terceiros*/

If 	nTipo == 1
	cRetorno := SB1->B1_CONTA
ElseIf nTipo == 2
	cRetorno := "2222"
ElseIf nTipo == 4 
	cRetorno := "4444"
ElseIf nTipo == 5 
	cRetorno := "5555"
EndIf

Return cRetorno