Pasar variable de JS a PRG codificado en una View
Publicado: Mar Feb 07, 2023 11:05 pm
Hola buenas tardes
Estoy trabajando un sistema con esta maravilla de ModHarbour2 y TWEB y todo va bien hasta esta pequeña traba que encontre:
Tengo una vista(vista_upd.view) con parte del codigo asi:
DIV o ID 'bar' CLASS 'btn-group'
BUTTON LABEL ' Editar' ICON '<i class="far fa-edit" aria-hidden="true"></i>' ACTION 'editRow()' CLASS 'btn-secondary mybtnbar' GRID 0 OF o
ENDDIV o
La funcion editRow en JS hace una llamada a otro prg con :
MsgServer('/exdnb/secdat_upd.prg',hParam, dunPost_edt);
el prg secdat_upd procesa data desde sql y lo devuleve en la matriz hDataString:
// Informacion de la tabla String
oString := StringModel():New()
hDataString := oString:StrSeccion(hParam)
AP_SetContentType( "application/json" )
hResponse := { 'hParam' => hParam, 'hDataString' => hDataString}
?? hb_jsonEncode( hResponse )
Mi pregunta es ¿como hago que esta matriz(hDataString) pueda ser conocida y visualizada desde el prg que codifique en la View inicial(vista_upd.view)?
Espero se me haya entendido, muchas gracias
Estoy trabajando un sistema con esta maravilla de ModHarbour2 y TWEB y todo va bien hasta esta pequeña traba que encontre:
Tengo una vista(vista_upd.view) con parte del codigo asi:
DIV o ID 'bar' CLASS 'btn-group'
BUTTON LABEL ' Editar' ICON '<i class="far fa-edit" aria-hidden="true"></i>' ACTION 'editRow()' CLASS 'btn-secondary mybtnbar' GRID 0 OF o
ENDDIV o
La funcion editRow en JS hace una llamada a otro prg con :
MsgServer('/exdnb/secdat_upd.prg',hParam, dunPost_edt);
el prg secdat_upd procesa data desde sql y lo devuleve en la matriz hDataString:
// Informacion de la tabla String
oString := StringModel():New()
hDataString := oString:StrSeccion(hParam)
AP_SetContentType( "application/json" )
hResponse := { 'hParam' => hParam, 'hDataString' => hDataString}
?? hb_jsonEncode( hResponse )
Mi pregunta es ¿como hago que esta matriz(hDataString) pueda ser conocida y visualizada desde el prg que codifique en la View inicial(vista_upd.view)?
Espero se me haya entendido, muchas gracias