Error de acceso a datos enviados a servidor

101 views
Skip to first unread message

luis vasquez

unread,
Oct 22, 2020, 9:04:10 PM10/22/20
to ModHarbour
Hola estimados, buenas noches.
estoy haciendo una prueba con tweb sólo pasando, capturando y devolviendo datos entre un archivo y otro pero me aparece un error de acceso a array en el archivo que vendría a ser el modelo en MVC.
Será problema de la versión de modharbour ya que el ejemplo tutor13.prg de tweb también me arroja el mismo error.
Agradezco de antemano su ayuda.
Atte.

Probado en Navegadores: Chrome y Edge
Servidor web: xampp version 7.2.31
Version TWeb 1.0
modharbour version Harbour 3.2.0dev (r2004201301)
windows 10 64 bits.

Error informado por el sistema
Error: Argument error
operation: array access
[ 1] = U nil
[ 2] = C cuenta
called from: pcode.hrb, MAIN, line: 4
called from: HB_HRBDO, line: 0
called from: ..\apache.prg, EXECUTE, line: 134

Source:
0002: function main()
0003:     local aDatos    := GetMsgServer()
0004 =>    AP_RPuts( "<br>",alert( aDatos[ "cuenta" ] ) )
0005:
0006:     AP_SetContentType( "application/json" )  

Archivo 1
controles donde ingreso los datos
ROW o
GET ID 'getcodigo' VALUE '' GRID 4 LABEL 'Codigo' OF o
GET ID 'getnombre' VALUE '' GRID 6 LABEL 'Nombre' OF o
END o 
Script donde recolecto los datos y los envío al modelo
function Salvar() {
  var oParam = new Object()
  oParam[ 'cuenta'    ] = $('#getcodigo').val()
  oParam[ 'nombre'  ] = $('#getnombre').val()
  MsgServer( 'browse1srv.prg', oParam, PostView )
}
function PostView(dat) {
  MsgInfo( dat )
}

Archivo 2
Donde capturo los datos y los devuelvo.

function main()
local aDatos := GetMsgServer() 

? alert( aDatos[ 'cuenta' ] )
AP_SetContentType( "application/json" )
?? hb_jsonEncode( aDatos )
 
return nil

Charly

unread,
Oct 23, 2020, 1:46:11 AM10/23/20
to ModHarbour
Hola,

Prueba en el server:

 function main()
    local aDatos    := GetMsgServer()  
    ? aDatos

a ver que te devuelve

Saludos.
C.

Charly

unread,
Oct 23, 2020, 1:49:46 AM10/23/20
to ModHarbour
q funcion es alert() ?

luis vasquez

unread,
Oct 25, 2020, 9:35:17 PM10/25/20
to ModHarbour
Estimado Charly,
hice el cambio del alert por lo sugerido:

? aDatos

y me muestra lo siguiente:

 System Error

NIL null

Como te contaba anteriormente,  el tutor13.prg tampoco me funciona y muestra en el console.log lo siguiente:

Error: Argument error<br>operation: array access<br>[   1] = U   nil<br>[   2] = C   myid<br>called from: pcode.hrb, MAIN, line: 9<br>called from: HB_HRBDO, line: 0<br>called from: ..\apache.prg, EXECUTE, line: 134<br><br>Source:<br>
0007: &nbsp;&nbsp;&nbsp;&nbsp;local&nbsp;cPhone&nbsp;&nbsp;&nbsp;&nbsp;:=&nbsp;&quot;&quot;<br>
0008: &nbsp;&nbsp;&nbsp;&nbsp;local&nbsp;lSuccess&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;:=&nbsp;.F.<br>
0009 =>&nbsp;&nbsp;&nbsp;&nbsp;local&nbsp;cValor&nbsp;&nbsp;&nbsp;&nbsp;:=&nbsp;uValues[&quot;myid&quot;]<br>
0010: <br>
0011: <br>

El resto de los demos funcionan bien excepto el 13.
Que podrà ser?.
Quedo atento a sus comentarios.
Saludos cordiales,

Ricardo Arraes

unread,
Oct 26, 2020, 3:41:49 PM10/26/20
to ModHarbour
Hola Luis, me parece que estás dando este mensaje porque tu función GetMsgServer está devolviendo un NIL. así que cuando intentas hacer algo con el array aDatos, da un error. ¿Qué está haciendo su GetMsgServer?
Reply all
Reply to author
Forward
0 new messages