{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: INMOP)}}
====== INMOP ======
(GIN Macro)
**Defined in:** [[george:source:OLPMACROS|OLPMACROS]]
**Used in:** [[george:source:CHTAB|CHTAB]], [[george:source:COMPS_ACTBLK|COMPS ACTBLK]], [[george:source:CROBJ6|CROBJ6]], [[george:source:FHOBJ860|FHOBJ860]], [[george:source:INKS|INKS]], [[george:source:TROBJ867|TROBJ867]]
97FQ ...#MAC INMOP
97^B ... SMO FX2
98F2 ... LDX 0 IDENTINFO
98YL ... BZE 0 MNOTMOP [J. NOT MOP OR JDF
99D= ... LDX 2 FX2
99XW ... LDN 0 3
9=CG ... LDN 1 ACC3(2)
9=X6 ... MOVE 0 5
9?BQ ... LDX 1 FX1 [RESET X1.
9?WB ... LDX 0 APETADDR(2)
9#B2 ... SBS 0 EVENT1(2)
9#TL ... LDX 5 IDENTINFO(2) [LD. PERI TYPE & UNIT NO.
9**= ... LDX 7 ACNUM(2) [LD. ACT.NO. OF AOLPT.
9*SW ... LDCT 6 #100
9B#G ... ANDX 6 ALTMARK(2) [LD. NEWLINE SUPPRESSION INDICATOR.
9BS6 ... ERS 6 ALTMARK(2)
9C?Q ... ORX 6 IDENTIND(2) [ORX IN IDENT.OR NOT INDICATOR.
9CRB ... TOPCA MPAIR(1) [CHANGE ACT AND GO AWAY
9D?2 ... COOR1Y [PUT THIS TO SLEEP
9DQL ... BRN %A [
9F== ... LDX 0 APETADDR(2)
9FPW ... ADS 0 EVENT1(2)
9G9G ... BRN %B
9GP6 ...MPAIR PAIR INMOP,1
9H8Q ...MNOTMOP [CONTINUE
9HNB ... LDX 1 FX1 [LD. VALUES OF FX1 & FX2
9J82 ... LDX 2 FX2
9JML ...#NOR