[DECL_PGM]
NB4 Elements
NB4 Count
[FIN_DECL_PGM]
[INIT_PGM]
Initialiser id_fen0
Executer id_fen0
[FIN_INIT_PGM]
[DEBUT_FEN]
[INIT_FEN0]
/* Invocation du Service Web
SW_APPELER GOOGLESEARCH doGoogleSearch 'GoogleAccountId' CHS_STR_SEARCH: 0 10 *FAUX *BLANK *FAUX 'lang_fr' *BLANK *BLANK
si *code_retour = *normal
/* Interrogation du résultat complexe
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/documentFiltering *TEXTE CKB_FILTERING:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/estimatedTotalResultsCount *TEXTE CHO_EST_RESCNT:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/searchQuery *TEXTE CHO_SEARCH_QUERY:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/startIndex *TEXTE CHO_START_INDEX:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/endIndex *TEXTE CHO_STOP_INDEX:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/searchTips *TEXTE CHO_SEARCH_TIPS:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/searchTime *TEXTE CHO_SEARCH_TIME:
/* Interrogation du nombre de résultats
SW_COMPTER_VAL GOOGLESEARCH doGoogleSearch /return/resultElements/# Elements
/* Boucle sur les résultats
Count = 1
Tant_que count <= Elements
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/resultElements/#[count]/URL *TEXTE COL_URL:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/resultElements/#[count]/snippet *TEXTE COL_SNIPPET:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/resultElements/#[count]/title *TEXTE COL_TITLE:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/resultElements/#[count]/cachedSize *TEXTE COL_CACHEDSIZE:
SW_RECUP_VAL GOOGLESEARCH doGoogleSearch /return/resultElements/#[count]/relatedInformationPresent *TEXTE COL_RELATED:
INSERER_ELT IDL_ELEMENTS:LISTE
count = count + 1
REFAIRE
Fin
/* Libération des ressources
SW_LIBERER_RES GOOGLESEARCH doGoogleSearch
[FIN_INIT_PGM]