source: FOIAVistA/trunk/r/CPT_HCPCS_CODES-ICPT-DGYA/ICPTAU.m@ 1397

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

initial load of FOIAVistA 6/30/08 version

File size: 452 bytes
Line 
1ICPTAU ; DLS/DEK/KER - CPT Annual Update Protocol for CPT Codes ; 02/22/2007
2 ;;6.0;CPT/HCPCS;**14,16,34**;May 19, 1997;Build 3
3 ;
4 ; Quit Update if NOT CPT Procedure Related
5 ;
6 ; XQORQUIT Signals the Unwinder to not process
7 ; any protocols that are subordinate to
8 ; the current protocol. Control is passed
9 ; to the next sibling protocol.
10 ;
11 S:'$D(LEXSCHG("B",81))&('$D(LEXSCHG("B",81.3))) XQORQUIT=1
12 Q
Note: See TracBrowser for help on using the repository browser.