|
FORUMS PROFESSIONNELS WINDEV, WEBDEV et WINDEV Mobile |
| | | | | |
Débuté par Jean-Luc MAUCORS, 17 oct. 2014 10:30 - 3 réponses |
| |
| | | |
|
| |
Posté le 17 octobre 2014 - 10:30 |
Bonjour, J’ai développé en WEBDEV 16 un site de saisie de commande relié à une base HF Client/Serveur qui tourne très bien chez le client. Après un mois sans ouvrir WEBDEV, j’ai repris le développement (pour changer de logo), je me suis aperçu de dysfonctionnement sur mon poste de certaines fonctions, liée semble-t-il à la lecture dans la base HF. Perte de contexte ? Est-ce suite à une mise à jour de Window (Windows 7) ou de l’antivirus (ESET) ? Le problème persiste même si je désactive le pare-feu et l’anti-virus. Dans WD160Admin, tous les tests et vérifications sont Ok. j'ai restauré sur mon poste le projet avant modification, et les problèmes sont présents (alors qu'il n'existait pas un mois avant) Sur un autre poste (même configuration Windows et anti-virus) j’ai installé Webdev et le projet, mais j’ai les mêmes dysfonctionnements. Par exemple, pour valider une modification de commande en ligne j'ai l'impression qu'il n'arrive pas à retrouver la base HF (alors la commande déjà existante s'est bien affichée à l'ouverture de la page).
Comment « retrouver » le contexte, si possible sans toucher au code (puisque ça continue à marcher chez le client) ? Merci d’avance |
| |
| |
| | | |
|
| | |
| |
Posté le 17 octobre 2014 - 11:27 |
Bonjour Jean-Luc
pour commencer, il faudrait commencer par nous montrer les messages d'erreur précis. Tes impressions ne vont pas être suffisantes...
Ensuite, nous montrer le code correspondant à l'erreur pourrait aussi être utilise, histoire qu'on sache ce que tu fais et comment.
Cordialement
-- Fabrice Harari Consultant WinDev, WebDev et WinDev Mobile International
NOUVEAU: WXReplication, votre système de réplication open source est disponible sur mon site web !!! WXShowroom.com : Montrez vos projets ! Plus d'information sur http://fabriceharari.com
On 10/17/2014 2:30 AM, Jean-Luc MAUCORS wrote:
Bonjour, J’ai développé en WEBDEV 16 un site de saisie de commande relié à une base HF Client/Serveur qui tourne très bien chez le client. Après un mois sans ouvrir WEBDEV, j’ai repris le développement (pour changer de logo), je me suis aperçu de dysfonctionnement sur mon poste de certaines fonctions, liée semble-t-il à la lecture dans la base HF. Perte de contexte ? Est-ce suite à une mise à jour de Window (Windows 7) ou de l’antivirus (ESET) ? Le problème persiste même si je désactive le pare-feu et l’anti-virus. Dans WD160Admin, tous les tests et vérifications sont Ok. j'ai restauré sur mon poste le projet avant modification, et les problèmes sont présents (alors qu'il n'existait pas un mois avant) Sur un autre poste (même configuration Windows et anti-virus) j’ai installé Webdev et le projet, mais j’ai les mêmes dysfonctionnements. Par exemple, pour valider une modification de commande en ligne j'ai l'impression qu'il n'arrive pas à retrouver la base HF (alors la commande déjà existante s'est bien affichée à l'ouverture de la page).
Comment « retrouver » le contexte, si possible sans toucher au code (puisque ça continue à marcher chez le client) ? Merci d’avance |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 2 messages |
|
Posté le 20 octobre 2014 - 10:31 |
Bonjour Fabrice,
Lors de l'impression/affichage d'un document PDF ou XLS), il n’y a pas toujours de message d’erreur : lorsque le code s’exécute, le « sablier » s’affiche un moment, mais rien ne se passe, et on récupère la main. Ceci est valable quelques soit le document à imprimer (bon de commande, mais aussi statistiques, fiche d’un client, lignes d’écritures comptables etc…)
En insistant j’arrive à avoir un de ces messages d’erreur : *********************************************** Le contexte auquel cette requête fait référence (7864) est invalide (votre session s'est terminée pour une raison inconnue). (0059, ERR_BAD_CONTEXT_FOUND)
OU *********************************************** Le contexte auquel cette requête fait référence (-2) est inconnu.
Le serveur a peut-être été redémarré depuis votre dernière requête. (0054, ERR_BAD_CONTEXT_INVALID) ***********************************************
Je n'ai pas changé une ligne de code (juste changer des logos), (et sur des projets de test j'ai les mêmes problèmes)
Cependant voici le code concernant l’impression d’une commande fournisseur : Merci de ton aide. Jean-Luc
*************************************************************************************************************** *************************************************************************************************************** Voici le code du lien Imprimer ; (code serveur), pas de code navigateur avant (je l’ai neutralisé pour les tests)
SI BTN_ValiderCDE..Visible = Vrai ALORS ExécuteTraitement("CELL_CORPS.BTN_ValiderCDE",trtClic) FIN
iDestination(iPDFGénérique,ComplèteRep(gsRep_Temporaire) + "BCDE_" + DonneGUID() + ".PDF")
SI INT_Anglais = Vrai ALORS iInitRequêteEtat(ETAT_BCDE_GB,H1.IDZHF_HA_Entete) iImprimeEtat(ETAT_BCDE_GB,H1.IDZHF_HA_Entete) FichierAffiche(iDernierFichier(),"application/pdf","BCDE_GB_" + H1.DO_Piece + ".PDF") SINON
iInitRequêteEtat(ETAT_BCDE_FR,H1.IDZHF_HA_Entete)
iImprimeEtat(ETAT_BCDE_FR,H1.IDZHF_HA_Entete)
FichierAffiche(iDernierFichier(),"application/pdf","BCDE_FR_" + H1.DO_Piece + ".PDF") FIN
fSupprime(iDernierFichier())
************************************************************************** Code du lien BTN_ValiderCDE **************************************************************************
PageVersFichier(PAGE_CDE_FICHE,ZHF_HA_Entete)
MAJ_enr_entete() HModifie(ZHF_HA_Entete)
GR_nonmodif..Visible = Vrai LIB_Lignes = "Lignes"
SI Enregistrer_lignes() = -1 ALORS
FIN
SI gsProfilage_Compte[[5]] = 1 ET H1.CDE_Validee = 0 ALORS BTN_ValiderBrouillon..Visible = Vrai SI H1.Brouillon = Faux ALORS BTN_ValiderBrouillon..Libellé = "Rétablir le brouillon" FIN FIN
RETOUR
CAS ERREUR: Erreur(ErreurInfo()) ************************************************************************** **************************************************************************
Procedure MAJ_enr_entete()
SI LIBF_NomFournisseur = "" ALORS Info("Vous devez sélectionner un fournisseur.") RETOUR FIN SI LIBF_NomFournisseur <> "" ALORS H1.Sage_Tiers_inexistant = Faux
SI Majuscule(Gauche(COMBO_DEVISE,3)) = "EUR" ALORS H1.Montant_cde_HT = LIBF_MTT_HT H1.Devise_HT =0 SINON H1.Devise_HT = LIBF_MTT_HT H1.Montant_cde_HT = LIBF_MTT_HT FIN
H1.Cli_Contrat = gsClient_contrat H1.Statut = 0 H1.DO_Date = DateSys() H1.TypeDoc = 0
SI (H1.ADR_LIVRAiSON1 + H1.ADR_LIVRAiSON2 + H1.ADR_LIVRAiSON3 + H1.ADR_LIVRAiSON4 = "") ET LIBF_labo <>"" ALORS HLitRecherche(ZHF_LABOS,Code_Labo,LIBF_labo,hIdentique) SI HTrouve() ALORS H1.ADR_LIVRAiSON1 = SansEspace(LB.CT_Adresse) H1.ADR_LIVRAiSON2 = SansEspace(LB.CT_Complement) H1.ADR_LIVRAiSON3 = SansEspace(LB.CT_CP_Ville + " " + LB.CT_CP_Ville) H1.ADR_LIVRAiSON4 = SansEspace(LB.CT_Adresse3) FIN
FIN
SI PAS DateValide(SAI_DateLivraison) ALORS SAI_DateLivraison = SAI_Date SI SAI_DateLivraison < SAI_Date ALORS SAI_DateLivraison = SAI_Date ************************************************************************** **************************************************************************
Procedure Enregistrer_lignes() MaREQ_ILest une Source de Données sCHM est une chaîne nId_cde, iest un entier
nId_cde = H1.IDZHF_HA_Entete SI nId_cde = 0 ALORS RENVOYER -1
sCHM = "UPDATE ZHF_HA_LIGNES SET Statut = 1 WHERE IDZHF_HA_Entete = " + nId_cde SI PAS HExécuteRequêteSQL(MaREQ_IL,hRequêteInterruptible,sCHM) ALORS Info("Erreur : " + ErreurInfo()) RENVOYER -1 FIN HAnnuleDéclaration(MaREQ_IL)
POUR i = 1 _A_ TableOccurrence(TABLE_LignesHA) COL_DL_LIGNE[i] = i * 10 FIN
POUR i = 1 _A_ TableOccurrence(TABLE_LignesHA) SI COL_Id_ligne[i] = 0 ALORS
HRAZ(ZHF_HA_LIGNES) H2.IDZHF_HA_Entete = nId_cde H2.AR_Ref = COL_Reference[i] H2.Ref_ArticleWEB= Gauche(COL_REF_WEB[i],25) H2.DL_Design= Gauche(COL_Libellé[i],50) H2.DL_Ligne= COL_DL_LIGNE[i] H2.DL_PrixUnitaire= COL_Prix_unitaire_net[i] H2.DL_Qte= COL_Quantité[i] H2.DL_No= 0
SI Majuscule(Gauche(COMBO_DEVISE,3)) = "EUR" ALORS H2.Montant_HT= COL_Montant_HT[i] H2.Devise_HT= 0 SINON H2.Montant_HT= COL_Montant_HT[i] H2.Devise_HT= COL_Montant_HT[i] FIN
H2.SaisieWEB= Vrai H2.Statut = 0 HAjoute(ZHF_HA_LIGNES) SINON
HLitRecherche(ZHF_HA_LIGNES,IDZHF_HA_LIGNES,COL_Id_ligne[i],hIdentique) SI HTrouve() ALORS
SI H2.DL_Design<> COL_Libellé[i] ET COL_Reference..Visible = Faux ALORS H2.AR_Ref = "" SINON H2.AR_Ref = COL_Reference[i] FIN H2.DL_Design= Gauche(COL_Libellé[i],50) H2.Ref_ArticleWEB= Gauche(COL_REF_WEB[i],25)
H2.DL_Ligne= COL_DL_LIGNE[i] H2.DL_PrixUnitaire= COL_Prix_unitaire_net[i] H2.DL_Qte= COL_Quantité[i] H2.SaisieWEB= Vrai
SI Majuscule(Gauche(COMBO_DEVISE,3)) = "EUR" ALORS H2.Montant_HT= COL_Montant_HT[i] H2.Devise_HT= 0 SINON H2.Montant_HT= COL_Montant_HT[i] H2.Devise_HT= COL_Montant_HT[i] FIN
H2.Statut = 0 HModifie(ZHF_HA_LIGNES) SINON Info("Erreur d'enregistrement : " + HErreur()) RENVOYER -1 FIN FIN
SI ErreurDétectée() ALORS Info("Erreur : " + ErreurInfo()) RENVOYER -1 FIN
FIN
sCHM = "DELETE FROM ZHF_HA_LIGNES WHERE IDZHF_HA_Entete = " + nId_cde + " AND Statut = 1" SI PAS HExécuteRequêteSQL(MaREQ_IL,hRequêteInterruptible,sCHM) ALORS Info("Erreur : " + ErreurInfo()) RENVOYER -1 FIN HAnnuleDéclaration(MaREQ_IL)
RENVOYER 0 |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 2 messages |
|
Posté le 24 octobre 2014 - 08:13 |
Résolu.
Bonjour, la perte de contexte était due à un répertoire inaccessible dans lequel était généré les PDF avant affichage.
Merci. |
| |
| |
| | | |
|
| | | | |
| | |
| | |
| |
|
|
|