peoplecode实现sleep功能

如果想要让程序延迟几秒执行，可以编写如下代码：

[plain] view plain copy print ?

1. Local time &StartTime, &CurrentTime;  
2. &StartTime = %Time;  
3. &CurrentTime = %Time;  
4. While ((&CurrentTime - &StartTime) < &Seconds)  
5.      &CurrentTime = %Time;  
6. End-While; 

Local time &StartTime, &CurrentTime; 
&StartTime = %Time; 
&CurrentTime = %Time; 
While ((&CurrentTime - &StartTime) < &Seconds) 
     &CurrentTime = %Time; 
End-While;

当然也可以通过调用java实现：

[plain] view plain copy print ?

1. Local JavaObject &Pause;  
2. try  
3.    &pSeconds = 10;  
4.    &Pause = GetJavaClass("java.lang.Thread");  
5.    &Pause.sleep(&pSeconds * 1000);  
6.    &Pause = Null;  
7. catch Exception &NoProblemx  
8. &Pause = Null;  
9. end-try;