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 |