Werkobjekt im Fahrbefehl "zusammenstöpseln"

Hallo,

geht bestimmt auch eleganter aber das fällt mir spontan dazu ein.

PROC Pick(num Racknumber)
VAR wobjdata wTempWobj;

TEST Racknumber
CASE 1: wTempWobj := wRack1
CASE 2: wTempWobj := wRack2
CASE 3: wTempWobj := wRack3
ENDTEST
   
MoveJ pPick, v1000, z50, toGreifer\WObj:= wTempWobj;
ENDPROC

Hallo Andi 13130

Da gibt es noch die Herausforderung der Konfigurationsüberwachung die schlägt dann manchmal gerne erbarmungslos zu. Und bitte bedenke die Folgen einer solchen Überwachungsabschaltung, das geht schnell mal in die Hose.

ConfL \on; ConfL \off;

Gruß,

Konstantin

Hi

ich mach das so:

CONST string woRacks{3}:=["woRack1","woRack2","2woRack3"];

PERS wobjdata woActWorkObjekct:=

GetDataVal woRacks{Racknummer},workObject_Temp;

woActWorkObjekct:=workObject_Temp;

Zitat von hofd

Hi

ich mach das so:

CONST string woRacks{3}:=["woRack1","woRack2","2woRack3"];

PERS wobjdata woActWorkObjekct:=

GetDataVal woRacks{Racknummer},workObject_Temp;

woActWorkObjekct:=workObject_Temp;

Alles anzeigen

Gefällt mir gut die Lösung.

Geht es denn nicht auch etwa so?

PERS wobjdata woRacks{n} := [.....];

...

PROC MoveInWobj(num n)
...
MoveJ pP,vmax,z200,toGreifer\Wobj:=woRacks{n};
...
ENDPROC

Hi könnte auch gehen.

Versuch es doch einfach mal in RS und schau ob der Compiler meckert.

Wie wäre es, wenn Du statt "nur" der Racknummer gleich das dazu passende Werkobjekt übergibst?!

Ich mach das auch so:

PROC HoehenmessungPM76x(PERS wobjdata pWObj)
    ! Höhenmessung des Plattenplatzes PM761 und PM763
    
    ZurHomePos;
    GreiferGrundstellung;
    PosBerechnungHoehenmessung;
     
    MoveJ rtHoehenMessStart, vmax, fine, tVK \wobj := pWObj;
    ...
ENDPROC

Gruß

Jörn

Zitat von Andi13130

...

Naja ich bekomme ja eine "Jobnummer" der SPS und diese entspricht dem Werkobjekt.
...

Moin Andreas,

in dem Fall bietet sich ein Array doch geradezu an.

Gruß

Jörn

so könnte es auch gehen:

GetDataVal ("Workbjekt"+NumToStr(WorkojNum,0)),aktWobj;