DICN1 ;SFISC/GFT,TKW,SEA/TOAD-PROCESS DIC("DR") ;10:54 AM 9 Feb 2001 [ 04/02/2003 8:23 AM ]
Source file <DICN1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ||
D | ||
H | ||
IHSGL(X) | ;----- CHECK GL NODE OF TOP LEVEL FILE FOR DUZ(2)
|
|
CKID | ||
RCR | ;
|
|
ASKP001 | ; ask user to confirm new record's .001 field value
; NEW^DICN |
|
Q | ||
BAD | ||
W | ||
N | ; test X as an IEN (apply input transform and numeric restrictions)
; USR^DICN, ASKP001 |
|
ZAP |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | DICN1+29, CKID, CKID+1, ASKP001+7, ASKP001+25, ASKP001+26, ASKP001+50, IHSGL+14, N+3 |
^DD("KEY" - [#.31] | DICN1+24, DICN1+25, DICN1+31 |
^DD("SITE" | ASKP001+20 |
^DIC - [#1] | IHSGL+15 |
^DIC(3 - [#3] | ASKP001+18 |
^VA(200 - [#200] | ASKP001+18 |
Name | Line Occurrences |
---|---|
$$IHSGL | A+6 |
BAD | DICN1+10 |
CKID | DICN1+26, DICN1+29 |
H | W, W+1, ZAP+5, ASKP001+35, ASKP001+54 |
N | ASKP001+27, ASKP001+42 |
W | DICN1+10 |
ZAP | D |
Name | Field # of Occurrence |
---|---|
^("UP" | IHSGL+14 |
^(0 | CKID+1, W, N+3 |
^(1 | ASKP001+18, ASKP001+19, ASKP001+20 |
^(3 | ASKP001+50 |
^(4 | ASKP001+52, ASKP001+54 |
^(9 | CKID+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | DICN1+10~*, DICN1+24, DICN1+28, DICN1+29, CKID, CKID+1*!, RCR+6!*, ASKP001+20*, ASKP001+26*, ASKP001+27* , ASKP001+35! |
%RCR | DICN1+7!, DICN1+34*, W+2* |
%RCR( | DICN1+8* |
%RCR("DIE(""NO^"")" | RCR+2* |
>> %Y | ASKP001+26*, ASKP001+27* |
A1 | W*, W+1*, H!, H+5!, ZAP+5*, ASKP001+35*, ASKP001+54* |
>> D | BAD |
>> DA | DICN1+10, DICN1+35, BAD*, A, A+6 |
>> DD | DICN1+11*, DICN1+13*, DICN1+14*, DICN1+15*, DICN1+18*, DICN1+19*, DICN1+20*, DICN1+21*, DICN1+22*, DICN1+31 , DICN1+33*, CKID+3, CKID+4*, RCR+1 |
>> DDH | H* |
>> DDH( | H* |
>> DDH("ID" | ASKP001+54* |
>> DDS | W, W+1, H, RCR+4, RCR+8, ZAP+5, ASKP001+32, ASKP001+46, ASKP001+51 |
DE | RCR+1! |
DG | RCR+1! |
DIADD | RCR+1! |
DIC | RCR+1!, D, ASKP001+16, ASKP001+43, N+4 |
DIC("DR" | DICN1+22, DICN1+28 |
DIC("W" | A+8 |
DIC(0 | DICN1+15, DICN1+20, DICN1+23, DICN1+32, RCR+1, D, ASKP001+5 |
DICRS | DICN1+7! |
DIDA | DICN1+7! |
>> DIE | RCR+1*, A+6, ZAP, D* |
>> DIE("NO^" | RCR+2, RCR+3*, RCR+4! |
>> DIE("W" | RCR+1*, RCR+4! |
DIENS | RCR+5~, A+6 |
>> DIENTRY | ASKP001+16 |
DIFILEI | RCR+5~, A+6 |
>> DIK | ZAP*, ZAP+5 |
DINDEX | RCR+5~ |
>> DINO01 | DICN1+12 |
>> DINUM | N+3 |
DIOPER | RCR+5~, RCR+6* |
DISAV0 | RCR+1~*, RCR+5~, A+9, ZAP+5, D~* |
DISUBVAL | RCR+6~* |
DISUBVAL( | DICN1+14, DICN1+16!, DICN1+17, DICN1+19 |
DITOP | IHSGL+10~, IHSGL+13*, IHSGL+14*, IHSGL+15 |
DIVAL | RCR+5~ |
DIY | ASKP001+19*, ASKP001+27, ASKP001+35~, ASKP001+54~ |
DO | DICN1+9, BAD+1!, RCR+1!, ASKP001+6, ASKP001+25, ASKP001+55, N+3 |
DO(1 | BAD |
DO(2 | DICN1+14, DICN1+15, DICN1+16, DICN1+17, DICN1+19, DICN1+21, DICN1+24, DICN1+25, DICN1+29, DICN1+31 , CKID, CKID+1, ASKP001+50 |
DO(3 | ASKP001+16, ASKP001+17* |
DQ | RCR+1! |
DR | RCR+1!*, RCR+4 |
>> DS(0 | BAD+1* |
DST | W*, W+1*, H!, H+5!, ZAP+5*, ZAP+7!, ASKP001+25*, ASKP001+28*, ASKP001+33!, ASKP001+35* , ASKP001+50*, ASKP001+52! |
DTIME | ASKP001+33 |
>> DTOUT | A+8, A+10, ASKP001+33*, ASKP001+35 |
>> DUOUT | A+10* |
DUZ | ASKP001+18 |
DUZ(0 | CKID, CKID+1 |
>> DZ | DICN1+9*, RCR+1 |
I | DICN1+11~, DICN1+14*, DICN1+17*, DICN1+18, DICN1+19, DICN1+21, DICN1+24*, DICN1+25, DICN1+32~*, DICN1+33 |
IOSL | RCR+9 |
J | DICN1+11~, DICN1+24*, DICN1+25 |
U | DICN1+9, DICN1+25, DICN1+26, CKID+1, W, ZAP+5, ASKP001+6, ASKP001+18, ASKP001+19, ASKP001+25 , ASKP001+26, ASKP001+33, ASKP001+35, ASKP001+39, ASKP001+55, N+3 |
X | DICN1+11~, DICN1+25*, DICN1+26, RCR+3~, A+6*, A+8, A+9, ASKP001+19*, ASKP001+20*, ASKP001+26* , ASKP001+27*, ASKP001+28, ASKP001+42*, ASKP001+43!, ASKP001+55*, IHSGL~, IHSGL+12, IHSGL+13, N+4, N+5! |
Y | DICN1+7!, DICN1+8*, DICN1+10*, DICN1+11~, DICN1+26*, DICN1+29*, DICN1+35*, BAD!*, BAD+1*, CKID , CKID+1, CKID+2, CKID+3, CKID+4, A+8, A+10, ASKP001+5*, ASKP001+6*, ASKP001+7*, ASKP001+16* , ASKP001+25, ASKP001+26, ASKP001+33*, ASKP001+35*, ASKP001+39*, ASKP001+40*, ASKP001+41, ASKP001+42*, ASKP001+43*, ASKP001+56* , IHSGL+10~, IHSGL+11*, IHSGL+15*, IHSGL+16 |
Y(0 | A*, A+6*, ZAP+7* |
>> ZTQUEUED | H+5 |