CCERROR [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: CCERROR)}}
====== CCERROR ======
(GIN Macro)

**Defined in:** [[george:source:MACS_JIB|MACS JIB]]

**Used in:** [[george:source:COMPS_MW|COMPS MW]], [[george:source:IPBCONS867|IPBCONS867]], [[george:source:IPBIN867|IPBIN867]], [[george:source:IPBINB867|IPBINB867]], [[george:source:IPBINC865|IPBINC865]], [[george:source:IPBLOG866|IPBLOG866]], [[george:source:IPBOUT867|IPBOUT867]], [[george:source:IPBSCAN867|IPBSCAN867]], [[george:source:IPBSCANB867|IPBSCANB867]], [[george:source:IPBSTARB867|IPBSTARB867]], [[george:source:IPBSTART867|IPBSTART867]], [[george:source:MOPCOM867|MOPCOM867]], [[george:source:MOPCOMB865|MOPCOMB865]], [[george:source:READBULK867|READBULK867]]

<code - CCERROR.mac.txt>
 38H9 ...[??? CCERROR SECT COMM FGN 28 DOC   
 38HF ...#MAC  CCERROR   
 38HP ...      LDX   1  FX2  
 38H^ ...#STR  %B
 38J9 ...      ACCSTO   %B,ACOMMUNE2,1   
 38JF ...[                                  STORE EXTRA DATA IF ANY  
 38JP ...#ACC  %A
 38J^ ...#SKI
 38K9 ...(   
 38KF ...#MOD  %A
 38KP ...(   
 38K^ ...      SMO      %A   
 38L9 ...      LDN   0  0
 38LF ...)   
 38LP ...#MOD  %A
 38L^ ...#SKI
 38M9 ...      LDN   0  0(%A)
 38MF ...)   
 38MP ...#ACC  %A
 38M^ ...      LDN   0  %A   
 38N9 ...#STR  %B
 38NF ...#FID  12,12,1   
 38NP ...[                                   SET BITS TO SHOW WHICH PARAMS PRESEN
 38N^ ...#STR  %C
 38P9 ...#FID  13,13,1   
 38PF ...#STR  %D
 38PP ...#FID  14,14,1   
 38P^ ...      STO   0  ACOMMUNE1(1) 
 38Q9 ...      DOWN     IPBERROR,1   
 38QF ...#STR  %C
 38QP ...      BRN      %C                 [MOP OFF EXIT 
 38Q^ ...#STR  %D
 38R9 ...      BRN      %D                  [CANTDO EXIT 
 38RF ...#NOR
</code>