XBRPRTBD ; IHS/ADC/GTH - ROUTINE PRINT ; [ 02/07/97 3:02 PM ]
;;3.0;IHS/VA UTILITIES;;FEB 07, 1997
;
; This functionality has been moved to ZIBRPTRD because
; of the use of non-standard $Z special variables.
; The below GO is provided for backwards compatibility.
G ^ZIBRPRTD
;
XBRPRTBD ; IHS/ADC/GTH - ROUTINE PRINT ; [ 02/07/97 3:02 PM ]
+1 ;;3.0;IHS/VA UTILITIES;;FEB 07, 1997
+2 ;
+3 ; This functionality has been moved to ZIBRPTRD because
+4 ; of the use of non-standard $Z special variables.
+5 ; The below GO is provided for backwards compatibility.
+6 GOTO ^ZIBRPRTD
+7 ;