BL.EC.Common,Prod.Product,vhLib.Macro 1 %RegisteredObject,%XML.Adaptor 0 %String %String %String PageNbr:%String %String +$List(^BlumCatalogPages(pdfFile),2))) Do . . . set res = pdfFile Quit res ]]> "_PRNr_":"_$$$PRGet($$$KortTekst)_"pagenr : "_aPageNbr_" pdfFile : "_pdfFile) . . . . //Do targetFile.WriteLine(prodShortText_"|"_PRNr_"|"_pdfFile_"|"_aPageNbr_"|"_PageCnt_"|"_fileSize) . . . . //d WLIP^vhDBG(139,prodShortText_"|"_PRNr_"|"_pdfFile_"|"_aPageNbr_"|"_PageCnt_"|"_fileSize) . . . . Do ..CreateImageLink(PRNr,$Piece(pdfFile,"."),PageCnt,fileSize,prodShortText_"-"_aPageNbr) // Create the image link else do . //d WL^vhDBG("file not found") . Quit Quit ]]> PRNr,pdfFile,PageCnt,FileSize,Opmerking 1 ShortText:%String 1 %List