Ponto de Entrada: STCpCuston - Sangria/Suprimento - TOTVS PDV
Descrição: | Este Ponto de Entrada é executado no momento da inclusão da tabela SE5 referente a sangria / suprimento | ||||
Programa Fonte: | STDSUPPLYBLEEDING.prw Observação: É necessário atualização dos fontes pertencentes a rotina sangria / suprimento do TOTVS PDV. | ||||
Função: | A função envia como parâmetro os PARAMIXB[1] e PARAMIXB[2]
| ||||
Retorno: | Array com duas posições sendo a primeira posição um logico informando se segue ou não e a segunda posição um outro Array que recebo o campo e o valor que deverão ser gravados |
Exemplo:
#include 'protheus.ch'
#include 'parmtype.ch'
user function STCpCuston()
Local nTipo := PARAMIXB[1]//Tipo de operacao 1=Sangria | 2= Suprimento/Troco
Local cRecPag := PARAMIXB[2]//Recebimento "R" ou Pagamento "P"
return {.T.,{{"E5_OPERAD","XXX"},{"E5_MULTNAT","2"}}}