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 |