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

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

**Used in:** [[george:source:BSQ867|BSQ867]], [[george:source:PMDR864|PMDR864]], [[george:source:PMDUMP85|PMDUMP85]], [[george:source:PMDUMPDA85|PMDUMPDA85]], [[george:source:READFALE866|READFALE866]], [[george:source:RITEFAIL864|RITEFAIL864]], [[george:source:TRANFAIL866|TRANFAIL866]]

<code - DATUMBLK.mac.txt>
 8PJD ...[??? DATUMBLK SECT FILE FGN 14 DOC  
 8PS=    #MAC  DATUMBLK  
 8Q?W          LDX   0  %A   
 8QRG          STO   0  BSL1 
 8R?6          LDX   0  %B   
 8RQQ          STO   0  BSL2 
 8S=B    #STR  %C
 8SQ2    #SKI
 8T9L    #SKI
 8TP=    (   
 8W8W          LDX   0  %C   
 8WNG          STO   0  BSL3 
 8X86    )   
 8XMQ    #STR  %C
 8Y7B    #SKI
 8YM2    (   
 8^6L          LDX   0  BSBS 
 8^L=          STO   0  BSL3 
 925W    )   
 92KG          CALL  0  (BSP2)   
 9356    #NORMAL 
</code>