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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABMAUDRP

Package: Third Party Billing

Routine: ABMAUDRP


Information

ABMAUDRP ; IHS/SD/SDR - TM Audit report - 8/19/2005 1:28:34 PM

Source Information

Source file <ABMAUDRP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Third Party Billing 4 ^ABMDRDBQ  PAZ^ABMDRUTL  ($$CDT,$$SDT)^ABMDUTL  $$EN^ABMVDF  
VA Fileman 2 ^DIC  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
FILES ;
LOC ;EP
COMPUTE ;
HDR ;
PARM ;
; Choose additional exclusion parameters
CHK
WHD ;EP for writing Report Header
XIT ;
HD
OUTPUT ;
DT ;EP
SEL
LOOP ;
; Display current exclusion parameters
HDB

External References

Name Field # of Occurrence
^ABMDRDBQ SEL+5
PAZ^ABMDRUTL HD
$$CDT^ABMDUTL OUTPUT+14
$$SDT^ABMDUTL HDR+5, HDR+6
$$EN^ABMVDF WHD+1
^DIC LOC+5
^DIR PARM+6, DT+8, DT+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"EXCLUSION PARAMETERS Currently in Effect for RESTRICTING the EXPORT to:",!?3,"======================================================================="
  • Line Location: LOOP+4
Function Call: WRITE
  • Prompt: !?3,"- Visit Location.....: ",$P(^DIC(4,ABMY("LOC"),0),"^",1)
  • Line Location: LOOP+5
Function Call: WRITE
  • Prompt: !?3,"- Edit Date Range....:"
  • Line Location: LOOP+6
Function Call: WRITE
  • Prompt: " to: "
  • Line Location: LOOP+7
Function Call: WRITE
  • Prompt: " (cont)"
  • Line Location: OUTPUT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: LOC+1
Function Call: WRITE
  • Prompt: !!," ============ Entry of ",Y," Range =============",!
  • Line Location: DT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DT+11
Function Call: WRITE
  • Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than than the End Date, TRY AGAIN!",!!
  • Line Location: DT+17
Function Call: WRITE
  • Prompt: $$EN^ABMVDF("IOF"),!
  • Line Location: WHD+1
Function Call: WRITE
  • Prompt: ?($S($D(ABM(132)):34,1:8)),"WARNING: Confidential Patient Information, Privacy Act Applies",!
  • Line Location: WHD+2
Function Call: WRITE
  • Prompt: ABM("LINE"),!
  • Line Location: WHD+3
Function Call: WRITE
  • Prompt: ABM("HD",0),?$S($D(ABM(132)):108,1:57)
  • Line Location: WHD+4
Function Call: WRITE
  • Prompt: Y," Page ",ABM("PG")
  • Line Location: WHD+4
Function Call: WRITE
  • Prompt: !,ABM("LINE")
  • Line Location: WHD+7
Function Call: WRITE
  • Prompt: !,"Date/Time",?17,"User",?35,"Old Value",?58,"New Value"
  • Line Location: HDB+1
Function Call: WRITE
  • Prompt: !,ABM("LINE")
  • Line Location: HDB+2
Routine Call
  • DIC
  • Line Location:
    • LOC+5
Routine Call
  • DIR
  • Line Location:
    • PARM+6
    • DT+8
    • DT+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( OUTPUT+8
^DD("DD" WHD+4
^DIA - [#1.1] COMPUTE+8, COMPUTE+10, COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14
^DIC - [#1] OUTPUT+8
^DIC(4 - [#4] LOOP+5, HDR+1
^TMP($J COMPUTE+2!, COMPUTE+15*, OUTPUT+3, OUTPUT+5, OUTPUT+10, OUTPUT+12, OUTPUT+16, OUTPUT+17, OUTPUT+18!
^VA(200 - [#200] OUTPUT+15

Label References

Name Line Occurrences
@( PARM+9
CHK HDR+1, HDR+4, HDR+5, HDR+6
DT DT+9, DT+15, DT+17
HD OUTPUT+13
HDB OUTPUT+1
LOOP SEL, PARM+9
WHD HDB
XIT LOOP+3, PARM+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM ABMAUDRP+8!
ABM("CONJ" HDR+1*, HDR+3*, HDR+5*, HDR+6*, CHK, CHK+1
ABM("HD" SEL+1*, WHD+4, WHD+5, WHD+6, CHK*, CHK+1*
ABM("LINE" WHD+3!*, WHD+7!, HDB+2*!
ABM("LVL" SEL+2*, CHK, CHK+1*
ABM("PG" WHD+4, HDB*
ABM("PRIVACY" WHD+2
ABM("RTYP" ABMAUDRP+9*, ABMAUDRP+10*
ABM("SUBR" COMPUTE+1*
ABM("TXT" HDR+1*, HDR+4*, HDR+5*, HDR+6*, CHK, CHK+1
ABM(132 WHD+2, WHD+3, WHD+4, CHK
>> ABMADT OUTPUT+2*
>> ABMAIEN COMPUTE+9*, COMPUTE+10*, COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14
>> ABMCNT COMPUTE+3*
>> ABMEDT COMPUTE+6*, COMPUTE+7*, COMPUTE+8
>> ABMFIELD COMPUTE+5*, COMPUTE+11, COMPUTE+15, OUTPUT+2*, OUTPUT+4*, OUTPUT+5*, OUTPUT+7, OUTPUT+8, OUTPUT+9, OUTPUT+10
, OUTPUT+12, OUTPUT+16, OUTPUT+17
>> ABMFILE COMPUTE+4*, COMPUTE+8, COMPUTE+10, COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14, COMPUTE+15, OUTPUT+2*, OUTPUT+3*
, OUTPUT+5, OUTPUT+8, OUTPUT+10, OUTPUT+12, OUTPUT+16, OUTPUT+17
>> ABMNEW COMPUTE+14*, COMPUTE+15, OUTPUT+2*
>> ABMOLD COMPUTE+13*, COMPUTE+15, OUTPUT+2*
>> ABMQ("NS" SEL+3*
>> ABMQ("RC" SEL+3*
>> ABMQ("RP" SEL+4*
>> ABMQ("RX" SEL+3*
>> ABMSDT COMPUTE+6*, COMPUTE+7*, COMPUTE+8*, COMPUTE+10, COMPUTE+15, OUTPUT+6*, OUTPUT+10*, OUTPUT+12, OUTPUT+14, OUTPUT+16
, OUTPUT+17
>> ABMSEL COMPUTE+3*, COMPUTE+4, COMPUTE+5
>> ABMSFLD OUTPUT+4*, OUTPUT+7, OUTPUT+9*
>> ABMUSER COMPUTE+12*, COMPUTE+15, OUTPUT+2*, OUTPUT+11*, OUTPUT+12*, OUTPUT+15, OUTPUT+16, OUTPUT+17
ABMY ABMAUDRP+8!
ABMY("DT" LOOP+6, LOOP+7, COMPUTE+6, DT+1!, DT+3*, DT+10*, DT+16*, DT+17, HDR+2, HDR+5
, HDR+6
ABMY("I" XIT+1!
ABMY("LOC" LOOP+5, LOC+1!, LOC+7*, HDR+1
ABMY("X" LOOP+2*, LOOP+7, XIT+1!
DIC LOC+1!, LOC+2*, LOC+5!
DIC("A" LOC+4*
DIC(0 LOC+3*
DIR PARM+2!, PARM+7!, DT+1!, DT+14!, XIT+1!
DIR("?" PARM+5*
DIR("A" PARM+4*, DT+6*, DT+12*
DIR(0 PARM+3*, DT+7*
>> DIROUT SEL, LOOP+3, PARM+8, OUTPUT+3, OUTPUT+5, OUTPUT+10, OUTPUT+12, OUTPUT+13, HD
>> DIRUT PARM+8, DT+2, DT+9, DT+15
DT WHD+4
>> DTOUT SEL, LOOP+3, OUTPUT+3, OUTPUT+5, OUTPUT+10, OUTPUT+12, OUTPUT+13, HD
>> DUOUT SEL, LOOP+3, OUTPUT+3, OUTPUT+5, OUTPUT+10, OUTPUT+12, OUTPUT+13, HD
IOSL OUTPUT+13
U COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14, OUTPUT+8, OUTPUT+15, OUTPUT+16, OUTPUT+17, HDR+1
>> X LOOP+7*
>> Y PARM+9, LOC+6, LOC+7, DT+4*, DT+5, DT+6, DT+10, DT+16, WHD+4*

Marked Items

Name Field # of Occurrence
$T(FILES+ABMCNT COMPUTE+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All