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

**Defined in:** [[george:source:MACROS_MACB|MACROS MACB]]

**Used in:** [[george:source:BEXTRA83|BEXTRA83]], [[george:source:BEXTSJ84|BEXTSJ84]], [[george:source:BUDGTWO84|BUDGTWO84]]

<code - BUDGUSEN.mac.txt>
 3J3J ...[??? BUDGUSEN SECT CENT FGN 2 DOC   
 3J?B    #   
 3JR2    # TO READ A USER'S BUDGET RECORD TO A JBUDGET,JBUDGUSER BLOCK   
 3K=L    #     1) IF %A IS THE BUDGET TYPE BIT PATTERN   
 3KQ=    #MAC  BUDGUSEN  
 3L9W          SMO      FX1  
 3LPG          LDX   0  MBUDGUSEN1   
 3M96          SMO      FX2  
 3MNQ          STO   0  EXEC1
 3N8B          DOWN     BUDGONE,1
 3NN2          BRN      MBUDGUSEN2   
 3P7L    MBUDGUSEN1  
 3PM=                   +%A  
 3Q6W    MBUDGUSEN2  
 3QLG    #NOR
</code>