IBBACHRG ;OAK/ELZ - PFSS CHARGE API ;15-MAR-2005
Source file <IBBACHRG.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CHARGE(IBBDFN,IBBARFN,IBBCTYPE,IBBUCID,IBBFT1,IBBPR1,IBBDG1,IBBZCL,IBBRXE,IBBORIEN,IBBPROS) | ;
|
|
DX(DG1,IEN) | ;file diagnosis on subfile #373.04
|
|
GETCHGID() | ;
|
|
ERRMSG(MSG) | ;generate error msg if charge failure
|
|
;send error message to mail group
|
FileNo | Call Tags |
---|---|
^XMB(3.8 - [#3.8] | GET1^DIQ |