|
Inicio → WINDEV 25 → WX - Procedure com indirection para Selecionar registro de uma grid table ou looper |
WX - Procedure com indirection para Selecionar registro de uma grid table ou looper |
Iniciado por BOLLER, 24,jun. 2019 20:08 - 2 respuestas |
| |
| | | |
|
| |
Miembro registrado 3.659 mensajes Popularité : +175 (223 votes) |
|
Publicado el 24,junio 2019 - 20:08 |
Procedure UI_SelectRegGrid(TableName is string, ColumnName is string)
gnidtable is 8-bytes int
nx is int = 0
isTable is int = PositionOccurrence(Upper(TableName),"TABLE",firstRank,FromBeginning)
isLooper is int = PositionOccurrence(Upper(TableName),"LOOPER",firstRank,FromBeginning)
IF isTable > 0 AND isLooper = 0 nx = TableInfoXY({TableName,indControl},tiLineNumber,MouseXPos(),MouseYPos()) ELSE IF isLooper > 0 nx = LooperInfoXY({TableName,indControl},tiLineNumber,MouseXPos(),MouseYPos()) ELSE nx = TableInfoXY({TableName,indControl},tiLineNumber,MouseXPos(),MouseYPos()) END
IF nx > 0 AND TableName <> "" AND ColumnName <> "" gnidtable = {TableName,indControl}[nx]+"."+ColumnName ELSE gnidtable = 0 END
RESULT gnidtable
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 99949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Miembro registrado 3.659 mensajes Popularité : +175 (223 votes) |
|
Publicado el 24,junio 2019 - 20:10 |
Como usar:
Na table grid do teu projeto coloque no ponto de embed codigo:
gnid = UI_SelectRegGrid("TABLEGRID_F009_APS_PRODUTOS_UNIDADES","COL_F009_PRODUTOS_UNIDADES_ID")
gnid terá o id da chave primária da tabela ou do looper
Isso reduz teu codigo em todo o seu sistema para apenas um código global
Bons estudos!!!
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 99949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Miembro registrado 3.659 mensajes Popularité : +175 (223 votes) |
|
Publicado el 16,abril 2024 - 00:40 |
Prezados
Para pegar um registro id de um browser table grid tem 2 formas:
Crie uma var global da janela: GNID is 8-byte int = 0
A) Em Code evento SELECT ROW
GNID = TableNameGrid.COL_myID
Em Code evento SELECT ROW
Nx is int = Tableinfoxy(TableNameGrid, tiLineNumber, MouseXPos(), MouseYPos())
If nx > 0
GNID = TableNameGrid[nx].COL_myID
End
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 99949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | | | |
| | |
|