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

**Defined in:** [[george:source:MACS_SPC|MACS SPC]]

**Used in:** [[george:source:FLAW866|FLAW866]]

<code - PLOGGING.mac.txt>
 FT#B    #     CHECKS WHETHER ELOG ACTIVITY HAS ALREADY LOGGED FAIL  
 FTS2    #MAC  PLOGGING  
 FW?L          LDX   2  FX2  
 FWR=          STO   4  ACOMMUNE1(2) 
 FX=W          STO   5  ACOMMUNE2(2) 
 FXQG          STO   6  ACOMMUNE3(2) 
 FY=6          STO   7  ACOMMUNE4(2) 
 FYPQ          LDX   4  %A   
 F^9B    #STR  4,%B  
 F^P2          LDX   5  %B   
 G28L    #STR  4,%B  
 G2N=    #SKI
 G37W          LDX   5  ACOMMUNE1(2) 
 G3MG    #STR  4,%C  
 G476    #SKI
 G4LQ          LDX   6  ACOMMUNE1(2) 
 G56B    #STR  5,%C  
 G5L2    #SKI
 G65L          LDX   6  ACOMMUNE2(2) 
 G6K=    #STR  4,%C  
 G74W    (   
 G7JG    #STR  5,%C  
 G846    (   
 G8HQ          LDX   6  %C   
 G93B    )   
 G9H2    )   
 G=2L    #STR  4,%D  
 G=G=    #SKI
 G=^W          LDX   7  ACOMMUNE1(2) 
 G?FG    #STR  5,%D  
 G?^6    #SKI
 G#DQ          LDX   7  ACOMMUNE2(2) 
 G#YB    #STR  6,%D  
 G*D2    #SKI
 G*XL          LDX   7  ACOMMUNE3(2) 
 GBC=    #STR  4,%D  
 GBWW    (   
 GCBG    #STR  5,%D  
 GCW6    (   
 GD*Q    #STR  6,%D  
 GDTB    (   
 GF*2          LDX   7  %D   
 GFSL    )   
 GG#=    )   
 GGRW    )   
 GH?G    MPLOGX3 LDX 1  ELPIA
 GHR6    #UNS  ELOGDME   
 GJ=Q    #SKI
 GJQB    MPLOGX2 TXU 4  ELCPT(1) 
 GK=2    #UNS  ELOGDME   
 GKPL    (   
 GL9=    MPLOGX2 LDX   0  0(1)   
 GLNW          ANDX  0  CTMXS2   
 GM8G          BNZ   0  MPLOGX4             [ONLY SEE 1900 DEVICE INCIDENTS  
 GMN6          TXU   4  ELCPT(1) 
 GN7Q    )   
 GNMB          TXU   5  ACCN(1)             [ERROR BEING LOGGED  
 GP72          TXU   6  ASBLN(1) 
 GPLL          TXU   7  ACR(1)   
 GQ6=          BCC      MPLOGX1  
 GQKW    #UNS  ELOGDME   
 GR5G    MPLOGX4 
 GRK6          FINDACTFB 2,,BSA,ELOG,MPLOGNO,FPTR   [FIND NEXT ELOG  
 GS4Q          LDN   1  ACSTSN(2)
 GSJB          BRN      MPLOGX2  
 GT42    MPLOGX1 COOR3  #62                 [LOOK AGAIN NEXT SPRING CLEAN
 GTHL          BRN      MPLOGX3  
 GW3=    MPLOGNO LDX 1 FX1   
 GWGW          LDX   2  FX2  
 GX2G          LDX   4  ACOMMUNE1(2) 
 GXG6          LDX   5  ACOMMUNE2(2) 
 GX^Q          LDX   6  ACOMMUNE3(2) 
 GYFB          LDX   7  ACOMMUNE4(2) 
 GY^2    #NOR
</code>