{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: SETELOG)}}
====== SETELOG ======
(GIN Macro)
**Defined in:** [[george:source:MACROS_PERI|MACROS PERI]]
**Used in:** [[george:source:CARTCONT867|CARTCONT867]], [[george:source:IPBLOG866|IPBLOG866]], [[george:source:RELPER867|RELPER867]], [[george:source:UNLOADMT867|UNLOADMT867]]
KFH6 #MAC SETELOG
KG2Q LDX 0 %B
KGGB ADN 0 12
KH22 SETUPCORE 0,2,ADATA,ELOUT
KHFL STOZ A1(2)
KH^= LDN 0 A1(2)
KJDW LDN 1 A1+1(2)
KJYG SMO %B
KKD6 MOVE 0 11
KKXQ LDX 0 %B
KLCB ADN 0 11
KLX2 STO 0 ELDMECT(2)
KMBL LDCT 0 #600
KMW= ADX 0 %C
KN*W STO 0 ACSTSN(2)
KNTG LDN 0 128
KP*6 STO 0 ELDMEINF(2)
KPSQ LDX 0 2
KQ#B LDX 1 FX1
KQS2 LDX 2 FX2
KR?L STO 0 %A
KRR= #NOR