GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV 25
→
Alterando um registro com HModify
Alterando um registro com HModify
Iniciado por MarcosRoberto, mar., 02 2015 8:58 PM - 5 respostas
Conecte-se…
MarcosRoberto
#1
Membro registado
11 mensagems
Popularité : +2 (2 votes)
Publicado em março, 02 2015 - 8:58 PM
Caros ao tentar alterar um registro com HModify é apresentado a seguinte mensagem:
http://screencast.com/t/2kRpHepUcdJ
A situação é que tenho no banco o no. de serie e o código IMEI q não podem ser repetidos, mas preciso alterar o registro e isso n estou conseguindo fazer pela mensagem de bloqueio acima.
Marcos Roberto.
Denunciar
0
0
Leofaz
#2
Publicado em março, 04 2015 - 5:35 AM
Eu tive um problemas desse no inicio e usei a seguinte forma
HReadSeekFirst(T_CLIENTE,CODIGO,EDT_COD_CLIENTE)
ScreenToFile()
IF HFound() = False THEN
// INFO(EDT_COD_CLIENTE)
HAdd(T_CLIENTE)
//Info("Cadastrado com Sucesso")
ELSE
HModify(T_CLIENTE)
//Info("Modificado com Sucesso")
END
//SetFocus(EDT_COD_CLIENTE)
Denunciar
0
0
Leofaz
#3
Membro registado
3 mensagems
Publicado em março, 04 2015 - 5:47 AM
Eu tive um problema desse. Usei dessa forma,
HReadSeekFirst(T_CLIENTE,CODIGO,EDT_COD_CLIENTE)
ScreenToFile()
IF HFound() = False THEN
// INFO(EDT_COD_CLIENTE)
HAdd(T_CLIENTE)
//Info("Cadastrado com Sucesso")
ELSE
HModify(T_CLIENTE)
//Info("Modificado com Sucesso")
END
//SetFocus(EDT_COD_CLIENTE)
Denunciar
0
0
MarcosRoberto
#4
Membro registado
11 mensagems
Popularité : +2 (2 votes)
Publicado em março, 04 2015 - 4:05 PM
Caro, obrigado por responder. Mas observe abaixo q o meu codigo n tem a opcao de HADD(), portanto penso eu n deveria dar erro de duplicidade.
OK is
boolean
IF
EDT_
CNPJCPF
=
""
THEN
Info
(
"Não é possivel alterar sem o CNPJ/CPF"
)
ReturnToCapture
(
EDT_
CNPJCPF
)
END
IF
EDT_
Nome
=
""
THEN
Info
(
"Não é possivel alterar sem o Fantasia/RAZAO"
)
ReturnToCapture
(
EDT_
Nome
)
END
IF
EDT_
Reset
=
""
THEN
Info
(
"Não é possivel alterar sem a data do reset"
)
ReturnToCapture
(
EDT_
Reset
)
END
OK
=
HReadSeekFirst
(
cadastro_dbf
,
cnpj
,
EDT_
CNPJCPF
,
hKeepFilter
)
IF
HFound
(
cadastro_dbf
) =
False
Info
(
"CNPJ/CPF não foi encontrado no cadastro. Não é possivel alterar o registro"
)
ReturnToCapture
(
EDT_
CNPJCPF
)
END
HTransactionStart
(
ConnSuperv
)
cadastro_dbf.cnpj
=
EDT_
CNPJCPF
cadastro_dbf.fantasia
=
EDT_
Nome
cadastro_dbf.reset
=
EDT_
Reset
cadastro_dbf.mensagem
=
EDT_
Mensagem
OK
=
HModify
(
cadastro_dbf
)
IF
OK
=
False
THEN
HTransactionCancel
(
ConnSuperv
)
Info
(
"Ocorreu um erro ao tentar gravar os dados"
)
ReturnToCapture
(
EDT_
CNPJCPF
)
ELSE
ToastDisplay
(
"Registro alterado com sucesso"
,
toastShort
,
vaMiddle
,
haCenter
)
HTransactionEnd
(
ConnSuperv
)
Close
(
Alterar_Usuario
)
END
Pra mim ainda leigo na linguagem fica sem sentido quando se diz q n serah alterada o registro por estah em duplicidade, sendo que necessito apenas de uma alteracao. Na vdd no teste q fiz eu apenas alterei outro o campo.
Ainda esto sem entender.
Denunciar
0
0
Leofaz
#5
Membro registado
3 mensagems
Publicado em março, 04 2015 - 6:31 PM
Opa Marcos, caso queira me adicione no skype para que eu possa entender melhor o seu problema...
contato.leofaz
Denunciar
0
0
Leofaz
#6
Membro registado
3 mensagems
Publicado em março, 04 2015 - 6:40 PM
Adicione um breakpoin em cada linha do seu codigo para verificar o que ele esta fazendo....
Denunciar
0
0
→ Voltar para WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto