13. november 2000 - 12:28Der er
5 kommentarer og 1 løsning
Kategoriser dokumenter i view
Hej
Jeg har importeret dokumenter fra en ekstern database. I min fom i Lotus Notes har jeg oprettet et felt \"color\" med en default tekst, som jeg skal beruge til at sortere og vise dokumenterne kategoriseret. Når dokumenter bliver importeret står de som \"ikke kategoriseret\", men så snart jeg åbner og gemmer den sorterer og kategoriserer den dem på feltet \"color\" som den skal. Ved du hvordan jeg kan løse dette på en smartere måde, for det er jo ikke smart at skulle ind og redigere ca. 4000 dokumenter
Lav en agent til at køre på alle dokumenter i viewet ... Under actions vælger du simple actions, or \"ret felt\", der kan du sætte en bestemt tekst i et bestemt felt....
Tusind tak for dit svar. Problemet er bare at jeg har 10 forskellige forms hvor den defaulte tekst er forskellige, hvilket vil svare til, at jeg skal have 10 agenter, men det er da en løsning, hvis ikke det kan klares på andre måder. Der er Lotus Notes lidt tung :-)
Ja, du har ret... Du kan sagtens lave det, men skal du nok kode lidt... Måske den der hedder \"ændre felt pr form\", der kan man i en form ændre det der skal ændres... så kan det være at du kan smidde alle 10 ændringer i en agent. Nu er vi dog ude i noget jeg ikke har prøvet før....
lav en shared agen der f.eks. hedder refresh vælg manually from actions menu og run once i feltet vælger du formula og skriver: @Command([ToolsRefreshSelectedDocs]) derefter vælger du alle documenter i view\'et (ctrl A) og kører agenten fra actions og så navnet.
hvis du endnu ikke har sat basen i brug - hvorfor så ikke sætte feltet mens du importerer? Du kan i øvrigt bede notes om at beregne formen under import - hvis du bruger standardimportformularen.
At lave en agent der retter feltet alt efter hvilken form du har er nu heller ingen sag - hvis du kan lidt Lotus Script (eller VB).
Du kunne køre noget som nedenstående script - der løber samtlige dokumenter i databasen igennem - og sætter feltet color alt efter hvad formnavnet er:
Sub Initialize Dim Session As New notessession Dim db As notesdatabase Dim col As notesdocumentcollection Dim doc As notesdocument
Set db = session.currentdatabase Set col = db.alldocuments
Set doc = col.getfirstdocument
Do Until doc Is Nothing Select Case doc.form(0) Case \"AAAA\" doc.color = \"1111\" Case \"BBBB\" doc.color = \"2222\" End Select
Call doc.save (True, False) Set doc = col.getnextdocument(doc) Loop
Svaret fra \"jjj\" er det enkleste svar som endda virker :-)
\"Wise\"\'s vil også virke men det er en omvej
\"jhr\"\'s virker naturligvis også, men det er næppe nødvendigt at scripte sig til noget som findes i 1 (een) @-function.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.