Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Don Pasquale am 04.02.03 - 11:38:52

Titel: Neues Dokument erstellen (LScript)
Beitrag von: Don Pasquale am 04.02.03 - 11:38:52

Hallo Leute,

ich möchte ein Dokument einer bestimmten Maske erstellen.
Aber irgendwas muss ich vergessen haben, denn es wird kein Dokument erstellt.

Jemand eine Idee ?

Ciao

Don Pasquale

Dim db As NotesDatabase
   
Dim NeuesDokument As NotesDocument
Set NeuesDokument=db.createdocument
NeuesDokument.Form="e4frm_Haupt"
NeuesDokument.e4fld_Indexiert="True"
Set NeuesDokument.e4ihk_DokumentDatum = New NotesDateTime( "Heute" )
Set NeuesDokument.e4ihk_ScanDatum = New NotesDateTime( "Heute" )
NeuesDokument.e4fld_Identnummer= key
NeuesDokument.e4fld_DOC_ID =  subString2$
NeuesDokument.e4fld_Initiator = session.CommonUserName      
NeuesDokument.EXTENDED_ATTR2 = "Posteingang"
NeuesDokument.Indexiert ="True"
NeuesDokument.e4ihk_Status = STATUS_DOKUMENT_ZUSAMMENFASSEN
               
      
Call NeuesDokument.Save( True, True )

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: klaussal am 04.02.03 - 11:58:17

... set db  ??? ???

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Don Pasquale am 04.02.03 - 12:15:23

@Klaussal

Das neue Dokument wird erstellt, aber die Felder kann ich nicht
füllen. Die bleiben alle leer.
Ich habe es bereits mit

Item.ReplaceItemValue("FELD",WERT)
proviert.

Ciao

Don Pasquale

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Performance am 04.02.03 - 12:34:45

vielleicht liegt es an deinen Feldern  ???
- probiere immer stepbystep mit einem einzigen Feld dann speichern usw...


cu

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: forrest g am 04.02.03 - 15:43:24

hast du das auch drin oder ist dein codeauszug nicht vollständig?

dim session as new notessession
set db = session.currentdatabase

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: ata am 04.02.03 - 15:46:12

... ich kann nur sehen, daß die db nicht initialisiert ist...

ata

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: klaussal am 04.02.03 - 15:50:30

... der schläft heute ...

sein problem von gestern ....
hat der 99 baustellen auf einmal ?

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Don Pasquale am 14.02.03 - 10:59:29

Hi,

Ich vermute mal, das die Feldermit der bisherigen Methode nicht angelegt werden. Wen ich die Sache über Item anspreche,
dann werden die Felder auch wenn sie bisher nicht existieren
gefüllt, bzw. vorher angelegt.

Meine Lösung :


Set NewDoc = db.createdocument
Set item = Newdoc.AppendItemValue( "e4ihk_DOC_ID",DOC_ID )
Call NewDoc.Save(True,True)


Ciao

Don Pasquale

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Axel am 14.02.03 - 11:20:48

Hi

kannst es auch mal so versuchen:

Dim db As NotesDatabase  
Dim NeuesDokument As NotesDocument
Dim session As New NotesSession

Set db = session.CurrentDatabase
Set NeuesDokument=db.createdocument
NeuesDokument.Form="e4frm_Haupt"
Call NeuesDokument.ComputeWithForm(True, False)
...

Axel

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Don Pasquale am 17.02.03 - 08:24:13

@Axel,

ich weiss nichtwieso, aber bei mir klappt es nur so:

Dim db As NotesDatabase  
Dim NewDoc As NotesDocument
Dim session As New NotesSession
Set db = session.CurrentDatabase
Set NewDoc=db.createdocument

Set NewDoc = db.createdocument
Set item = Newdoc.AppendItemValue( "Form","e4frm_Haupt" )
Set item = Newdoc.AppendItemValue( "e4ihk_DOC_ID",DOC_ID )
Call NewDoc.ComputeWithForm(True, False)

Call NewDoc.Save(True,True)


ciao

Don Pasquale

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Axel am 17.02.03 - 08:29:28

Hi Don,

ist ok. Hauptsache ist das es bei dir funktioniert.

Axel

Titel: Re:Neues Dokument erstellen (LScript)
Beitrag von: Don Pasquale am 17.02.03 - 08:46:15

So ist es.
 ;D

Ciao

Don Pasquale