DGPTFJ ;ALB/MRL - JUMP BETWEEN PTF SCREENS ; 12/12/06 9:04am
Source file <DGPTFJ.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 4 | IN^DGHELP Q^DGPTF WR^DGPTF1 NUMACT^DGPTSUF | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| 1 | ;;WR^DGPTF1;'101' Screen--Admission/disposition Transaction | |
| C | ;;EN^DGPTFM7;'MPCR' screen--displays MPCR information | |
| HELP | ||
| M | ;;^DGPTFM;'MAS' screen--surgery/procedure/diagnosis code edits | |
| Q | ||
| PROG | ; | |
| QUES | ||
| 5 | ;;EN^DGPTFM4;'501' Screen--Patient movement transaction | |
| 4 | ;;EN^DGPTFM5;'401' Screen--Surgical/procedure entry | |
| 7 | ;;EN1^DGPTF4;'701' Screen--PDXLS/DRG print | |
| 6 | ;;E^DGPTFM1;'601' Screen--Procedure entry (AVAILABLE FOR DISCHARGES AFTER 10/1/87) | |
| TEST | ||
| 8 | ;;F^DGPTFM2;'801' Screen--CPT entry (CPT and HCPCS) | |
| SA | ;called from input transform on SOURCE OF ADMISSION field (#20) PTF file (#45) | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DGPT - [#45] | SA+1 | 
| Name | Line Occurrences | 
|---|---|
| @( | TEST+5, QUES+1 | 
| HELP | QUES | 
| QUES | TEST, TEST+1 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | SA+1 | 
| ^(101 | SA+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | TEST | 
| >> ANS | TEST+4* | 
| DGANUM | SA+4, SA+5, SA+6, SA+7! | 
| >> DGER | SA+1*, SA+5*, SA+6* | 
| DGPTSCRN | QUES+1! | 
| DGSTATYP | SA+2*, SA+3, SA+7! | 
| >> DGSU0 | SA+1*, SA+5, SA+6 | 
| >> DGSU1 | SA+1*, SA+5, SA+6 | 
| DGSUFNAM | SA+7! | 
| DGSUFNAM( | SA+5, SA+6 | 
| >> DGZP | TEST+3* | 
| I | HELP*, SA+5*, SA+6*, SA+7! | 
| L1 | TEST+5! | 
| M | TEST!, TEST+5! | 
| >> PTF | SA+1 | 
| S | TEST! | 
| T | TEST+5!, HELP* | 
| U | SA+1, SA+6 | 
| >> X | TEST*, TEST+2, TEST+3, TEST+4, QUES* | 
| >> X1 | TEST*, TEST+2, TEST+3, TEST+4 | 
| >> Y | SA+1, SA+2, SA+5, SA+6 | 
| >> Z | TEST*, TEST+1*, TEST+5, QUES+1* | 
| Name | Field # of Occurrence | 
|---|---|
| $T(@$EXTRACT^1;3(1) | QUES+1 | 
| $T(@I | HELP | 
| $T(@X | TEST+1 |