Routine: DGPTFJ

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

DGPTFJ ;ALB/MRL - JUMP BETWEEN PTF SCREENS ; 12/12/06 9:04am

Source Information

Source file <DGPTFJ.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Registration	4	IN^DGHELP Q^DGPTF WR^DGPTF1 NUMACT^DGPTSUF

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 9

Package	Total	Caller Graph
Registration	9	DGPTF1 DGPTF41 DGPTFJC DGPTFM DGPTFM2 DGPTFM4 DGPTFM5 DGPTFM6 DGPTFM7

Entry Points

Name	Comments	DBIA/ICR reference
TEST
HELP
QUES
Q
PROG	;
1	;;WR^DGPTF1;'101' Screen--Admission/disposition Transaction
5	;;EN^DGPTFM4;'501' Screen--Patient movement transaction
4	;;EN^DGPTFM5;'401' Screen--Surgical/procedure entry
6	;;E^DGPTFM1;'601' Screen--Procedure entry (AVAILABLE FOR DISCHARGES AFTER 10/1/87)
7	;;EN1^DGPTF4;'701' Screen--PDXLS/DRG print
8	;;F^DGPTFM2;'801' Screen--CPT entry (CPT and HCPCS)
M	;;^DGPTFM;'MAS' screen--surgery/procedure/diagnosis code edits
C	;;EN^DGPTFM7;'MPCR' screen--displays MPCR information
SA	;called from input transform on SOURCE OF ADMISSION field (#20) PTF file (#45)

External References

Name	Field # of Occurrence
IN^DGHELP	TEST
Q^DGPTF	TEST, Q
WR^DGPTF1	QUES+2
NUMACT^DGPTSUF	SA+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"*** Undefined screen number. Valid screens are: ",! Line Location: TEST+1
Function Call: WRITE	Prompt: !!,"PTF Screens are: ",! Line Location: HELP+0
Function Call: WRITE	Prompt: !?5,I,?10,$P(T,";",4) Line Location: HELP+0
Function Call: WRITE	Prompt: !!,"Press Return to continue: " Line Location: QUES+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPT - [#45]	SA+1

Label References

Name	Line Occurrences
@(	TEST+5, QUES+1
HELP	QUES
QUES	TEST, TEST+1

Naked Globals

Name	Field # of Occurrence
^(0	SA+1
^(101	SA+1

Local Variables

Legend:

>>	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*