Histórico da Página
...
| Ponto de Entrada: | GFEXWS13 | |||||||||
Descrição: | Permitir parametrizar a utilização do duplo sentido | |||||||||
Localização: | Chamado em três pontos onde é verificado o duplo sentido GFEWSSIMULATION | |||||||||
Programa Fonte: | GFEXWSFUN - Integração TOTVS 12 x GFE | |||||||||
Parâmetros: | aParamSim
Nenhum aParamSim | |||||||||
Retorno: |
|
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#Include 'Protheus.ch' user function GFEXWS13() Local aParamSim := PARAMIXB[1] Local nPos1 := 0 Local nPos2 := 0 Public cDupSent := "" nPos2 := len(aParamSim) cDupSent := aParamSim[nPos2] // Se houver somente 4 posições elimina o último para que o processamento do programa padrão funcione corretamente if nPos2 == 4 .and. (cDupSent == "S" .or. cDupSent == "N") aDel(aParamSim,nPos2) aSize(aParamSim, len(aParamSim)-1) endif return aParamSim |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas