Histórico da Página

...

02. SITUAÇÃO/REQUISITO

1- Ao alterar ou consultar cadastro do motorista na rotina 929 deverá ser utilizado o serviço de gravação de logs para que seja gerado os logs da manipulação dos dados da persona Motorista. 

...

Para atender a Lei Geral de Proteção de Dados Pessoais as rotinas que trabalham com manipulações de dados (na impressão de mapa de separação e/ou etiqueta do pedido), deverão registrar os processos vinculados ao cliente que foram manipulados por essas rotinas (pedidos e carregamentos).

03. SOLUÇÃO

...

Foram alteradas as rotinas 929,931, 901, 936, 960, 902, 903, 916, 938, 994 ,953, 944

...

, 946, 998

...

• Serviço: Winthor.Framework.LogPessoaNatural.Gravar(var  RFWM_LogPessoaNatural): Boolean

• Versão do pacote de serviços:  29.5.0.1

• Criar Dependência da tabela: PCLOGDADOSPESSOAS (v29.4.4.3 da rotina 560)

O parâmetro de entrada * do tipo *RFWM_LogPessoaNatural requer*:*

• dataRequisicao: Este parâmetro atende o PDV, que poderá solicitar num dado momento e ser registrado em outro momento. Gravaremos tanto a data de solicitação quanto a data de registro.
• descricao: Descrição do evento. Ex: "Edição de cadastro", "Inclusão do cadastro", "Emissão de NF para o cliente", etc.
• codigoCadastro: Código chave do registro na tabela. Ex: CODCLI para PCCLIENT, CODFORNEC para PCFORNEC, etc.
• tabela: Tabela pela qual a pessoa está registrada (PCCLIENT, PCFORNEC, PCEMPR, PCUSUARI, etc). Se for necessário mais tabelas, favor nos informar.
• procedure adicionarValorAnterior: Pode ser utilizado para descrever o valor anterior de um campo (pode receber n inclusões, passando chave e valor como parametro).
• procedure adicionarValorAtual: Pode ser utilizado para descrever o valor novo de um campo (pode receber n inclusões, passando chave e valor como parametro).  
• procedure carregarValorAnteriorDataSet: Pode ser utilizado para carregar os valores anteriores dos campos do DataSet inteiro (este método substitui o metodo  "adicionarValorAnterior").
• procedure carregarValorAtualDataSet:  Pode ser utilizado para carregar valores atuais dos campos do DataSet inteiro (este método substitui o metodo  "adicionarValorAtual").

 
Para facilitar, ainda criaremos o método abaixo:

• Poder carregar todos os campos do DataSet de uma vez só e interpretar a mudança nos campos utilizando os recursos OldValue e Value dos TFields.

O serviço terá retorno como Boolean indicando o sucesso ou não da execução. Caso o retorno seja falso, será retornado a mensagem de erro no parametro RFWM_LogPessoaNatural.Retorno.Msg.

]Sugestão técnica:

  Criar função nas bibliotecas do wms para receber a Query (TOraQuery) ou DataSet da pesquisa que irá realizar as impressões e "popular" uma TStringList com o(s) código(s) do(s) cliente(s) a serem gravados e depois gerar um loop no objeto para chamar o serviço acima.

03. SOLUÇÃO

...

e 972 para que, cada vez que for impressa uma etiqueta ou gerado um mapa de separação por exemplo, este processo seja gravado em uma tabela do banco de dados (PCLOGDADOSPESSOAS) com a descrição do serviço executado, a rotina, data e matrícula do usuário.
Exemplo: Para a rotina 931, assim que o usuário emitir o mapa será registrado no banco de dados "Emissão do mapa de separação por pedido nº xxxxxx".

04. DEMAIS INFORMAÇÕES

...