• kann hier jemand ein ganz einfachen skript mal posten mit der funktion "list"
    was rauskommen kann weiß ich ja aber wie man den befehl benutzt und wie ich etwas in die spalten und zeilen rein bekomme verstehe ich nicht.
    aber bitte etwas einfaches damit ich es auch verstehe.. grins
    danke im vorraus,
    gruß gunnar
  • Es gibt hier einige Befehle du kannst benutzen:
    http://www.pdmsworld.com/forum/showthread.php?t=1207
    Entschuldigung, mein Deutsch ist sehr schlecht.
  • Danke aber das bringt mich nicht weiter.
    kann jemand den skript bearbeiten das die daten nicht untereinander in der tabelle stehen sondern in den spalten nebeneinander, ich bin echt am verzweifen.

    --------------------------------------------
    SETUP FORM !!list size 32 10

     

      list    .Listm       columns Multiple  width 35  heigh 10
     
    !Headings = Array()
    !Headings.append('MONORAIL')  
    !Headings.append('CONNECT')  
    !Headings.append('CHECK')
    !this.Listm.SetHeadings(!Headings)
     
      !elements[1]= 'LP-015'
      !elements[2]= '/1TEP3401PO-'
      !elements[3]= 'OK'
      !this.Listm.DTEXT = !elements
      SHOW !!list AT XR0.375 YR0.245


    danke im vorraus!
    gruß gunnar
  • Hallo Gunnar

    bin kein expert, aber versuch mal so:
    ---
    SETUP FORM !!list size 32 10

    list .Listm columns Multiple width 35 heigh 10

    !Headings = Array()
    !Headings.append('MONORAIL')
    !Headings.append('CONNECT')
    !Headings.append('CHECK')
    !this.Listm.SetHeadings(!Headings)

    !Elements1[1]= 'LP-015'
    !Elements1[2]= '/1TEP3401PO-'
    !Elements1[3]= 'OK'

    do !i from 1 to 1
    !dtext[!i] = !Elements$!i
    enddo

    !this.Listm.setRows ( !dtext)
    SHOW !!list AT XR0.375 YR0.245
  • So hier mal mein skript.
    ein paar fragen habe ich nun noch, ich will wenn mein skript den eintrag  'DISPLACED!' rot in die liste wegen der übersicht einträgt und wenn man auf meinetwegen den ersten eintrag (das ist ein sbfr) klickt er gleich in der hierachy auf das ce springt.
    und später habe ich noch vor die list zu exportieren in excel oder text.
    ps.. super forum hier!!! bin in hochturen am lernen!!!
    gruß gunnar



    SETUP FORM !!list size 60 10

     

      list    .Listm      Anchor all columns Multiple  width 50  heigh 15
     
    !Headings = Array()
    !Headings.append('MONORAIL')  
    !Headings.append('CONNECT')  
    !Headings.append('CHECK')
    !Headings.append('USER')  
    !Headings.append('DATE')
    !this.Listm.SetHeadings(!Headings)

    /1HN-LP--0
     var !member mem count
       do !member from 1 to $!member
         $!member
         
         add ce
          first member
           var !connmit desc
           var !sollpos func
             if !connmit eq 'unset' then
             
              var !check ' '
             else
                $!connmit
                ---add ce
                var !connpos pos wrt/*
                   if !sollpos eq !connpos then
                     var !check 'OK'
                     
                    else
                    var !check 'DISPLACED!'
                    autocol off add ce col2 autocol on
                   
                  endif
                 sam
           
              endif
           
           
         
           var !namemono[!member] name + ' ' +desc + ' ' +!check +' ' +usermod + ' ' +lastmod
           
          owner
         end
       enddo
        !this.Listm.DTEXT = !namemono
     
      SHOW !!list AT XR0.595 YR0.245