Information Technology Tips & Tricks
+32 475 23 19 91

Archives par catégorie : Divers

A propos de ce site

Posté le Par Publié dans Divers

Ce site reprend différentes procédures ou routines récurrentes lors des développements en Windev. Elle est le résultat du travail de nombreux informaticiens notamment les membres du forum des développeurs windev-forum@listes.arvalis.net que je remercie ici tout particulièrement. N’hésitez pas à nous écrire afin d’apporter votre contribution ou nous proposer des améliorations.

Exporter une requête en Excel

Posté le Par Publié dans Divers 
Procedure RequêteVersExcel(sdMaRequete est une Source de Données,sCheminFichierExcel est une chaîne)
xlsExport est un xlsDocument
xlsAjouteFeuille(xlsExport,"Feuille 1")
xlsFeuilleEnCours(xlsExport,1)
sRubriques est une chaîne = HListeRubrique(sdMaRequete)
POUR TOUTE CHAINE sRub,nPos,nColonne DE sRubriques SEPAREE PAR RC
xlsExport[nColonne,1] = sRub
FIN
nLigne est un entier = 2
POUR TOUTE sdMaRequete
POUR TOUTE CHAINE sRub,nPos,nColonne DE sRubriques SEPAREE PAR RC
xlsExport[nLigne,nColonne] = {sdMaRequete..Nom+"."+sRub,indrubrique}
FIN
nLigne ++
FIN
xlsSauve(xlsExport,sCheminFichierExcel

 

Google Documents est à votre écoute

Posté le Par Publié dans Chrome, Divers

Le traitement de texte Google Doc en ligne bénéficie maintenant d’un système de reconnaissance vocale. Dictez votre texte au lieu de le taper au clavier. Le système développé par Google est très fiable. La reconnaissance est rapide et pratiquement sans faute.

Vous pouvez dicter votre texte en Français. Quarante langues sont supportées. Ce qui impressionne ici c’est l’efficacité de l’outil sur de longues phrases. Difficile de prendre le système en défaut.

 

Dictée vocale-1

Dictée vocale-2

 

Pour utiliser cette nouvelle fonction de Google Docs, il suffit de créer un nouveau document puis dans le menu Outils sélectionner « Saisie vocale ». Un micro va s’afficher à droite de votre fenêtre. En cliquant dessus, celui-ci passe au rouge et vous pouvez commencer la dictée.

Modifier un champ en haut de rupture

Posté le Par Publié dans Divers, Windev

Pour mettre à jour un champ figurant dans le haut de rupture d’une table mémoire

TableTrie(TABLE,"+COL_Prestataire","+COL_Client")
TableAffiche(TABLE,taCourantBandeau)
POUR TOUTE LIGNE nLigne DE TABLE
   nIndice = TableIndiceRupture(RUPT_HautRupture1,nLigne)
   TABLE[nIndice].SAI_Prestataire = TABLE.COL_Prestataire[nLigne]
FIN
TableAffiche(TABLE,taCourantBandeau)

							

    		
  	
			

    	
				        	
	

  	

			
									
							
			
									
							


	
	

		
		
					
						Calendrier annuel					
		
			

				Posté le 
							
						 Par 
								
							
										
				Publié dans Divers			
				   
						

			

  
	  	    	

    						
Crédit : neptune@merdunord.fr





POUR x = 1 A 12
POUR i = 1 A 31
{"MOIS"+x,indChamp}[i]=DateEnCours..Jour+" "+DateVersJourEnLettre(DateEnCours)
SI EstPair(NuméroDeSemaine(DateEnCours)) ALORS {"S"+x,indChamp}[i]..CouleurFond = VertPastel
SI EntierVersJour(DateVersEntier(DateEnCours))= 6 ALORS 
   {"MOIS"+x,indChamp}[i]..CouleurFond = RougePastel
FIN
SI EntierVersJour(DateVersEntier(DateEnCours))= 7 ALORS 
   {"MOIS"+x,indChamp}[i]..CouleurFond = RoulePastel
FIN
nResultat = TableauCherche(gclJoursFeries:UneListeDeJoursFeries,tcLinéaire,"DATE_JF",DateEnCours,1)
SI nResultat <> -1 ALORS
    {"MOIS"+x,indChamp}[i]..CouleurFond = GrisClair
FIN
SI DateEnCours = DateSys() ALORS
     {"MOIS"+x,indChamp}[i]..CouleurFond = RougeClair
FIN
DateEnCours..Jour += 1
SI DateEnCours..Mois <> MoisEnCours ALORS 
   SORTIR
FIN
FIN
MoisEnCours = DateEnCours..Mois
FIN