RGMSCALR ;CAIRO/DKM - Send alert to user(s) via kernel or mail;04-Sep-1998 11:26;DKM
;;2.1;RUN TIME LIBRARY;;Mar 22, 1999
;=================================================================
; Old entry point
ALERT(XQAMSG,RGUSR) ;
D ALERT^RGUTALR(.XQAMSG,.RGUSR)
Q
MAIL(RGMSG,XMY,XMSUB,XMDUZ) ;
D MAIL^RGUTALR(.RGMSG,.XMY,.XMSUB,.XMDUZ)
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HRGMSCALR 354 printed Dec 13, 2024@01:42:05 Page 2
RGMSCALR ;CAIRO/DKM - Send alert to user(s) via kernel or mail;04-Sep-1998 11:26;DKM
+1 ;;2.1;RUN TIME LIBRARY;;Mar 22, 1999
+2 ;=================================================================
+3 ; Old entry point
ALERT(XQAMSG,RGUSR) ;
+1 DO ALERT^RGUTALR(.XQAMSG,.RGUSR)
+2 QUIT
MAIL(RGMSG,XMY,XMSUB,XMDUZ) ;
+1 DO MAIL^RGUTALR(.RGMSG,.XMY,.XMSUB,.XMDUZ)
+2 QUIT