---

Morgen zusammen,

gibt es irgendeine Möglichkeit (Befehl, Makro) alle gemeinsamen Teile eigenständig zu machen? Bisher muss ich ja immer eigenständig im Teilemenü anklicken und dann das eigenständig zu machende Teil. Aber danach muss ich für jedes neue eigenständig zu machende Teil, den Befehl im Menü neu aufrufen. Und das dauert und ist nervig.

Vielen Dank für eure Antworten.

Knuddeligen Gruß 

------------------
Das Leben ist kurz, weniger wegen der kurzen Zeit, die es dauert, sondern weil uns von dieser kurzen Zeit fast keine bleibt, es zu genießen! 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

DEFINE Unshare_parts_all
  LOCAL I
  LOCAL Rows
  LOCAL X
  LOCAL Part
  LOOP
    PB_LTAB_UPDATE
    LET I 0
    LET X 0
    LET Rows (LTAB_ROWS 'PBT_LTAB')
    LOOP
      LET I (I+1)
      LET Part (READ_LTAB 'PBT_LTAB' I 3)
      IF ((SUBSTR Part 1 1)='#')
        IF ((SUBSTR Part 1 2)='##')
          LET X (X+1)
        ELSE
          UNSHARE_PART (READ_LTAB 'PBT_LTAB' I 2)
        END_IF
      END_IF
    EXIT_IF (I=Rows)
    END_LOOP
  EXIT_IF (X=0)
  END_LOOP
  END
END_DEFINE

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Morgen!

http://ww3.cad.de/foren/ubb/Forum15/HTML/000237.shtml

H.

------------------
za wos?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

vielen, vielen herzlichen Dank. 
Hat wunderbar geklappt.     

U's sind unterwegs, und wie immer 10 sind viel zu wenig.

Knuddeligen Gruß 

------------------
Das Leben ist kurz, weniger wegen der kurzen Zeit, die es dauert, sondern weil uns von dieser kurzen Zeit fast keine bleibt, es zu genießen! 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP