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: DGPTFVC1

Package: Registration

Routine: DGPTFVC1


Information

DGPTFVC1 ;ALB/AS/ADL - Expanded PTF Close-Out Edits ; 12/14/04 10:34am

Source Information

Source file <DGPTFVC1.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Registration 9 $$GETSTAT^DGMSTAPI  $$SC^DGMTR  $$LST^DGMTU  $$PA^DGMTUTL  $$GETCUR^DGNTAPI  $$ANYSC^DGPTSCAN  NUMACT^DGPTSUF  ($$INACTIVE,$$PTR2CODE)^DGUTL4  
DEM^VADPT  
DRG Grouper 2 $$ICDDX^ICDCODE  $$GETDATE^ICDGTDRG  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGPTFTR  

Entry Points

Name Comments DBIA/ICR reference
SCI
AO
MT
AS
RACETHNC
DGX ;DG*5.3*817/Remove 101-Means Test indicator = 'U' xmit block for FEE BASIS PTF
DP
OP

External References

Name Field # of Occurrence
$$GETSTAT^DGMSTAPI AS+3
$$SC^DGMTR MT+11
$$LST^DGMTU MT+3
$$PA^DGMTUTL MT+9
$$GETCUR^DGNTAPI AS+2
$$ANYSC^DGPTSCAN MT+11
NUMACT^DGPTSUF DGPTFVC1+22, DGPTFVC1+25
$$INACTIVE^DGUTL4 RACETHNC+29
$$PTR2CODE^DGUTL4 RACETHNC+31, RACETHNC+38
$$ICDDX^ICDCODE SCI
$$GETDATE^ICDGTDRG SCI
DEM^VADPT RACETHNC+9
$$FMTE^XLFDT SCI+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"101 MEANS TEST",?23," value 'U' - not valid for discharges as of 7/1/1989",!?42,"per MAS VACO policy"
  • Line Location: DGPTFVC1+14
Function Call: WRITE
  • Prompt: !,"701 VA AUSPICES",?23," value inconsistent for discharge"
  • Line Location: DGPTFVC1+28
Function Call: WRITE
  • Prompt: %," (invalid code)"
  • Line Location: DGPTFVC1+30
Function Call: WRITE
  • Prompt: !,"501 ",X," SCI of ",S0,?23," requires an ICD Diagnosis code beginning with",!?12," or equal to ",DGDX
  • Line Location: SCI+1
Function Call: WRITE
  • Prompt: !,"701 ",$E("TYPE OF DISPOSITION",1,18),?23," value inconsistent for discharge"
  • Line Location: DP+0
Function Call: WRITE
  • Prompt: !,"701 ",$E("OUTPATIENT TREATMENT",1,18),?23," value inconsistent for discharge"
  • Line Location: OP+0
Function Call: WRITE
  • Prompt: !,"701 VA AUSPICES",?23," value inconsistent for discharge"
  • Line Location: OP+1
Function Call: WRITE
  • Prompt: !,"101 AGENT ORANGE LOCATION",?23,"value required if exposure to Agent Orange claimed"
  • Line Location: AO+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMT(408.31 - [#408.31] MT+3
^DGPT - [#45] DGPTFVC1+7, DGPTFVC1+16, MT+2, AO+1
^DIC(45.82 - [#45.82] AO+2
^DIC(8 - [#8] MT+2
^DPT - [#2] DGPTFVC1+16, MT+13, AS, AS+1, AO+3, AO+8

Label References

Name Line Occurrences
AO DGPTFVC1+9
AS MT+3, MT+14
DGX MT, MT+2, MT+7, MT+11, MT+13, MT+14, AS, AS+1, AS+2, AS+3
, AS+4
DP DGPTFVC1+24, DGPTFVC1+25
MT DGPTFVC1+11
OP DGPTFVC1+28
RACETHNC DGPTFVC1+39
SCI DGPTFVC1+16

Naked Globals

Name Field # of Occurrence
^( DGPTFVC1+16, AS, AS+1, AO+3
^(0 DGPTFVC1+7, MT+2, AO+2
^(101 AO+1
^(57 DGPTFVC1+16
^(70 DGPTFVC1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DGPTFVC1+28*, DGPTFVC1+40!, SCI+1*, AO+1*, AO+2*, AO+4
AO AO+7~, AO+9*, AO+11
AOL AO+7~, AO+10*, AO+12
>> DFN DGPTFVC1+7*, DGPTFVC1+16, MT+3, MT+11, MT+13, AS, AS+1, AS+2, AS+3, AO+3
, AO+8
DGANUM DGPTFVC1+23, DGPTFVC1+24, DGPTFVC1+25~, DGPTFVC1+26!
DGDISPO DGPTFVC1+18*, DGPTFVC1+20, DGPTFVC1+24, DGPTFVC1+25, DGPTFVC1+40!
DGDP DGPTFVC1+18*, DGPTFVC1+24*, DGPTFVC1+25*, DGPTFVC1+28*, DGPTFVC1+40!, OP
DGDX DGPTFVC1+16*, DGPTFVC1+40!, SCI, SCI+1
>> DGERR DGPTFVC1+7*, DGPTFVC1+28*, DGPTFVC1+36*, DGPTFVC1+41, SCI+1*, DGX+1*, DP*, OP*, OP+1*, AO+4*
, AO+13*, RACETHNC+34*, RACETHNC+37*, RACETHNC+41*
DGNODE DGPTFVC1+16*, DGPTFVC1+40!, SCI, SCI+1
DGNTARR AS+2~
DGNTARR("NTR" AS+2
>> DGPTFMT AO
>> DGPTTMP SCI*
DGRECSUF DGPTFVC1+18*, DGPTFVC1+24, DGPTFVC1+25, DGPTFVC1+40!
>> DGRTY DGPTFVC1+11, DGPTFVC1+19, DGPTFVC1+28
DGSCI DGPTFVC1+16*, DGPTFVC1+40!, SCI*, SCI+1
DGSTATYP DGPTFVC1+20*, DGPTFVC1+21, DGPTFVC1+22, DGPTFVC1+26!
DGSUFFIX DGPTFVC1+7*, DGPTFVC1+23, DGPTFVC1+35, DGPTFVC1+40!, MT
DGSUFNAM DGPTFVC1+25~, DGPTFVC1+26!
DGSUFNAM( DGPTFVC1+23, DGPTFVC1+24, DGPTFVC1+25
DGT MT+3*, DGX+2!
DGV DGPTFVC1+40!
DGV("E" AO+4*, AO+5, AO+13*
DGV("FEE" DGPTFVC1+7*, DGPTFVC1+11, DGPTFVC1+34
DGV(101 DGPTFVC1+7*, DGPTFVC1+9, MT
DGV(701 DGPTFVC1+7*, DGPTFVC1+18, DGPTFVC1+28, DGPTFVC1+34, MT+3, DP, OP, OP+1
DGVMT MT*, MT+4!, DGX+1, DGX+2!
DGX DGPTFVC1+16*, DGPTFVC1+40!, MT*, MT+2*, MT+4!, MT+5*, MT+7, MT+8*, MT+9*, MT+11*
, MT+13*, MT+14*, AS*, AS+1*, AS+2*, AS+3*, AS+4*, AS+5*, DGX+1, DGX+2!
DGZ AS*, AS+1*, AS+2*, AS+3*, DGX+2!
DGZ1 MT+3*!, MT+5, MT+8, MT+9, DGX+2!
DGZEC MT+2*, MT+11, MT+13, AS+4, DGX+2!
I DGPTFVC1+23*, DGPTFVC1+26!, DGPTFVC1+40!, AO+3*, AO+4
IEN RACETHNC+7~, RACETHNC+24*, RACETHNC+25*, RACETHNC+26, RACETHNC+27
MAX RACETHNC+7~, RACETHNC+12*, RACETHNC+18*, RACETHNC+25
NUM RACETHNC+7~, RACETHNC+23*, RACETHNC+25, RACETHNC+30*
>> PTF DGPTFVC1+6, DGPTFVC1+7, DGPTFVC1+16, SCI, MT+2, MT+11, AO+1
PTRMTHD RACETHNC+7~, RACETHNC+27*, RACETHNC+35, RACETHNC+38
PTRVAL RACETHNC+7~, RACETHNC+26*, RACETHNC+28, RACETHNC+29, RACETHNC+31
REF RACETHNC+7~, RACETHNC+10*, RACETHNC+11, RACETHNC+17, RACETHNC+25, RACETHNC+26, RACETHNC+27
S0 DGPTFVC1+16*, DGPTFVC1+40!, SCI+1
TEXT RACETHNC+7~, RACETHNC+16*, RACETHNC+20*, RACETHNC+33, RACETHNC+36, RACETHNC+40
TMP AO+7~, AO+8*, AO+9, AO+10
TYPE RACETHNC+7~, RACETHNC+13*, RACETHNC+19*, RACETHNC+29, RACETHNC+31
U DGPTFVC1+34, SCI, MT+2, MT+5, MT+8, MT+9, MT+11, MT+13, AS, AS+1
, AS+2, AS+3, AS+4
VADM RACETHNC+8~
VADM( RACETHNC+25, RACETHNC+26, RACETHNC+27
VALIDMTH RACETHNC+8~, RACETHNC+15*, RACETHNC+22*, RACETHNC+39
VALIDVAL RACETHNC+8~, RACETHNC+14*, RACETHNC+21*, RACETHNC+32
VALUE RACETHNC+8~, RACETHNC+31*, RACETHNC+32, RACETHNC+38*, RACETHNC+39
X DGPTFVC1+40!, SCI*, SCI+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All