[Th...] Posted 2 hours ago Share Posted 2 hours ago Hallo Kollegen. Ich würde gerne mein Datenfeld Kostenstelle anhand der Maschinennummer setzen. Also ich habe in einem Ordner 4 Dateien die heißen wie unsere Kostenstellen. in diesen Dateien stehen Maschinen die in dieser Kostenstelle vorhanden sind. Aber ich bekomme es nicht zu prüfen ob etwas in einer Liste vorhanden ist. Also etwa so: maschAktuell = getRecordHead("u_5_masch_nr") dirAbteilungen = "x:\Wellenfertigung\00_Kostenstellen" file20000 = dirAbteilung + "\" + "20000.txt" file21000 = dirAbteilung + "\" + "21000.txt" file22000 = dirAbteilung + "\" + "22000.txt" file23000 = dirAbteilung + "\" + "23000.txt" if maschAktuell in file20000 then setRecordHead("u_abt", "20000") else if maschAktuell in file21000 then setRecordHead("u_abt", "21000") else if maschAktuell in file22000 then setRecordHead("u_abt", "22000") else if maschAktuell in file23000 then setRecordHead("u_abt", "23000") else setRecordHead("u_abt, "00000") endif endif endif endif Hat jemand eine Tip wie ich das machen könnte? Wollte dies dann in die inspection_start_pcm.txt einfügen damit die Kostenstelle immer richtig ausgefüllt ist. Vielen Dank für die Unterstützung Link to comment Share on other sites More sharing options...
[Mi...] Posted 1 hour ago Share Posted 1 hour ago (edited) Hallo Thomas, in pcm gibt es kein if ... in .... du musst die Datei erst händisch einlesen: maschAktuell =getRecordHead("u_5_masch_nr") dirAbteilungen = "x:\Wellenfertigung\00_Kostenstellen" AbtList=list("20000", "21000", "22000","23000") defineFunctionStart("maschMatch") list1=readListFile(file1) maschCheck=false for i=1 to list1.size if getParameterNamed(list1,i) == maschAktuell maschCheck=true endif next i // oder kurz und knapp //maschCheck=executeCode(list1.asArray + " includes: '" + maschAktuell + "'") defineFunctionEnd("maschCheck") for i=1 to AbtList.size listFile=getParameterNamed(AbtList,i) file1=dirAbteilungen + "\file" + listFile + ".txt" if executeFunctionNamed("maschMatch") == true setRecordHead("u_abt", listFile) endif next i Edited 59 minutes ago 1 Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in