XMAH ;ISC-SF/GMB-List message responses API ;07/17/2003 13:04
;;8.0;MailMan;**20**;Jun 28, 2002
; Was (WASH ISC)/CAP
;
; Entry points (DBIA 1040):
; ENT8 List responses of a message
;
ENT8 ; List message responses
; Needs:
; XMZ Message number
N XMV
D INITAPI^XMVVITAE
D HELPRESP^XMJMP1(XMZ,+$P($G(^XMB(3.9,XMZ,3,0)),U,4))
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXMAH 356 printed Oct 16, 2024@18:11:44 Page 2
XMAH ;ISC-SF/GMB-List message responses API ;07/17/2003 13:04
+1 ;;8.0;MailMan;**20**;Jun 28, 2002
+2 ; Was (WASH ISC)/CAP
+3 ;
+4 ; Entry points (DBIA 1040):
+5 ; ENT8 List responses of a message
+6 ;
ENT8 ; List message responses
+1 ; Needs:
+2 ; XMZ Message number
+3 NEW XMV
+4 DO INITAPI^XMVVITAE
+5 DO HELPRESP^XMJMP1(XMZ,+$PIECE($GET(^XMB(3.9,XMZ,3,0)),U,4))
+6 QUIT
