{{htmlmetatags>metatag-description:(ICL George 3 and George 4 source: ATTJOUNL861)}}
====== ATTJOUNL861 ======
(George Source)
**Macros used:** [[george:macro:COMERRX|COMERRX]], [[george:macro:ENDCOM|ENDCOM]], [[george:macro:GEOERR|GEOERR]], [[george:macro:GEOPACK|GEOPACK]], [[george:macro:HUNT|HUNT]], [[george:macro:HUNT2OPT|HUNT2OPT]], [[george:macro:INFORM|INFORM]], [[george:macro:MENDAREA|MENDAREA]], [[george:macro:MHUNT|MHUNT]], [[george:macro:MHUNTW|MHUNTW]], [[george:macro:MONOUT|MONOUT]], [[george:macro:OUTBLOCK|OUTBLOCK]], [[george:macro:OUTBLOCN|OUTBLOCN]], [[george:macro:OUTNUM|OUTNUM]], [[george:macro:OUTPACK|OUTPACK]], [[george:macro:OUTPARAM|OUTPARAM]], [[george:macro:SEGENTRY|SEGENTRY]], [[george:macro:ZERRORX|ZERRORX]]
22FL #SEG ATTJOUNL [JOHN BAILEY.
22^= #LIS K0ATTACH>K0COMMAND>K0ALLGEO>K0GREATGEO
23DW 8HATTJOUNL
23YG #
24D6 #
24XQ # JOURNAL MESSAGES FOR ATTACH AND DETACH COMMANDS
25CB #
25X2 SEGENTRY K1ATTJOUNL,X1ATTJOUNL
26BL X1ATTJOUNL
26W= SMO 6
27*W BRN START
27TG START BRN OMES
28*6 BRN RMESS
28SQ BRN TECH
29#B BRN TACH
29S2 BRN TOOL
2=?L BRN NOLIN
2=*T ... BRN ZOLREL
2=BY ... BRN RMESS1
2=D4 ...ZOLREL
2=G? ... MHUNTW 3,IDF,COINF
2=JG ... LDEX 4 ANUM(3)
2=LP ... OUTPARAM 4,APARA,IDF,COINF
2=NY ... ZERRORX JCONLREL
2=R= UNCAL LDX 2 FX2 [RELEASE PROFLAG FOR MPX
2?=W LDX 6 AWORK4(2)
2?QG ANDX 6 HALFTOP
2#=6 SRL 6 10
2#PQ LDX 2 AWORK1(2)
2*9B HUNT2OPT 2,AMXOR,ALINES
2*P2 BPZ 2 MBLK
2B8L BRN RMESS
2BN= MBLK ADX 2 6
2C7W LDCT 0 #400
2CMG ANDX 0 A1+FOURTHWD(2)
2D76 ERS 0 A1+FOURTHWD(2)
2DLQ MZERR COMERRX 0(1)
2F6B OMES OUTBLOCN 10
2FL2 GEOPACK 6,AWORK4(2),1
2G5L OUTPACK 6,1,GEOPER
2GK= LDX 6 AWORK4(2) [LINE/IDE NO
2H4W SRL 6 12
2HJG BZE 6 UJUM
2J46 OUTNUM 6,0
2JHQ UJUM HUNT 3,IDF,COINF
2K3B BPZ 3 SRFY
2KH2 GEOERR 1,NOIDFCO
2L2L SRFY LDX 4 ANUM(3) [NO OF CHARS IN CONCEP NAME
2LG= ANDN 4 #7777
2L^W LDX 5 A1(3) [CONCEPTUAL LINE/IDE
2MFG SRL 5 12
2M^6 OUTPARAM 4,APARA,IDF,COINF
2NDQ OUTNUM 5,0
2NYB LDX 0 AWORK3(2)
2PD2 SLL 0 1
2PXL BPZ 0 SYFR
2QC= MHUNT 3,CPAR,JSCE
2QPM ... LDX 4 JSOURCE3(2)
2R44 ... BNG 3 RRRRR
2RBG LDX 0 JSCEC(3) [PROPERTY CLUSTER ADDRESSED
2RW6 STO 0 JSOURCE3(2)
2S8H ...RRRRR INFORM 2,ATTACIPB [IPB ATTACHED
2SGY ... STO 4 JSOURCE3(2)
2STB BRN URET
2T*2 SYFR BZE 6 MAT
2TSL MONOUT ATTACHMP [MPX ATTACHED
2W#= BRN URET
2WRW MAT MONOUT ATTACHUP [UPX ATTACHED
2X?G URET ENDCOM
2XR6 RMESS GEOPACK 6,AWORK4(2),1
2Y=Q OUTPACK 6,1,GEOPER
2YQB ZERRORX JMOPPEDOFF
2YTG ...RMESS1
2YYL ... GEOPACK 6,AWORK4(2),1
2^3Q ... OUTPACK 6,1,GEOPER
2^6W ... ZERRORX JMOPNCOMP
2^=2 TECH LDX 2 FX2
2^PL LDX 3 AWORK4(2)
329= SRL 3 12
32NW OUTNUM 3,0 [LINE/IDE NO
338G GEOPACK 4,AWORK4(2),1 [GEO UNIT NO
33N6 OUTPACK 4,1,GEOPER
347Q LDX 0 AWORK3(2)
34MB SLL 0 1
3572 BPZ 0 ZU1
35LL ZERRORX COIDATAL [IDENTIFIER ALREADY ATTACHED
366= ZU1 BZE 3 UNXI
36KW ZERRORX CONATTAL [LINE ALREADY ATTACHED
375G UNXI ZERRORX CONUNTAL [UNIT ALREADY ATTACHED
37K6 TACH LDX 3 AWORK4(2)
384Q SRL 3 12
38JB OUTNUM 3,0 [LINE/IDE ATTACHED
3942 GEOPACK 4,AWORK4(2),1
39HL OUTPACK 4,1,GEOPER [GEO UNIT NO
3=3= LDX 0 AWORK3(2)
3=GW SLL 0 1
3?2G BNG 0 UI3
3?G6 BZE 3 UNX
3?^Q CALL 1 UNCAL
3#FB +CONATTAL
3#^2 UI3 ZERRORX COIDATAL
3*DL UNX CALL 1 UNCAL
3*Y= +CONUNTAL
3BCW TOOL LDN 3 11
3BXG OUTBLOCK 3
3CC6 OUTNUM ACOMMUNE1(2),0 [CONC.LINE NO
3CWQ MHUNT 3,IDF,COINF
3DBB LDX 4 ANUM(3)
3DW2 ANDN 4 #7777
3F*L OUTPARAM 4,APARA,IDF,COINF
3FT= LDX 0 AWORK3(2)
3G#W SLL 0 1
3GSG BNG 0 W1
3H#6 CALL 1 UNCAL [LINE NOT AVAILABLE ON THIS CONCEPTUA
3HRQ +CONLARGE
3J?B W1 ZERRORX COIDLGE [IDE.NOT AVAILABLE ON THIS CONCEPTUAL
3JR2 NOLIN LDX 6 AWORK4(2)
3K=L SRL 6 12
3KQ= OUTNUM 6,0
3L9W LDXC 0 AWORK3(2)
3LPG ADXC 0 0 [J. UNLESS IPB.
3M96 BCC ZMPX
3MNQ ZERRORX JIDEBUSY
3N8B ZMPX BZE 6 NOUT
3NN2 ZERRORX JLINEBUSY
3P7L NOUT ZERRORX JUNITBUSY
3PM= #
3Q6W #
3QLG MENDAREA 20,K99ATTJOUNL
3R66 #END
^^^^ ...64217623000200000000