Histórico da Página

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

...

Implementar o ponto de entrada PLSTRTLAY para tornar possível a manipulação do array (Cabeçalho "aDados" e Itens "aItens") antes da geração do

...

XML das transações de PTU Online.

03. SOLUÇÃO

...

Implementado Ponto de Entrada PLSTRTLAY.

Ponto de Entrada PLSTRTLAY

Programa fonte:	PLSTRTLAY
Função:	Manipulação dos arrays de montagem do xml ( [ aDados], [ aItens], [ cTipoProc] ) --> Array (aDados, aItens)
Parâmetros:	aDados: Array de Cabeçalho aItens: Array de Itens cTipoProc: Caractere identificando se a origem é Recebimento ou Envio (Recebimento = 1 / Envio = 2)
Retorno: Tipo Array	aDados: Array de Cabeçalho (Obrigatório) aItens: Array de Itens (Obrigatório) Caso não precise alterar os dados, retornar os mesmos aDados e aItens recebidos no ponto de entrada.

Bloco de código
language c# theme RDark title Exemplo de Uso linenumbers true
#Include "PROTHEUS.CH" User Function PLSTRTLAY() Local aDados := PARAMIXB[1] Local aItens := PARAMIXB[2] Local cTipoProc := PARAMIXB[3] If cTipoProc == "1" // Recebimento Do Case Case Alltrim(PlsPtuGet("CD_TRANS", aDados)) == "00600" // Tratamento para a transação 00600 Case Alltrim(PlsPtuGet("CD_TRANS", aDados)) == "00605" // Tratamento para a transação 00605 EndCase Else // 2 = Envio Do Case Case Alltrim(PlsPtuGet("CD_TRANS", aDados)) == "00600" // Tratamento para a transação 00600 Case Alltrim(PlsPtuGet("CD_TRANS", aDados)) == "00605" // Tratamento para a transação 00605 EndCase EndIf // Dica: Para alterar os dados do array poderá ser utilizado a função PlsPtuPut Return {aDados, aItens}

04. DEMAIS INFORMAÇÕES

Não se aplica12675232 DSAUBE-16554 DT PTU ONLINE 9.0

05. ASSUNTOS RELACIONADOS

        Não se aplica

...