strMonpdf est une chaîne ="http://www.matosinformatica.com.br/DownloadAtualiza%C3%A7%C3%B5es/listaserv.pdf"
mostra_pdf("HTML1",strMonpdf)

Procedure mostra_pdf(s_nome_html is string,sNome_pdf is string)
modeSVG is boolean=True
fDelete(CompleteDir(fRepExe())+"TMPPDF_*.pdf") //fSupprime(ComplèteRep(fRepExe())+"TMPPDF_*.pdf")
nomfic is string="TMPPDF_"+DateSys()+HeureSys()+sNome_pdf+".pdf"
tmpPDf is string=CompleteDir(fRepExe())+""+nomfic // est une chaîne
SI EnModeAndroid() ET PAS EnModeTest ALORS
//est-ce que les ressources de gestion pdf sont bien présentes ?
SI PAS fFichierExiste(ComplèteRep(fRepExe())+"viewersvg.html") OU PAS fFichierExiste(ComplèteRep(fRepExe())+"viewersvg.js") ALORS
fExtraitRessource("WD_pdfjs2.zip",fRepExe())
SI fFichierExiste(ComplèteRep(fRepExe())+"WD_pdfjs2.zip") ALORS
//decompactage de la ressource
myarch est un entier=zipOuvre("archpdf",ComplèteRep(fRepExe())+"WD_pdfjs2.zip")
SI myarch=0 ALORS
zipExtraitTout("archpdf",ComplèteRep(fRepExe()))
zipFerme("archpdf")
FIN
FIN
FIN
SI PAS fFichierExiste(ComplèteRep(fRepExe())+"viewersvg.html") OU PAS fFichierExiste(ComplèteRep(fRepExe())+"viewersvg.js") ALORS
//aucun display possible, les ressources sont absentes.
//retour
FIN
activerjavascript(s_nome_html)
FIN
SI Gauche(sNome_pdf,4)="http" ALORS
//1 recuperer le fichier en local avant ouverture
SI HTTPRequête(sNome_pdf) ALORS
fSauveTexte(tmpPDf,HTTPDonneRésultat(httpRésultat))
FIN
SINON
fCopieFichier(sNome_pdf,tmpPDf)
FIN

bLocalDebug est un booléen=Vrai
SI EnModeTest() ALORS
//{nomchamp,indchamp}=strMonpdf
//test avec localhost
//si localDebug alors
//fCopieFichier(ComplèteRep(fRepExe())+"web\viewersvg.html","c:\wamp\www\pdfjstest\web\viewersvg.html")
//fCopieFichier(ComplèteRep(fRepExe())+"web\viewersvg.js","c:\wamp\www\pdfjstest\web\viewersvg.js")
//nomfic est une chaine="test.pdf"+datesys+heuresys
//
//fCopieFichier(tmpPDf,"c:\wamp\www\pdfjstest\web\"+nomfic)
//
//testurl est une chaine="http://localhost/pdfjstest/"+"web/viewersvg.html?url="+"./"+nomfic+"&ti="+datesys+heuresys
// //{nomchamp,indChamp}=testurl
// LanceAppliAssociée(testurl)
{s_nome_html,indChamp}=sNome_pdf
SINON

myurl est une chaîne
SI modeSVG ALORS
myurl="file://"+ComplèteRep(fRepExe)+"viewersvg.html?url="+"./"+nomfic+"&ti="+DateSys+HeureSys
SINON
myurl="file://"+ComplèteRep(fRepExe)+"viewer.html?url="+"./"+nomfic+"&ti="+DateSys+HeureSys
FIN

{s_nome_html,indChamp}=myurl
FIN

import android.webkit.WebView;
PUBLIC static void activerjavascript(string nomchamp)
{
WebView mywebview=(WebView) getView(nomchamp);
mywebview.getSettings().setJavaScriptEnabled(True);
}

//Click BTn_LerPdf
strMonpdf est une chaîne ="http://www.amarildomatos.com.br/clientes_arquivos/Contrato.pdf"
mostra_pdf("HTML1",strMonpdf,intModeSVG)
//aqui foi acrescentado

Procedure mostra_pdf(s_nome_html is string,sNome_pdf is string,modeSVG=Vrai)
// recoloquei aqui