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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IVMRMCR1

Package: Income Verification Match

Routine: IVMRMCR1


Information

IVMRMCR1 ;ALB/ESD/CKN - Means Test Comparison Report ; 3 May 93 ; 07/22/02 9:40am

Source Information

Source file <IVMRMCR1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Income Verification Match 1 PAUSE^IVMRUTL  
Registration 1 PID^VADPT6  

Entry Points

Name Comments DBIA/ICR reference
EN ; Create ^Tmp global containing SSN, MT Copay Exempt, MT Copay Required
; GMT Copay Required, and date of means tests for years 1 and 2.
ENQ1
ENQ ; Clean up and exit.
TOTY1 ; Sum total MT COPAY EXTMPT's, MT COPAY REQUIRED's and GMT COPAY REQUIRED's for year 1.
TOTY2 ; Sum total Cat A's and C's for year 2.
HDR ; Report heading.
HDRPAT ; Column headings for patient data.
DSP(X) ; Return the MT category corresponding to the internal number.

External References

Name Field # of Occurrence
PAUSE^IVMRUTL EN+22, EN+34, ENQ1
PID^VADPT6 EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"No MT Copay Exempt or MT Copay Required or GMT Copay Required patients exist for years selected."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"SUMMARY OF MEANS TESTS FOR YEAR "_(IVMBEGYR+1700),!,$TR($J(" ",36)," ","=")
  • Line Location: EN+35
Function Call: WRITE
  • Prompt: !?11,"TOTAL MT COPAY EXEMPT :",$J(IVMAYR1,5),!?11,"TOTAL MT COPAY REQUIRED :",$J(IVMCYR1,5),!?11,"TOTAL GMT COPAY REQUIRED:",$J(IVMGYR1,5),!?5,"TOTAL MEANS TESTS:",$J(IVMAYR1+IVMCYR1+IVMGYR1,5)
  • Line Location: EN+36
Function Call: WRITE
  • Prompt: !!,"SUMMARY OF MEANS TESTS FOR YEAR "_(IVMENDYR+1700),!,$TR($J(" ",36)," ","=")
  • Line Location: EN+37
Function Call: WRITE
  • Prompt: !?11,"TOTAL MT COPAY EXEMPT :",$J(IVMAYR2,5),!?11,"TOTAL MT COPAY REQUIRED :",$J(IVMCYR2,5),!?11,"TOTAL GMT COPAY REQUIRED:",$J(IVMGYR2,5),!?5,"TOTAL MEANS TESTS:",$J(IVMAYR2+IVMCYR2+IVMGYR2,5),!
  • Line Location: EN+38
Function Call: WRITE
  • Prompt: !!?9,"TOTAL NON-RETURNS FROM "_(IVMBEGYR+1700)_" TO "_(IVMENDYR+1700)_":",$J(IVMNONRT,5)
  • Line Location: EN+39
Function Call: WRITE
  • Prompt: !?5,"TOTAL NEW MEANS TESTS FROM "_(IVMBEGYR+1700)_" TO "_(IVMENDYR+1700)_":",$J(IVMNEWMT,5)
  • Line Location: EN+40
Function Call: WRITE
  • Prompt: !!?5,"TOTAL PATIENTS WHOSE CATEGORY CHANGED FROM:",!
  • Line Location: EN+41
Function Call: WRITE
  • Prompt: !?5,"MT COPAY EXEMPT",?27,"TO",?32,"MT COPAY REQUIRED",?52,":",?55,$J(IVMACTOT,5),!?5,"MT COPAY REQUIRED",?27,"TO",?32,"MT COPAY EXEMPT",?52,":",?55,$J(IVMCATOT,5)
  • Line Location: EN+42
Function Call: WRITE
  • Prompt: !?5,"MT COPAY EXEMPT",?27,"TO",?32,"GMT COPAY REQUIRED",?52,":",?55,$J(IVMAGTOT,5),!?5,"MT COPAY REQUIRED",?27,"TO",?32,"GMT COPAY REQUIRED",?52,":",?55,$J(IVMCGTOT,5)
  • Line Location: EN+43
Function Call: WRITE
  • Prompt: !?5,"GMT COPAY REQUIRED",?27,"TO",?32,"MT COPAY REQUIRED",?52,":",?55,$J(IVMGCTOT,5),!?5,"GMT COPAY REQUIRED",?27,"TO",?32,"MT COPAY EXEMPT",?52,":",?55,$J(IVMGATOT,5)
  • Line Location: EN+44
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?3,Y,?66,"PAGE: ",IVMPAG
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?14,"M E A N S T E S T C O M P A R I S O N R E P O R T"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?28,"FOR YEARS: "_(IVMBEGYR+1700)_" AND "_(IVMENDYR+1700),!,$TR($J(" ",79)," ","="),!!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?5,"PATIENT",?30,"SSN",?42,"MEANS TEST",?64,"MEANS TEST",!?43,"CATEGORY",?65,"CATEGORY",!?45,(IVMBEGYR+1700),?67,(IVMENDYR+1700),!!
  • Line Location: HDRPAT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR+2
^DGMT(408.31 - [#408.31] EN+3, EN+5
^DPT - [#2] EN+6
^TMP("IVMMT" EN+2!, EN+8, EN+9*, EN+13, EN+17, ENQ+1!

Label References

Name Line Occurrences
$$DSP EN+23, EN+25
ENQ EN+17, EN+34
ENQ1 EN+13
HDR EN+12, EN+22, EN+34
HDRPAT EN+12, EN+22
TOTY1 EN+18
TOTY2 EN+19

Naked Globals

Name Field # of Occurrence
^( EN+5, EN+8*, EN+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN EN+5*, EN+6, ENQ+4!
IOF HDR+1
IOSL EN+22, EN+34
IOST HDR+1
IVMABDT EN+4*, EN+8, EN+9, EN+20, ENQ+3!
IVMACTOT EN+16*, EN+26*, EN+42, ENQ+3!
IVMAGTOT EN+16*, EN+28*, EN+43, ENQ+5!
IVMAYR1 EN+16*, EN+36, ENQ+3!, ENQ+4!, TOTY1+2*
IVMAYR2 EN+16*, EN+38, ENQ+3!, TOTY1+5*, TOTY2+2*
>> IVMBEGYR EN+3, EN+8, EN+35, EN+39, EN+40, TOTY1+2, TOTY1+3, TOTY1+4, HDR+5, HDRPAT+1
IVMCAT EN+3*, EN+5, EN+8, EN+9, ENQ+3!
IVMCATOT EN+16*, EN+27*, EN+42, ENQ+3!
IVMCATY1 ENQ+4!, TOTY1+1*, TOTY1+2, TOTY1+3, TOTY1+4, TOTY1+5, TOTY1+6, TOTY1+7
IVMCATY2 ENQ+4!, TOTY2+1*, TOTY2+2, TOTY2+3, TOTY2+4
IVMCGTOT EN+16*, EN+29*, EN+43, ENQ+5!
>> IVMCURDT EN+20, HDR+2
IVMCYR1 EN+16*, EN+36, ENQ+3!, TOTY1+3*
IVMCYR2 EN+16*, EN+38, ENQ+3!, TOTY1+6*, TOTY2+3*
IVMDA EN+5*, ENQ+3!
IVMDT EN+2*, EN+3*, EN+4, EN+5, ENQ+3!
IVMDTYR EN+4*, EN+8, EN+9, ENQ+3!, ENQ+4!
>> IVMENDYR EN+3, EN+9, EN+37, EN+39, EN+40, TOTY1+5, TOTY1+6, TOTY1+7, TOTY2+2, TOTY2+3
, TOTY2+4, HDR+5, HDRPAT+1
IVMGATOT EN+16*, EN+31*, EN+44, ENQ+5!
IVMGCTOT EN+16*, EN+30*, EN+44, ENQ+5!
IVMGYR1 EN+16*, EN+36, ENQ+5!, TOTY1+4*
IVMGYR2 EN+16*, EN+38, ENQ+5!, TOTY1+7*, TOTY2+4*
IVMI ENQ+3!
IVMNEWMT EN+16*, EN+21*, EN+40, ENQ+4!
IVMNM EN+6*, EN+8, EN+9, ENQ+4!
IVMNONRT EN+16*, EN+20*, EN+39, ENQ+4!
IVMPAG EN+12*, ENQ+4!, HDR+1, HDR+2*, HDR+3
IVMPDAT EN+17*, EN+23, ENQ+3!
>> IVMPFLAG EN+12, EN+22, EN+23, EN+25, EN+34
IVMQUIT EN+12*, EN+17, EN+22, EN+34, ENQ+4!
IVMS EN+8*, ENQ+3!
IVMSCR EN+17*, EN+18, EN+19, EN+20, EN+21, EN+23, EN+24, EN+25, EN+26, EN+27
, EN+28, EN+29, EN+30, EN+31, ENQ+3!, TOTY1+1, TOTY2+1
IVMY1 EN+18*, ENQ+4!, TOTY1+2, TOTY1+3, TOTY1+4, TOTY1+5, TOTY1+6, TOTY1+7
IVMY2 EN+19*, ENQ+4!, TOTY2+2, TOTY2+3, TOTY2+4
U EN+2*, EN+6, EN+8, EN+9, EN+18, EN+19, EN+20, EN+21, EN+23, EN+24
, EN+25, EN+26, EN+27, EN+28, EN+29, EN+30, EN+31, TOTY1+1, TOTY2+1
>> VA("BID" ENQ+4!
>> VA("PID" EN+8, EN+9, ENQ+4!
X ENQ+4!, DSP~, DSP+1
Y ENQ+4!, HDR+2*, HDR+3
>> ZTQUEUED ENQ+2
>> ZTREQ ENQ+2*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All