ICPT63PT ;ALB/ESD - CPT Update '98 Post-Init Driver; 1/29/98
Source file <ICPT63PT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;- Main entry point
|
|
| ENQ | ||
| DISTUP | ;- Entry point for Distribution Date update
|
|
| DISTUPQ | ||
| DISTDT() | ;- Add distribution date to file #81.2
|
|
| DISTDTQ | ||
| CATUPD | ;- Entry point for CPT Category update
|
|
| CATUPDQ | ||
| MOD | ;- Update CPT Category file (#81.1) with modified names/CPT ranges
|
|
| ADD | ;- Add new categories to CPT Category file (#81.1)
|
|
| INACT | ;- Inactivate categories from CPT Category file (#81.1)
|
|
| ERRMSG(ACT) | ;- Error message for "A"dd, "M"odify, "I"nactivate
|
|
| AMSG | ;- Added categories message
|
|
| MMSG | ;- Modified categories message
|
|
| IMSG | ;- Inactive categories message
|
|
| SETFLG | ;- Set print flag so headings will display once
|
|
| CATS | ;- CPT Category records
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | DISTDT+7 |
| FILE^DICN | ADD+9 |
| ^DIE | DISTDT+14, MOD+14, ADD+16, INACT+15 |
| EN^ICPT63P2 | EN+9 |
| BMES^XPDUTL | EN+13, DISTUP+3, DISTUP+5, CATUPD+4, CATUPD+14, MOD+18, ERRMSG+4, AMSG+2, MMSG+2, IMSG+2 |
| MES^XPDUTL | EN+12, EN+14, EN+15, DISTUP+2, DISTUP+6, MOD+19, ADD+20, INACT+18, AMSG+3, AMSG+4 , MMSG+3, IMSG+3, IMSG+4 |
| FileNo | Call Tags |
|---|---|
| ^DIC(81.1 - [#81.1] | Classic Fileman Calls |
| ^DIC(81.2 - [#81.2] | Classic Fileman Calls |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | ERRMSG~, ERRMSG+3 |
| CATEG | CATUPD+2~, CATUPD+7*, CATUPD+10, CATUPD+13, MOD+6, MOD+13, ADD+5, ADD+8, ADD+15, INACT+6 , ERRMSG+4, SETFLG+2 |
| CATI | CATUPD+2~, CATUPD+7* |
| CATIEN | MOD+2~, MOD+3*, MOD+6*, MOD+9, MOD+10, MOD+13, MOD+17, INACT+2~, INACT+3*, INACT+6* , INACT+9, INACT+10, INACT+11 |
| CATNNDE | MOD+2~, MOD+3*, MOD+17*, MOD+19, ADD+2~, ADD+19*, ADD+20 |
| CATNODE | MOD+2~, MOD+3*, MOD+10*, MOD+18, INACT+2~, INACT+3*, INACT+10*, INACT+18 |
| DA | DISTDT+11*, DISTDTQ, MOD+13*, MOD+14!, ADD+2~, ADD+15*, ADD+19, INACT+11*, INACT+15! |
| DD | ADD+9! |
| DIC | DISTDT+1~, DISTDT+2*, DISTDT+12, ADD+8*, ADD+15, ADD+16! |
| DIC(0 | DISTDT+3*, ADD+8* |
| DIE | DISTDT+1~, DISTDT+12*, MOD+13*, MOD+14!, ADD+15*, ADD+16!, INACT+11*, INACT+15! |
| DLAYGO | ADD+8*, ADD+9! |
| DO | ADD+9! |
| DR | DISTDT+1~, DISTDT+13*, MOD+13*, MOD+14!, ADD+15*, ADD+16!, INACT+14*, INACT+15! |
| MSG | ERRMSG+2~, ERRMSG+3*, ERRMSG+4 |
| PRTFLG | CATUPD+2~, CATUPD+3*, CATUPD+10, SETFLG+2* |
| X | DISTDT+1~, DISTDT+6*, ADD+8*, ADD+9! |
| Y | DISTDT+1~, DISTDT+8, DISTDT+11, ADD+2~, ADD+12, ADD+15 |
| Name | Field # of Occurrence |
|---|---|
| $T(CATS+CATI | CATUPD+7 |