ERP – Função AbrirTelaSistema - Como utilizar a Função AbrirTelaSistema para abrir a tela de Transferências de Produtos
Dúvida
Como utilizar a Função AbrirTelaSistema para abrir a tela F210TPA_SECE - Suprimentos / Gestão de Estoques / Controle de Estoque / Transferência / Transferências (Transferências de Produtos), no módulo de Suprimentos?
Solução
Para utilizar a função AbrirTelaSistema para abrir a tela F210TPA_SECE - Suprimentos / Gestão de Estoques / Controle de Estoque / Transferência / Transferências (Transferências de Produtos), os parâmetros possíveis a serem passados na abertura desta tela através da função AbrirTelaSistema são:
Dados da tela Transferências de Produtos:
- DatMov - número - Data do movimento do estoque;
- NumDoc - número - Número do documento de entrada;
Dados do botão Seleção da tela Transferências de Produtos para filtro das informações:
- CodPro - alfa - Código do produto;
- CodDer - alfa - Código da derivação;
- CodDep - alfa - Código do depósito;
- CodEnd - alfa - Código do endereçamento de produto;
- QtdMov - número - Quantidade do movimento;
Importante
Sempre que a tela de Transferências de Produtos for aberta via função AbrirTelaSistema, a opção padrão do campo Tipo de Transferência será Entre Produtos, não sendo possível alterar essa opção via regra.
Observação
Segue um exemplo de regra a ser considerada para análise:
Definir Alfa VParametros;
Definir Numero nRet;
@ Data do Movimento da F210TPA @
Definir Numero nDatMov;
@ Número do Documento da F210TPA @
Definir Numero nNumDoc;
/* Os parâmetros abaixo são os possíveis filtros que podem ser passados na utilização da função AbrirTelaSistema para abertura da tela F210TPA e que são inseridos no botão "Seleção" da tela.
*/
@ Produto de Saída @
Definir Alfa aProSai;
@ Derivação de Saída @
Definir Alfa aDerSai;
@ Quantidade Transferência @
Definir Numero nQtdTra;
@ Depósito de Saída @
Definir Alfa aDepSai;
@ Endereçamento @
Definir Alfa aEndSai;
@ Variáveis Alfa para o envio de parâmetros na função, pois todos tem que ser Alfa @
Definir Alfa aDatMov;
Definir Alfa aNumDoc;
Definir Alfa aQtdTra;
@ Atribuição dos valores @
nDatMov = DatSis - 2;
nNumDoc = 12782;
aProSai = "100";
aDerSai = "";
nQtdTra = 1;
aDepSai = "DEP01";
aEndSai = "";
@ Conversão dos valores de Numero para Alfa @
IntParaAlfa(nDatMov,aDatMov);
IntParaAlfa(nNumDoc,aNumDoc);
IntParaAlfa(nQtdTra,aQtdTra);
/* Por padrão variáveis numéricas recebem o valor 0 se não for passado valor então é necessário limpar a variável Alfa caso não seja enviado valor para os parâmetros numéricos, para que não seja enviado o 0 para os filtros da tela
*/
Se (nNumDoc = 0)
aNumDoc = "";
/* A ordem de passagem dos parâmetros deve ser seguida conforme segue no exemplo abaixo. Se um dos campos não receber valor, ele não será enviado para a tela quando for aberta.
*/
VParametros = aDatMov + ";" +
aNumDoc + ";" +
aProSai + ";" +
aDerSai + ";" +
aQtdTra + ";" +
aDepSai + ";" +
aEndSai + ";";
AbrirTelaSistema("F210TPA",VParametros,nRet);
Observação
Para maiores informações sobre a função AbrirTelaSistema, verifique o artigo: TECNOLOGIA - Função AbrirTelaSistema - Onde é possível encontrar informações diversas sobre processo a Função AbrirTelaSistema (índice).