

DO crear_bdd.prg

DO subir_bdd.prg


cResp = 'fallo'

*MESSAGEBOX(oJs.cParam)
oJson.setbdd_remote()

IF FILE(oJson._cBddName)
	IF oJson.ftpsend(oJson._cFileName+'.7z',oJson._cBddName)
		cResp = 'ok'
	ENDIF
	
ENDIF

oApp.runLink('json/set_respuesta.php?id='+oJs.cIdCmd+'&resp='+cResp)