BlackTDN Search

segunda-feira, 24 de outubro de 2011

Protheus :: Advpl :: Obtendo parâmetros (SX6) de outra empresa

Dia desses, modificando uma “customização” em um cliente, deparei-me com um código que obtinha/gravava o conteúdo dos parâmetros SX6 de outra empresa. Isso se fazia necessário uma vez que, pelo modelo implantado, existia uma empresa consolidadora. Considerando que não gostei da forma que o código havia sido implementado, criei a minha própria versão que agora compartilho com vocês.

Ei-la…

Para obter o(s) parâmetros:

image

image

Chame-a como:

cMvPar := ”MV_PAPONTA”
cMvDef := “”
StaticCall(U_GETMV,_GetMvPar,”02”,”01”,cMvPar,cMvDef) –> uMvCnt

ou, para mais de um parâmetro a ser obtido:

aMvPar   := { “MV_PAPONTA”,”MV_PONMES”}
aMvDef   := { “” , “” }
StaticCall(U_GETMV,_GetMvPar,”02”,”02”,aMvPar,aMvDef) –> aMvCnt

e, Para gravar o(s) Parâmetros:

image

image 

Execute-a como:

cMvPar := “MV_PAPONTA”
cMvPut := “20110101-20110131”

StaticCall(U_GETMV,_PutMvPar,”01”,”01”,cMvPar,cMvPut)

ou, para mais de um parâmetro a ser gravado:

aMvPar := { “MV_PONMES” , “MV_PAPONTA” }
aMvPut  := { “20110101-20110131”,“20110101-20110131”}

StaticCall(U_GETMV,_PutMvPar,”01”,”01”,aMvPar,aMvPut)

Bem. Espero que lhes sirvam pra algo.

Para obter o código. Clique aqui.

[]s

иαldσ dj

Nenhum comentário:

Postar um comentário