SetModelLink Linkfunctie

Met SetModelLink wordt een hyperlink ingesteld naar een ander AsToDate model of naar een Internet Explorer Resource. De functie resulteert in de waarde TRUE indien succesvol en anders FALSE.

SetModelLink(LinkVarName, HyperLinkText, ModelFileNameOrURL, InitString)
SetModelLink(PictureVarName, ModelFileNameOrURL, InitString)

LinkVarName, PictureVarName (MergedString)
In LinkVarName en PictureVarName wordt respectievelijk de naam van een met ModelLink en Picture gedeclareerde variabele vermeld in de vorm van een VariableName.

HyperLinkText (MergedString)
In HyperLinkText wordt de tekst van de hyperlink vermeld zoals die in de uitvoer dient te verschijnen. HyperLinkText is alleen van toepassing bij ModelLink-variabelen.

ModelFileNameOrURL (MergedString)
In ModelFileNameOrURL wordt de bestandsnaam van een model of de Universal Resource Locator (URL) van een lokale of internet bron opgegeven welke moet worden geopend of geactiveerd zodra op de hyperlink wordt geklikt.

• De naam van een model dient in de vorm van <bestandsnaam>.<bestandsformaat> te worden vermeld. In modellen welke worden toegepast in Order, Invoice, BuyIt, Supply, Time of Mate dient deze naam opgegeven te worden in de vorm van <bestandsnaam>.<modeltype>.<bestandsformaat>. Hierbij kan voor bestandsnaam een * worden opgegeven om een default model te selecteren. Een default model is een model dat is ingesteld via het Uitvoermenu van Order, Invoice, BuyIt, Supply, Time of Mate. Bijvoorbeeld kan *.Fc1.rtf opgegeven worden voor een link naar de default factuurlay-out vanuit aanmaningen, lijsten openstaande posten etc. zoals in: SetModelLink(mFct,[Fstuk*],*.Fc1.rtf,N0=[Fstuk*])
• De URL van een lokale of internet bron dient vermeld te worden zoals gespecificeerd door het World Wide Web Consortium (W3C). Voorbeelden: http://www.astona.nl, ftp://astona.nl, news://astona.nl, c:\test.doc etc.

InitString (MergedString)
In InitString worden initialisatie waarden in de vorm van: Key1=Waarde1;Key2=Waarde2; etc opgegeven.

• Indien InitString begint met IE_DOC of IE_DOC=<Titel> dan wordt een nieuw venster met Internet Explorer geopend en de met ModelFileNameOrURL gevraagde gegevens getoond zoals een internetpagina. Hierbij wordt de knoppenbalk voorzien wordt van extra navigatieknoppen. De naam van het venster wordt bepaald door <Titel> en indien niet vermeld dan wordt ModelFileNameOrURL toegepast.
• In overige gevallen wordt in InitString de initialisatiewaarden voor het in ModelFileNameOrURL opgegeven model vermeld in de vorm van: Key1=Waarde1;Key2=Waarde2; etc. Tevens kan via InitString aangegeven worden of de nieuwe uitvoer in hetzelfde (in plaats van een nieuw) venster dient te worden weergeven. In dat geval dient InitString te beginnen met (exact) de volgende tekens: RE_USE=1. Een InitString met overige initialisatie waarden krijgt dan de volgende vorm: RE_USE=1;Key1=Waarde1;Key2=Waarde2; etc. Indien in een InitString de initialisatie waarden van het huidige model moeten worden opgenomen dan kan dit m.b.v. de variabele ModelInit. In het geval dat er in InitString dezelfde key's worden toegepast dan geldt de waarde van de laatste (meest rechtse) key.

Voorbeeld:
{
 AdoQuery "Provider=FaOleDb.FaProv;Data Source=demo.adm",Ado
 ModelLink mLink
 Ado
 OpenTable(Debiteuren.idx,Naam)
 Do
  SetModelLink(mLink,[Naam*],Betalingsgedrag Debiteuren.Rap.rtf,"Provider=FaOleDb.FaProv;DataSource=demo.adm;DebiteurenNr="[RekeningNr*])
}
  [mLink] [Adres*] [Postcode*] [Woonplaats*]
{
 Od
}

Resultaat:
Antropolka GmbH Volmarstrasse 14 D-1234 HANNOVER
Berg Anderlecht BV Korte Kade 10 1234 GB AALSMEER
Boursois Rue de Monte 2 F-75001 LYON
De Boer Groothandel Gooisedijk 13 1234 GG Vriezeveen
d'Gunther GmbH Tegelstrasse 14 D-1258 MUNCHEN
Diemen GmbH Grosse Markt 10 D-1255 OPLADEN
Elector B.V. Binnengracht 12 1020 FF AMSTERDAM
Gebr. den Burg F. Hofmanweg 34 1234 FG AMSTELVEEN
Haas & Partners Kanaaldijk 2 7655 GH ZWOLLE
Halsma J. de Boklaan 2 4637 HG IJMUIDEN
Herr Pelzer Robert Kochstrasse 17 D-2345 OPLADEN
Herr. Riesenberg Neue Alee 20 D-3456 HEIDELBERG
Inter Marchee Colombi 1 F-45678 GAP
Meyer GmbH Hauptstrasse 17 D-2334 BONN
Para Systems B.V. Johan Bolsstraat 10 3456 YH NIEUWE GEIN
Robotec 12, Fleetstreet QWE-123-TR LONDON