DGPTDD ;ALB/LD - DD calls for Suffix fields of PTF file; 27 May 1995
Source file <DGPTDD.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ACTLST(DGADM) | ;    List of active suffixes | |
| NEXTSCR | ; | |
| NEXTSCRQ | ; | |
| ACTIVE(X,Y,DGADM) | ; Suffix active during patient's admission date? | 
| Name | Field # of Occurrence | 
|---|---|
| ^DIR | NEXTSCR+2 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DGPT - [#45] | ACTIVE+16, ACTLST+11 | 
| ^DIC(45.68 - [#45.68] | ACTIVE+15, ACTIVE+18, ACTIVE+19, ACTIVE+20, ACTIVE+21, ACTLST+15, ACTLST+16, ACTLST+17, ACTLST+18 | 
| ^DIC(45.81 - [#45.81] | ACTIVE+14, ACTLST+13, ACTLST+14, ACTLST+18 | 
| ^TMP("ACTSUFF" | ACTLST+18*, ACTLST+20, ACTLST+22, ACTLST+23! | 
| Name | Line Occurrences | 
|---|---|
| NEXTSCR | ACTLST+21 | 
| NEXTSCRQ | NEXTSCR+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | ACTIVE+16, ACTLST+11 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DGACT | ACTIVE+12~, ACTIVE+13*, ACTIVE+21*, ACTIVE+22 | 
| DGADM | ACTIVE~, ACTIVE+16*, ACTIVE+17*, ACTIVE+18, ACTLST~, ACTLST+11*, ACTLST+12*, ACTLST+15 | 
| DGCTR | ACTLST+9~, ACTLST+10*, ACTLST+18* | 
| DGEFDT | ACTIVE+12~, ACTIVE+13*, ACTIVE+18*, ACTIVE+19*, ACTIVE+20 | 
| DGEFFDT | ACTLST+9~, ACTLST+10*, ACTLST+15*, ACTLST+16*, ACTLST+17 | 
| DGEFFIEN | ACTLST+9~, ACTLST+17*, ACTLST+18 | 
| DGEFIEN | ACTIVE+12~, ACTIVE+13*, ACTIVE+20*, ACTIVE+21 | 
| DGFL | ACTIVE+12~, ACTIVE+13*, ACTIVE+14, ACTIVE+15* | 
| DGI | ACTIVE+12~, ACTIVE+14*, ACTIVE+15, ACTLST+9~, ACTLST+14*, ACTLST+15, ACTLST+16, ACTLST+17, ACTLST+18 | 
| DGOUT | ACTLST+9~, ACTLST+10*, ACTLST+20, ACTLST+22, NEXTSCR+2* | 
| DGST | ACTLST+9~, ACTLST+13*, ACTLST+14, ACTLST+18 | 
| DGSUFPTR | ACTIVE+12~, ACTIVE+13*, ACTIVE+15*, ACTIVE+18, ACTIVE+19, ACTIVE+20, ACTIVE+21 | 
| DGX | ACTLST+9~, ACTLST+20*, ACTLST+22 | 
| DGY | ACTLST+9~, NEXTSCR+1* | 
| DIR | NEXTSCR+2! | 
| DIR(0 | NEXTSCR+2* | 
| DIRUT | NEXTSCR+2! | 
| DT | ACTIVE+17, ACTLST+12 | 
| DTOUT | NEXTSCR+2! | 
| DUOUT | NEXTSCR+2! | 
| IOF | ACTLST+19, NEXTSCR+3 | 
| IOSL | ACTLST+21, NEXTSCR+1 | 
| U | ACTIVE+15, ACTIVE+16, ACTIVE+21, ACTLST+11, ACTLST+18, ACTLST+22 | 
| X | ACTIVE~, ACTIVE+15 | 
| Y | ACTIVE~, ACTIVE+14 |