XMGAPI1.m

XMGAPI1 ;(WASH ISC)/CAP-Get next line of a message API ;04/17/2002  09:28

 ;;8.0;MailMan;;Jun 28, 2002

 ; Entry points (DBIA 1048):

 ; $$READ - Returns next line of a message

 ; See REC^XMS3 for more info.

READ() D REC^XMS3 Q XMRG

XMGAPI1   ;(WASH ISC)/CAP-Get next line of a message API ;04/17/2002  09:28

 +1       ;;8.0;MailMan;;Jun 28, 2002

 +2       ; Entry points (DBIA 1048):

 +3       ; $$READ - Returns next line of a message

 +4       ; See REC^XMS3 for more info.

READ()     DO REC^XMS3

           QUIT XMRG