Domino 9 und frühere Versionen > Entwicklung

neu Nummerierung in einer Maske

<< < (2/8) > >>

Axel:
Hi,

auf den ersten Blick sieht das Script ganz ok aus. Da der Debugger sich weigert, solltest du dir an den entsprechenden Stellen des Scrptes Messageboxen einbauen um die Variablen so zu kontrollieren.

Andere Alternative wäre den Code in eine Ansichtenaktion zu packen und in dann auszuführen, denn damit lässt sich der Debugger zur Zusammenarbeit überreden.

 
Axel

Glombi:
Man bekommt ja kaum Infos !
Welcher case Fall wird denn ausgeführt  ???

Select Case collection.Count
   Case 0:
      Msgbox "Keine Position vorhanden.", 48, db.title  
   Case 1:  
      Set docDetail = collection.GetFirstDocument
      Call docDetail.Remove (True)
   Case Else:
      strPos = Inputbox$( "Welche Position löschen?", "Position löschen", "1" )
      If strPos <> "" Then
         Call view2.Refresh()
         Set docDetail = view2.GetDocumentByKey( thisDoc.UniversalID + "-" + strPos )
         Call docDetail.Remove( True)  
      End If
   End Select      

7Stein:
der case else Fall.
Es sind mehrere Positionen vorhanden, eine davon soll gelöscht werden und dann sollen die Positionsnummern wieder neu durchnummeriert werden, also bei z.B. 6 Positionen wird Pos 3 gelöscht, und dann sollen die Positionen nicht 1,2,4,5,6 lauten, sonern 1,2,3,4,5.

Axel:
Hi,

wo klemmt's denn genau?   ???

Werden die Dokumente gelöscht oder geht nur die Neunumerierung nicht? Ohne genauere Infos können wir hier nur sehr schwer helfen.

Wie gesagt, versuch doch mal mit Messagebox - Anweisungen den Programmablauf zu analysieren.


Axel

7Stein:
Dokumente werden gelöscht, sind in der Anzeige nicht mehr zu sehen, aber die Nummerierung funktioniert dann eben nicht.

Bin noch bei dem Test mit Messageboxen.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete