Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGPTTS

Package: Registration

Routine: DGPTTS


Information

DGPTTS ;ALB/AS/ADL - UPDATE FACILITY TREATING SPECIALTY/501 MOVEMENTS IN PTF ; 1/30/90 @12

Source Information

Source file <DGPTTS.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Registration 6 BS^DGPTFM6  MSG^DGPTMSG1  VARS^DGPTSUDO  EV^DGPTTS0  ^DGPTTS1  EN^DGPTTS3  
DRG Grouper 2 $$ICDDX^ICDCODE  $$GETDATE^ICDGTDRG  
VA Fileman 2 ^DIE  ^DIK  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Registration 4 DGPM TREATING SPECIALTY EVENT  DGPTF  DGPTTS0  DGPTUTL  
Integrated Billing 2 IB20PT82  IB20PT86  

Entry Points

Name Comments DBIA/ICR reference
Q
LE ;entry point for PTF record update
NOTS ;
CA ; -- determine CA info
NTR
DEL1
DEL ;facility treating specialty has been deleted from ^DGPM
EV ;entry point from event driver
DGDT ; -- get first ts before dc date

External References

Name Field # of Occurrence
BS^DGPTFM6 LE+8
MSG^DGPTMSG1 DEL+12, DEL1+1, NTR+1
VARS^DGPTSUDO LE+6
EV^DGPTTS0 EV+1
^DGPTTS1 LE+6
EN^DGPTTS3 LE+9
^DIE DEL1+4, DEL1+7, LE+8, NOTS+1, NOTS+2
^DIK DEL+3
$$ICDDX^ICDCODE DEL+4
$$GETDATE^ICDGTDRG DEL+4
$$FMTE^XLFDT DEL1, NTR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Updating PTF Record #",PTF,"..."
  • Line Location: LE+2
Function Call: WRITE
  • Prompt: "completed."
  • Line Location: LE+9
Routine Call
  • DIE
  • Line Location:
    • DEL1+4
    • DEL1+7
    • LE+8
    • NOTS+1
    • NOTS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DEL+11
^DGPM - [#405] LE+4, CA+2
^DGPM("ATS" LE+4, DGDT+2
^DGPT - [#45] DEL+2, DEL1+3, DEL1+6, LE+8, NOTS+2
^DIC(42.4 - [#42.4] DEL+11
^DPT - [#2] DEL+11, DEL1
^UTILITY("DGPM" DEL+1
^UTILITY($J DEL+5*, DEL+9*, LE+3!, LE+7!
^VA(200 - [#200] DEL+11, DEL1

Label References

Name Line Occurrences
DEL1 DEL+2, DEL+5
NOTS LE+5

Naked Globals

Name Field # of Occurrence
^(0 DEL+3, LE+4, CA+2
^(300 DEL+3, DEL1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT LE+7!
A LE+7!
ADM LE+7!
B LE+7!
C LE+7!
D LE+7!
DA DEL+3!*, DEL1+4*, DEL1+7*, DEL1+8!, LE+7!, LE+8*, Q!, NOTS+1*, NOTS+2*
DA(1 DEL+3*, DEL1+4*, DEL1+7*, LE+8*, NOTS+1*, NOTS+2*
>> DFN DEL+11, DEL1, LE+4, DGDT+2
>> DG1 DEL+7*, DEL+8*, DEL+9
DGAD LE+7!
>> DGADM CA+2*
DGDEL LE+7!
DGDR LE+7!
DGDT LE+4*, LE+6, Q!, DGDT+1
DGDT1 LE+7!
DGEX DEL+3*, DEL+8, DEL1+8!
DGI DEL+10!
DGMOVM LE+8, Q!
DGMSG DEL+4*, DEL+5, DEL+11*, DEL1*, Q!, NTR*
>> DGMSG1 DEL+12*, DEL1+1*, NTR+1*
>> DGMV DEL+1
>> DGMVA NTR
>> DGMVP DEL1
>> DGMVT CA+2*
DGP0 Q!
>> DGPMA CA+1, CA+2
>> DGPMAN LE+4, CA+2*
>> DGPMCA LE+4, DGDT+2, CA+1*, CA+2
>> DGPMP CA+1, CA+2
DGPREV LE+4*, LE+5, LE+6, Q!, DGDT+2*
DGPTFP DEL+1*, DEL+2, DEL+3, DEL+5, DEL+9, DEL1+3, DEL1+6, DEL1+8!
>> DGPTTMP DEL+4*
>> DGQUIET LE+2, LE+9
DGREC DEL+3*, DEL+4, DEL+11, DEL1+3*, DEL1+6*, DEL1+8!, LE+7!, Q!
DGTEMP LE+7!
DGTLOS LE+7!
DGTNX LE+7!
DGTPR LE+7!
DGTR LE+7!
DIC LE+7!, Q!
DIE DEL1+4*, DEL1+8!, LE+7!, LE+8*, Q!, NOTS+1*, NOTS+2*
>> DIK DEL+3*
DIS LE+7!
DR DEL1+3*, DEL1+4, DEL1+6*, DEL1+7, DEL1+8!, LE+7!, LE+8*, Q!, NOTS+1*, NOTS+2*
DUZ DEL+11, DEL1
I LE+7!
I1 LE+7!
J LE+7!
L LE+7!
L1 LE+7!
L2 LE+7!
LL LE+7!
LOL LE+7!
LOP LE+7!
MN LE+7!
NOW LE+7!
NTR LE+7!
NX LE+7!
NXX LE+7!
PR LE+7!
>> PTF DEL+2, DEL+3, DEL+4, DEL1, DEL1+3, DEL1+4, DEL1+6, DEL1+7, LE+2, LE+8
, NTR, NOTS+1, NOTS+2, CA+2*
PTN LE+7!
T LE+7!
T( LE+6*
T1 LE+7!
T2 LE+7!
TD LE+7!
TDD LE+7!
TRN LE+7!
U DEL+4, DEL+8, DEL+9, DEL+11, DEL1, DEL1+3, DEL1+6
V Q!
X DEL+4*, DEL+8*, DEL1*, DEL1+3*, DEL1+6*, DEL1+8!, Q!, DGDT+1~*, DGDT+2
X1 LE+7!
X2 LE+7!
Y DEL+11*, DEL1+8!, LE+7!, Q!
Z LE+7!
>> ZTQUEUED LE+2, LE+9
ZTSK LE+7!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All