source: FOIAVistA/tag/r/IFCAP-PRC-PRX--PRCA--PRCN/PRCUPMCK.m@ 1582

Last change on this file since 1582 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 164 bytes
Line 
1PRCUPMCK ;CTB/ALTOONA TEST ROUTINE FOR PURGE MASTER ;10/8/93 12:02 PM
2V ;;5.0;IFCAP;;4/21/95
3 ;N ETIME
4 S ETIME=($P($H,",",2)+120)
5 F Q:$P($H,",",2)>ETIME H 10
Note: See TracBrowser for help on using the repository browser.