Hey, verfolge dieses Forum schon etwas laenger, nun aber Registriert um meine Fragen zu stellen und eventuell auch anderen zu helfen.
Hier meine Frage:
ich habe an einer Schleifzelle einen Bandzaehler, dieser laeuft aber durch (bis 999).
nun moechte ich dass jeder Mitarbeiter seine eigenen Stueckzahlen in einer abfrage angeben kann sodass er z.B. nach 250 gefertigten teilen das Band wechseln soll und eine Fehlermeldung bekommt.
Die Abfrage klappt soweit schon, nur wenn er seinen soll erreicht hat fragt er einfach erneut wieviele Teile gefertigt werden sollen, aber ohne Fehlermeldung?
Kann mir eventuell jemand behilflich sein? hier meine Routine:
PROC Anzahl()
VAR string stTeilesoll;
PERS num nTeileSoll:=200;
VAR num nTeileIst;
VAR btnres resAntwort;
WHILE resAntwort<>resYes DO
nTeileSoll:=UINumEntry(
\Header:="Sollteilezahl"
\Message:="Wieviele Teile sollen gefertigt werden?"
\Icon:=iconInfo
\InitValue:=200
\MinValue:=1
\MaxValue:=200
\AsInteger);
UIMsgBox
\Header:="Bestätigungsabfrage",
"Sollen wirklich "+NumToStr(nTeileSoll,0)+" gefertigt werden?"
\Buttons:=btnYesNoCancel
\Icon:=iconWarning
\Result:=resAntwort;
IF nTeileist>nTeilesoll THEN
Set DO_StoerungProgAbl;
Stop;
ELSE
nTeileist:=nTeileist+1;
ENDIF
ENDWHILE
ENDPROC
Vielen Dank schonmal fuers anschauen!
(hoffe habe mich verstaendlich ausgedrueckt:D)
Gruß