IB20P213 ;ISP/TJH - ENVIRONMENT CHECK WITH PRE-INIT CODE ;04/24/2003
Source file <IB20P213.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENV | ; environment check
; No special environment check at this time. |
|
PRE | ; set up check points for pre-init
|
|
R0SC | ; add a new report type to file 361.2
; Name=R0SC ; Description=PROF. GOV'T PAYER EDITS ; Disposition=MAIL REPORT TO MAIL GROUP |
|
NAMES | ; change names of reports per request from EDI group
|
|
COMPLETE | ; display message that step has completed
|
|
END | ; display message that pre-init has completed successfully
|
FileNo | Call Tags |
---|---|
^IBE(361.2 - [#361.2] | FIND1^DIC |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PRE+1~, PRE+2*, PRE+3* |
IBA | R0SC+3~, R0SC+12!, R0SC+16, NAMES+2~ |
IBA( | R0SC+7*, R0SC+8*, R0SC+9*, NAMES+13* |
IBA(1 | R0SC+13* |
IBA(2 | R0SC+14* |
IBA(3 | R0SC+15* |
IBERRM | R0SC+3~, R0SC+11, NAMES+2~ |
IBERRM("DIERR" | R0SC+15 |
IBIEN | NAMES+2~, NAMES+11*, NAMES+12, NAMES+13 |
IBNA | NAMES+2~ |
IBNA( | NAMES+10, NAMES+13 |
IBNA("R022" | NAMES+3* |
IBNA("R0EX" | NAMES+4* |
IBNA("R0N9" | NAMES+5* |
IBNA("R0SA" | NAMES+6* |
IBNA("R0SR" | NAMES+7* |
IBNA("R0SS" | NAMES+8* |
IBRT | NAMES+2~, NAMES+9*, NAMES+10*, NAMES+11, NAMES+12, NAMES+13 |