{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: PMESSAGE)}}
====== PMESSAGE ======
(GIN Macro)

**Defined in:** [[george:source:PMACS|PMACS]]

**Used in:** [[george:source:PMBDTS863|PMBDTS863]], [[george:source:PMBRKCHS84|PMBRKCHS84]], [[george:source:PMBUFFS84|PMBUFFS84]], [[george:source:PMCHAP867|PMCHAP867]], [[george:source:PMCHECK867|PMCHECK867]], [[george:source:PMCRABS860|PMCRABS860]], [[george:source:PMENDITS867|PMENDITS867]], [[george:source:PMENDNOS84|PMENDNOS84]], [[george:source:PMFIXSTO84|PMFIXSTO84]], [[george:source:PMFS85|PMFS85]], [[george:source:PMFSB84|PMFSB84]], [[george:source:PMOBJIII860|PMOBJIII860]]

<code - PMESSAGE.mac.txt>
 693J    [??? PMESSAGE SECT DIAG FGN 104 DOC 
 69GP    #MAC  PMESSAGE                     [M.C.D. MANN 
 69^W    [   
 6=F3    [   
 6=Y8    [     **************
 6?C*    [     *  PMESSAGE  *
 6?WG    [     **************
 6#*M    [   
 6#SS    [   
 6*?^    [   
 6*R6    [     THIS MACRO IS USED BY PMBUFFS TO PRINT OUT ON A LINE PRINTER  
 6B=?    [     EITHER AN ERROR MESSAGE OR A TITLE LINE   
 6BPD    [              %A=ADDRESS OF FIRST WORD OF MESSAGE  
 6C8K    [              %B=NUMBER OF WORDS IN MESSAGE
 6CMQ    [            %C=SUPLIMENTARY MODIFIER  (OPTIONAL)   
 6D6X    [     EXIT     X0,X1,X2,X4 UNCHANGED
 6DL4    [   
 6F59    #STR %C 
 6FJB          SMO      %C   
 6G3H          LDN   5  %A   
 6GGN          LDX   6  JPMOD
 6H2L          BCHX  6  £
 6HFR          MOVE  5  %B   
 6HYY          CALL  7  (JPRINT2)
 6JD5    #NOR
</code>