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 |  All
Print Page as PDF
Routine: ABPVPCC3

Package: Third Party Tracking

Routine: ABPVPCC3


Information

ABPVPCC3 ;PRINT PRIVATE INSURANCE ELIG O/P VISIT REPORT; [ 06/02/91 12:53 PM ]

Source Information

Source file <ABPVPCC3.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Uncategorized 1 ^%AUCLS  

Entry Points

Name Comments DBIA/ICR reference
A
NAME
SUMRY
PVTINS
CHART
A1
START
INIT
PRINT
CLOSE
XTRACT
HEADING
INSPRT

External References

Name Field # of Occurrence
^%AUCLS HEADING+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: A("PDT"),?80-$L(TITLE1)\2,TITLE1,?73,"page ",ABPV("PG"),!
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: TME
  • Line Location: HEADING+4
Function Call: WRITE
  • Prompt: ?80-$L(X),X,!
  • Line Location: HEADING+4
Function Call: WRITE
  • Prompt: ?80-$L(TITLE2)\2,TITLE2,!,?80-$L(TITLE3)\2,TITLE3,!
  • Line Location: HEADING+5
Function Call: WRITE
  • Prompt: ?80-$L(TITLE4)\2,TITLE4
  • Line Location: HEADING+6
Function Call: WRITE
  • Prompt: !!," D.O.S.",?10,"SVCS",?16,"PATIENT NAME",?38,"CHART #",?47
  • Line Location: HEADING+7
Function Call: WRITE
  • Prompt: "INSURANCE CARRIER(S)",!
  • Line Location: HEADING+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEADING+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+9
Function Call: WRITE
  • Prompt: !,ABPV("DOS")
  • Line Location: A+2
Function Call: WRITE
  • Prompt: ?11,A("SVCS"),?16,A("NAME"),?38,$J(A("CHART"),7)
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: ?47,"***** INCOMPLETE *****"
  • Line Location: INSPRT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: INSPRT+0
Function Call: WRITE
  • Prompt: ?47,"***** INCOMPLETE *****"
  • Line Location: INSPRT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: INSPRT+1
Function Call: WRITE
  • Prompt: ?47,$P(^AUTNINS(A("PTR"),0),"^",1)
  • Line Location: INSPRT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: INSPRT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMRY+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUMRY+0
Function Call: WRITE
  • Prompt: !!,"TOTAL PCC VISITS FOR THIS PERIOD: ",$J(ABPV("TOTAL"),6)
  • Line Location: SUMRY+3
Function Call: WRITE
  • Prompt: !,"VISITS WITH THIRD PARTY COVERAGE: ",$J(ABPV("HITS"),6)
  • Line Location: SUMRY+4
Function Call: WRITE
  • Prompt: !,"PERCENTAGE PRIVATE INS. COVERAGE: ",$J(ABPV("%"),6,1),"%"
  • Line Location: SUMRY+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLOSE+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" CLOSE
^%ZTSK - [#14.4] A, A1, A1+1
^AUPNPAT - [#9000001] CHART, CHART+1
^AUPNPRVT - [#9000006] PVTINS
^AUTNINS - [#9999999.18] INSPRT+1, INSPRT+2
^DD("DD" INIT+3, INIT+4
^DIC(4 - [#4] INIT
^DPT - [#2] NAME, NAME+1

Label References

Name Line Occurrences
A A1
A1 PVTINS+2
CHART NAME
CLOSE START
HEADING START, A+2, INSPRT, INSPRT+1, INSPRT+2
INIT START
INSPRT PVTINS, PVTINS+1
PRINT CHART
SUMRY START
XTRACT START

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A CLOSE!
A("ADFN" A+2*, A1*, A1+1, NAME, NAME+1, CHART, CHART+1, PVTINS
A("ADOS" XTRACT*, A*, A+1, A+2, A1, A1+1
A("BEG" INIT+3*, INIT+5
A("CHART" CHART*, CHART+1*, PRINT
A("END" INIT+4*, INIT+5
A("HR" HEADING+1*, HEADING+2
A("MIN" HEADING+1*, HEADING+2*
A("NAME" NAME*, NAME+1*, PRINT
A("PDT" INIT+6*, HEADING+3
A("PRT" PVTINS+1*
A("PTR" PVTINS*, INSPRT, INSPRT+1, INSPRT+2
A("SVCS" A1+1*, PRINT
A("TM" HEADING+1*
ABPV CLOSE!
ABPV("%" SUMRY+1*, SUMRY+2*, SUMRY+5
ABPV("BEG" INIT+3, XTRACT
ABPV("DOS" A+2*
ABPV("END" INIT+4, A+1
ABPV("HITS" SUMRY+2, SUMRY+4
ABPV("PG" INIT*, HEADING*, HEADING+3
ABPV("SITE" INIT, A, A1, A1+1, CHART, CHART+1
ABPV("TASK" INIT
ABPV("TOTAL" SUMRY+1, SUMRY+2, SUMRY+3
ASM CLOSE!
ASM("$Y" PVTINS*, PVTINS+2
DT INIT+6
I HEADING+8*, PVTINS*, PVTINS+1, SUMRY*, CLOSE!
IOF CLOSE
LOC INIT*, INIT+1, CLOSE!
TITLE CLOSE!
>> TITLE1 INIT+1*, HEADING+3
>> TITLE2 INIT+1*, HEADING+5
>> TITLE3 INIT+2*, HEADING+5
>> TITLE4 INIT+5*, HEADING+6
>> TME HEADING+2*, HEADING+4
X HEADING+4*, PVTINS*, PVTINS+1, CLOSE!
Y INIT+3*, INIT+4*, CLOSE!
>> ZTSK INIT*, HEADING+4, A, A1, A1+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All