Linha Microsiga Protheus

Árvore de páginas

Descrição

EICSU100 - Manutenção de P.L.I. Suframa

Observações

Utilizado durante a rotina de Manutenção de P.L.I. Suframa

Exemplos

User Function ICPADSUF()
Local cParam:= ""


IF Type("ParamIXB") == "C"
cParam:= PARAMIXB
Else
cParam:= PARAMIXB[1]
Endif

If cParam == "PESO"

MsgInfo("Peso unitário: "+Alltrim(Str(nPeso_Un)) + " peso líquido total: "+Alltrim(Str(nPesTotPLI)), "Ponto de Entrada Suframa" )

Endif


If cParam == "TOTAIS"


Qtde_Est := 999
Peso_L := 888
Vlr_MoeCtx := 666


Endif

Return .T.


Preview

Veja também


Idioma

Português(Brasil)

Versões

Protheus 11 e 12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates


Parâmetros


NomeTipoDescriçãoDefaultObrigatórioReferência

PESO


Carácter

Usado para alterar os valores referentes ao peso do produto.






TOTAISCarácterUsado para alterar valores referentes a quantidade estatística, valor na moeda negociada e peso líquido


Retorno

TRUE

Eventos de chamada do Ponto de Entrada


Variáveis


NomeTipoEscopoPode AlterarDescrição

nPesTotPLIArrayPrivateSimArray responsável para adicionar campos a estrutura da Work_TMP

nPeso_UnArrayPrivateSim

Array responsável para adicionar campos a estrutura da Work_EIT


Qtde_EstNuméricaPrivateSimVariável responsável para indicar a quantidade estatística

Peso_LNuméricaPrivateSimVariável responsável para indicar o peso líquido

Vlr_MoeCtxNuméricaPrivateSimVariável responsável para indicar o valor na moeda negociada



Programa Fonte

EICSU100.PRW