peoplecode实现sleep功能

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

[plain] view plaincopyprint?

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 plaincopyprint?

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;