USING com.totvs.framework.sec.ProtectedData.
FIND FIRST tabela_negocio EXCLUSIVE-LOCK:
ASSIGN tabela_negocio.nom_cliente = ProtectedData:DefaultAnonymousCharacter
tabela_negocio.cod_rg = ProtectedData:DefaultAnonymousNumber
tabela_negocio.dat_nascimento = ProtectedData:DefaultAnonymousDate.MESSAGE STRING(ProtectedData:DefaultAnonymousCharacter)
VIEW-AS ALERT-BOX INFO BUTTONS OK.
MESSAGE STRING(ProtectedData:DefaultAnonymousNumber)
VIEW-AS ALERT-BOX INFO BUTTONS OK.
MESSAGE STRING(ProtectedData:DefaultAnonymousDate)
VIEW-AS ALERT-BOX INFO BUTTONS OK.
|