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

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

**Used in:** [[george:source:CLOSEIPB864|CLOSEIPB864]], [[george:source:GETNO865|GETNO865]], [[george:source:IPCGEO8|IPCGEO8]], [[george:source:IPCOND864|IPCOND864]], [[george:source:IPCONE865|IPCONE865]], [[george:source:IPQUAKE83|IPQUAKE83]], [[george:source:IPQUAKER865|IPQUAKER865]]

<code - JIPCM.mac.txt>
 =?L2 ...[???  JIPCM SECT COMM FGN 20 DOC
 =#5L ...#MAC  JIPCM 
 =#K= ...      LDN   0  IPCMR%A  
 =*4W ...#STR  %C
 =*JG ...      MOD   ANDX 0 IPCMKR,%C
 =B46 ...#STR  %C
 =BHQ ...#SKI
 =C3B ...      ANDX  0  IPCMKR(2)
 =CH2 ...      BNZ   0  %B   
 =D2L ...#NOR
</code>