- 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 Feb 18, 2025@23:08:28 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