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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ABMDE5A

Package: Third Party Billing

Routine: ABMDE5A


Information

ABMDE5A ; IHS/ASDST/DMJ - PAGE 5A - DIAGNOSIS PART 2 ;

Source Information

Source file <ABMDE5A.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Third Party Billing 6 $$DX^ABMCVAPI  SUM^ABMDE1  ^ABMDERR  ^ABMDVST1  ^ABMDVST3  ^ABMDWRAP  
VA Fileman 3 ^DIE  $$GET1^DIQ  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
CONT
POV ;
DD ;
REFRESH ;EP
V1 ; view
XIT
IND ;EP
CAUSE ;
POC ;
MOD

External References

Name Field # of Occurrence
$$DX^ABMCVAPI POV+6, POV+7, POV+20, POV+25, POV+47, POC+2
SUM^ABMDE1 ABMDE5A+13
^ABMDERR ABMDE5A+32
^ABMDVST1 REFRESH+25
^ABMDVST3 REFRESH+26
^ABMDWRAP POV+21, POV+31, POV+37, POV+43
^DIE IND+7
$$GET1^DIQ POV+14, POV+17, POV+26, POV+28, POV+32, POV+34, POV+38, POV+40
^DIR REFRESH+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?13,"***** DIAGNOSIS INFORMATION ENTERED THROUGH PCC *****"
  • Line Location: ABMDE5A+15
Function Call: WRITE
  • Prompt: !,"PRI",?4,"ICD CD",?12,"IND"
  • Line Location: ABMDE5A+17
Function Call: WRITE
  • Prompt: ?18,"PROVIDER'S NARRATIVE",?57,"CAUSE OF INJURY"
  • Line Location: ABMDE5A+21
Function Call: WRITE
  • Prompt: ?19,"PROVIDER'S NARRATIVE",?57,"CAUSE OF INJURY"
  • Line Location: ABMDE5A+22
Function Call: WRITE
  • Prompt: !,"===",?4,"=======",?12,"==="
  • Line Location: ABMDE5A+24
Function Call: WRITE
  • Prompt: ?11,"==================================",?49,"=============================="
  • Line Location: ABMDE5A+28
Function Call: WRITE
  • Prompt: ?16,"================================",?49,"=============================="
  • Line Location: ABMDE5A+29
Function Call: WRITE
  • Prompt: *7,!," There are no PCC visits to view."
  • Line Location: ABMDE5A+31
Function Call: WRITE
  • Prompt: *7,!," There are no PCC Purpose of Visits to view."
  • Line Location: V1+2
Function Call: WRITE
  • Prompt: !,$S($P(ABMA(0),U,12)="P":" P",1:" S")
  • Line Location: POV+5
Function Call: WRITE
  • Prompt: ?4,$P($$DX^ABMCVAPI($P(ABMA(0),U),ABMP("VDT")),U,2)
  • Line Location: POV+6
Function Call: WRITE
  • Prompt: ?13,$J($S($P($$DX^ABMCVAPI($P(ABMA(0),U),ABMP("VDT")),U,20)=30:"10",1:"9"),"2R")
  • Line Location: POV+7
Function Call: WRITE
  • Prompt: !?11,"(Modifier: ",ABMA("Y0"),")"
  • Line Location: DD+1
Function Call: WRITE
  • Prompt: !?20,"(Modifier: ",ABMA("Y0"),")"
  • Line Location: DD+2
Function Call: WRITE
  • Prompt: !?11,"(Cause of Dx: ",ABMA("Y0"),")"
  • Line Location: CAUSE+4
Function Call: WRITE
  • Prompt: !?20,"(Cause of Dx: ",ABMA("Y0"),")"
  • Line Location: CAUSE+5
Function Call: WRITE
  • Prompt: !?20,"(Place of Occurrence: ",ABMA("Y0"),")"
  • Line Location: POC+2
Function Call: WRITE
  • Prompt: !!,"There aren't any visits associated with this claim to refresh from"
  • Line Location: REFRESH+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: REFRESH+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: IND+3
Routine Call
  • DIE
  • Line Location:
    • IND+7
Routine Call
  • DIR
  • Line Location:
    • REFRESH+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVPOV - [#9000010.07] GET1^DIQ
^ABMDCLM - [#9002274.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDCLM - [#9002274.3] ABMDE5A+30, REFRESH+2, REFRESH+14!, REFRESH+15!, REFRESH+16*, REFRESH+17*, REFRESH+22, IND+9, IND+10
^ABMDPARM( ABMDE5A+18, ABMDE5A+25, POV+9, POV+11
^ABMNINS( IND+11
^AUPNVPOV - [#9000010.07] POV+1, POV+3
^AUPNVPOV("AD" V1+1
^AUPNVSIT - [#9000010] REFRESH+23
^DD(9000010.07 DD+2, CAUSE+5
^ICD9 - [#80] POV+20

Label References

Name Line Occurrences
CAUSE MOD
CONT POC+1
POC CAUSE+2
POV V1+1
V1 ABMDE5A+30
XIT ABMDE5A+33

Naked Globals

Name Field # of Occurrence
^(0 POV+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABMA ABMDE5A+30*, V1+1, XIT!
ABMA("C" ABMDE5A+14*, V1+2, POV+4*
ABMA("D" ABMDE5A+14*
ABMA("I" ABMDE5A+30*, ABMDE5A+31
ABMA("J" V1+1*
ABMA("V" V1+1*, POV+1, POV+3, POV+14, POV+17, POV+26, POV+28, POV+32, POV+34, POV+38
, POV+40
ABMA("Y" MOD+1*, DD+2, CAUSE+3*, CAUSE+5
ABMA("Y0" DD+2*, CAUSE+5*, POC+2*
ABMA(0 POV+1*, POV+5, POV+6, POV+7, POV+9, POV+20, POV+24, POV+25, POV+46, POV+47
, MOD, MOD+1, CAUSE+2, CAUSE+3, POC+1, POC+2
ABMA(11 POV+3*
>> ABMCHV0 REFRESH+23*, REFRESH+24
>> ABMCHVDT REFRESH+24*
>> ABMIDONE REFRESH+19*
>> ABMP("BTYP" ABMDE5A+18, ABMDE5A+25, POV+9, POV+11
>> ABMP("CDFN" ABMDE5A+30, REFRESH+2, REFRESH+14, REFRESH+15, REFRESH+16, REFRESH+17, REFRESH+22, IND+6, IND+9, IND+10
>> ABMP("ICD10" IND+8!, IND+9*, IND+10*, IND+11*
>> ABMP("INS" IND+11
>> ABMP("LDFN" ABMDE5A+18, ABMDE5A+25, POV+9, POV+11, IND+11
>> ABMP("V0" REFRESH+23*
>> ABMP("VDT" POV+6, POV+7, POV+20, POV+25, POV+47, POC+2, IND+9, IND+10
>> ABMSVDFN REFRESH+20*, REFRESH+27
ABMU POV+10!, POV+23!
ABMU("LM" POV+14*, POV+17*, POV+29*, POV+35*, POV+41*
ABMU("RM" POV+14*, POV+17*, POV+30*, POV+36*, POV+42*
ABMU("TXT" POV+14*, POV+17*, POV+28*, POV+34*, POV+40*
ABMU(1 POV+20*
>> ABMVDFN REFRESH+20, REFRESH+21*, REFRESH+22*, REFRESH+23, REFRESH+27*
>> ABMZ("TITL" ABMDE5A+13*
DA REFRESH+4!, IND+2!, IND+6*
DIC REFRESH+4!, IND+2!
DIE REFRESH+4!, IND+2!, IND+4*
DIR REFRESH+4!, REFRESH+12!, IND+2!
DIR("A" REFRESH+6*, REFRESH+7*, REFRESH+8*, REFRESH+9*
DIR("B" REFRESH+10*
DIR(0 REFRESH+5*
>> DR IND+5*
DUZ(2 ABMDE5A+30, REFRESH+2, REFRESH+14, REFRESH+15, REFRESH+16, REFRESH+17, REFRESH+22, IND+9, IND+10
U ABMDE5A+18, ABMDE5A+25, POV+1, POV+5, POV+6, POV+7, POV+9, POV+11, POV+20, POV+24
, POV+25, POV+46, POV+47, MOD, MOD+1, DD+2, CAUSE+2, CAUSE+3, CAUSE+5, POC+1
, POC+2, REFRESH+24, IND+9, IND+10, IND+11
X REFRESH+4!, IND+2!
Y REFRESH+4!, REFRESH+13, IND+2!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All