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 |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DG53683P

Package: Registration

Routine: DG53683P


Information

DG53683P ;ALB/DHH - Add NURSING HOME TREATING SPECIALTIES ; 11/01/05

Source Information

Source file <DG53683P.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 ^DIC  ^DIE  
Kernel 1 (BMES,MES)^XPDUTL  
Registration 1 $$ACTIVE^DGACT  

Entry Points

Name Comments DBIA/ICR reference
EN ;Add Treating Specialties to the SPECIALITY file (#42.4)
TSPEC ;Add treating specialty to SPECIALTY File (#42.4)
FAC ;Add treating specialty to Facility Treating Specialty file (#45.7)
MULT ;Add Effective Date
INACT80 ;inactivate code 80
INACT ;inactivate mental health codes
EDIT ;Edit treating specialties
TRSP ;PTF code^Speciality^Print Name^Service^Ask Psych^Billing Bedsection^CDR^^Ques#
ETRSP ;;PTF code^Speciality^Print Name^Service^Ask Psych^Billing Bedsection^CDR

External References

Name Field # of Occurrence
$$ACTIVE^DGACT EDIT+21
^DIC TSPEC+9, FAC+6, MULT+6, INACT80+7, INACT80+31, INACT+8, INACT+29
^DIE TSPEC+25, FAC+19, MULT+12, INACT80+16, INACT80+37, INACT+14, INACT+35, EDIT+9, EDIT+24
BMES^XPDUTL TSPEC+1, FAC+8, FAC+10, FAC+14, INACT80+9, INACT80+10, INACT80+11, INACT80+12, INACT80+13, INACT80+21
INACT80+33, INACT80+34, INACT+10, INACT+11, INACT+19, INACT+31, INACT+32, EDIT+10, EDIT+11, EDIT+12
EDIT+23, EDIT+28
MES^XPDUTL TSPEC+12, TSPEC+13, TSPEC+16, TSPEC+17, TSPEC+20, TSPEC+21, FAC+11, FAC+12, FAC+15, MULT+8
MULT+9, INACT80+22, INACT80+23, INACT+20, INACT+21

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42.4 - [#42.4] Classic Fileman Calls
^DIC(45.7 - [#45.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( MULT+4
^DD(42.4 INACT80+5, INACT+6
^DIC(45.7 - [#45.7] INACT80+24, INACT80+26, INACT+22, INACT+24, EDIT+19, EDIT+23, EDIT+27

Label References

Name Line Occurrences
EDIT EN+8
FAC EN+6
INACT EN+9
INACT80 EN+9
MULT TSPEC+29, FAC+23
TSPEC EN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT EDIT+13~, EDIT+19*, EDIT+20, EDIT+21*
DA TSPEC+2~, TSPEC+24*, FAC+1~, FAC+17*, MULT+1~, MULT+7*, INACT80+1~, INACT80+8*, INACT80+32*, INACT+1~
INACT+9*, INACT+30*, EDIT+7*, EDIT+22*
DA(1 MULT+2*, INACT80+3*, INACT80+28*, INACT+4*, INACT+26*
DAA INACT80+24~*, INACT80+26, INACT80+27, INACT80+28, INACT+22~*, INACT+24, INACT+25, INACT+26
DGDA1 TSPEC+2~, TSPEC+10*, FAC+7*, FAC+8, FAC+9, FAC+14, FAC+17, FAC+22, MULT+2
DGERR EN+1~, TSPEC+3*, TSPEC+18*, EDIT+6*, EDIT+17*
DGFILE TSPEC+2~, TSPEC+26*, FAC+1~, FAC+20*, MULT+4
DGI EN+1~, EN+3*, EDIT+2~, EDIT+5*, EDIT+13~, EDIT+16*
DGIFN EN+1~, EN+2*, TSPEC+10*, TSPEC+11, TSPEC+15, TSPEC+20, TSPEC+24, TSPEC+28
DGII EDIT+13~, EDIT+19*
DGMULT TSPEC+2~, TSPEC+27*, FAC+1~, FAC+21*, MULT+4
DGQUES EN+1~, EN+5*
DGSP EDIT+13~, EDIT+18*, EDIT+19
DGSPEC EN+1~, EN+3*, EN+5, TSPEC+1, TSPEC+6, TSPEC+7, TSPEC+15, TSPEC+23, FAC+5, FAC+9
FAC+18, EDIT+5*, EDIT+7, EDIT+8, EDIT+12, EDIT+13~, EDIT+16*, EDIT+18, EDIT+22, EDIT+23
EDIT+28
DGSPEC1 EDIT+13~, EDIT+19*, EDIT+21, EDIT+22, EDIT+23, EDIT+27
DIC TSPEC+2~, TSPEC+4*, TSPEC+22, TSPEC+28*, FAC+1~, FAC+2*, FAC+16, FAC+22*, MULT+10, INACT80+2*
INACT80+14, INACT80+27*, INACT80+35, INACT+3*, INACT+12, INACT+25*, INACT+33
DIC("P" MULT+4*, INACT80+5*, INACT+6*
DIC(0 TSPEC+5*, FAC+3*, MULT+3*, INACT80+4*, INACT80+29*, INACT+5*, INACT+27*, EDIT+4*, EDIT+15*
DIE TSPEC+2~, TSPEC+22*, FAC+1~, FAC+16*, MULT+1~, MULT+10*, INACT80+1~, INACT80+14*, INACT80+25~, INACT80+35*
INACT+1~, INACT+12*, INACT+23~, INACT+33*, EDIT+2~, EDIT+3*, EDIT+13~, EDIT+14*
DINUM TSPEC+2~, TSPEC+6*
DLAYGO TSPEC+2~, TSPEC+8*, FAC+1~, FAC+4*
DR TSPEC+2~, TSPEC+23*, FAC+1~, FAC+18*, MULT+1~, MULT+11*, INACT80+1~, INACT80+15*, INACT80+25~, INACT80+36*
INACT+1~, INACT+13*, INACT+23~, INACT+34*, EDIT+2~, EDIT+8*, EDIT+13~, EDIT+22*
DS EDIT+2~, EDIT+13~
MHCD INACT+1~, INACT+2*, INACT+3, INACT+4, INACT+10, INACT+11, INACT+21, INACT+22
TS INACT80+25~*, INACT80+26*, INACT80+33, INACT80+34, INACT+23~*, INACT+24*, INACT+31, INACT+32, EDIT+26*, EDIT+27*
EDIT+28
U EN+5, TSPEC+1, TSPEC+6, TSPEC+7, TSPEC+15, TSPEC+20, TSPEC+23, FAC+5, FAC+9, FAC+14
FAC+18, EDIT+7, EDIT+8, EDIT+12, EDIT+18, EDIT+22, EDIT+23, EDIT+28
X TSPEC+2~, TSPEC+7*, FAC+1~, FAC+5*, MULT+5*, INACT80+1~, INACT80+6*, INACT80+25~, INACT80+30*, INACT+1~
INACT+7*, INACT+23~, INACT+28*
Y TSPEC+2~, TSPEC+10, FAC+1~, FAC+7, MULT+7, MULT+8, INACT80+8, INACT80+12, INACT80+32, INACT80+33
INACT+9, INACT+10, INACT+30, INACT+31
Y(0 FAC+9

Marked Items

Name Field # of Occurrence
$T(ETRSP+DGI EDIT+5, EDIT+16
$T(TRSP+DGI EN+3
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All