EICS
Member
I have some code i need to block until a super genie for data entry has completed (by operator input)as per below.
FUNCTION
New_Setpoint()
Code…………..
Code…………..
IF Code…………..
THEN
AssWin("!6FibSP",20,350,41, sTagbase+"_MBSP_NEW");WinTitle("Fiberiser Spinner Speed - Entry");
! pop up Keypad for entry New Speed Setpoint - Rev 1.1
! hSem = SemOpen("WaitTillEntry",1);
! SemWait(hSem, -1);
// I need to block this section onwards until the operator enters a setpoint from the !6FibSP Super Genie
Called from above call
END
iExist_SP = TagRead(sTagbase+"_MBSP"); ! read the existing Setpoint value (Rev 1.2)
iNew_SP = TagRead(sTagbase+"_MBSP_NEW"); ! read the New Setpoint value just entered from above (Rev 1.2)
sNew_SP = IntToStr(iNew_SP); ! convert New Setpoint value just entered from above to STRING (Rev 1.2)
code………………….
code…………………..
code…………………..
code…………………...
[FONT="]END[/FONT][FONT="] [/FONT][FONT="][/FONT][FONT="] [/FONT]
FUNCTION
New_Setpoint()
Code…………..
Code…………..
IF Code…………..
THEN
AssWin("!6FibSP",20,350,41, sTagbase+"_MBSP_NEW");WinTitle("Fiberiser Spinner Speed - Entry");
! pop up Keypad for entry New Speed Setpoint - Rev 1.1
! hSem = SemOpen("WaitTillEntry",1);
! SemWait(hSem, -1);
// I need to block this section onwards until the operator enters a setpoint from the !6FibSP Super Genie
Called from above call
END
iExist_SP = TagRead(sTagbase+"_MBSP"); ! read the existing Setpoint value (Rev 1.2)
iNew_SP = TagRead(sTagbase+"_MBSP_NEW"); ! read the New Setpoint value just entered from above (Rev 1.2)
sNew_SP = IntToStr(iNew_SP); ! convert New Setpoint value just entered from above to STRING (Rev 1.2)
code………………….
code…………………..
code…………………..
code…………………...
[FONT="]END[/FONT][FONT="] [/FONT][FONT="][/FONT][FONT="] [/FONT]