cWsDataDictionary

Pacote

A classe cWsDataDictionary está definida no pacote cWsDataDictionary.pkg.

Hierarquia

A classe cWsDataDictionary é uma subclasse da classe DataDictionary do DataFlex e herda todas as propriedades, eventos e métodos existentes nesta classe.

Para que serve

A classe cWsDataDictionary foi especializada para suportar diversos recursos adicionais como a geração automática de Log de gravações e exclusões de registros e configuração de permissões do usuário.

Novas propriedades foram criadas para controlar estes recursos de forma personalizada.

Observações

Por padrão, todos os DDs que você criar em sua Workspace utilizarão esta classe.
Visto que na maior parte dos casos o primeiro índice da tabela é o índice que permite identificar unicamente os registros, a classe cWsDataDictionary sempre irá gravar no Log de alteração e criação o valor de todos os campos que fazem parte do primeiro índice, mesmo que eles não tenham sido alterados.
Grande parte dos recursos adicionais foram tratados dentro de eventos e métodos originais da classe cWsDataDictionary. Portanto, para que estes recursos funcionem corretamente, você deve certificar-se de que executou o Forward ao redefinir qualquer método ou evento em seus dicionários de dados.

Propriedades

pbAutoDecrementUltimoID

Tipo

Boolean

Valor padrão

False

Para que serve

Se esta propriedade for True, quando um registro for excluído na tabela, o valor Id_Tabela da tabela TABELAID será decrementado. Só faz sentido configurar esta propriedade como True se a propriedade pbAutoGeracaoID também estiver configurada como True.

pbAutoGeracaoID

Tipo

Boolean

Valor padrão

False

Para que serve

Se esta propriedade for True, o valor do primeiro campo da tabela será gerado automaticamente usando a tabela TABELAID. Esta propriedade é um substituto bastante prático para o recurso de auto-incremento usando uma tabela de sistema.

Esta propriedade é usada em grande parte dos dicionários de dados do próprio MenuFlex. Consulte estes arquivos para mais detalhes.

pbLogaNomeObjetoCurto

Tipo

Boolean

Valor padrão

False

Para que serve

Se esta propriedade for False, o registro do Log irá guardar o nome completo do objeto que executou a operação de gravação ou exclusão. Se for True, irá guardar somente nome do objeto pai do DDO que executou a ação (que normalmente é o nome da dbView ou do BusinessProcess).

piLogEventos

Tipo

Integer

Valor padrão

C_iLogaTudo

Para que serve

Indica quais operações deverão ser logadas por este dicionário de dados. As opções são:

C_iSemLog (0): nenhum tipo de log será feito.
C_iLogaInclusao (1): fará log somente de inclusões de registros.
C_iLogaAlteracao (2): fará log somente de alterações de registros.
C_iLogaInclusaoAlteracao (3): fará log de inclusões e alterações de registros.
C_iLogaExclusao (4): fará log somente de exclusões de registros.
C_iLogaInclusaoExclusao (5): fará log de inclusões e exclusões de registros.
C_iLogaAlteracaoExclusao (6): fará log de alterações e exclusões de registros.
C_iLogaTudo (7): fará log de todas as operações.

psErro4140

Tipo

String

Valor padrão

“Exclusão não permitida. Existem registros relacionados!”

Para que serve

Guarda o texto da mensagem de erro 4140 que deverá ser exibida em lugar da mensagem padrão do DataFlex. Exemplo: Set psErro4140 to “Você não pode excluir este cliente, pois já existem registros (pedidos, faturas, etc) associados a ele!”

Pode-se configurar esta propriedade dentro da classe criada no arquivo .DD ou dentro do DDO da view.

Ao escolher a primeira opção (dentro da classe no arquivo .DD), deve-se fazê-lo dentro da procedure Construct_Object. Exemplo:

{OverrideProperty=psMsg4140 InitialValue="Este cliente possui pedidos e não pode ser excluído!"}
Procedure Construct_Object
    Forward Send Construct_Object
    Set psMsg4140 To "Este cliente possui pedidos e não pode ser excluído!"
End_Procedure