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

Package: IHS Patient Registration

Routine: AGMCDPC


Information

AGMCDPC ; IHS/ASDS/EFG - PRINT LIST OF MEDICAID ACCOUNTS BY COUNTY;

Source Information

Source file <AGMCDPC.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
IHS Patient Registration 3 (CTR,LINE,NOW,RTRN)^AG  ^AGDICLK  $$S^AGVDF  
Kernel 3 ^%ZIS  ^%ZISC  (,KILL)^%ZTLOAD  
VA Fileman 3 NOW^%DTC  ^DIC  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
ACCTS ;
ALL ;
PLAN2 ;
PLANS ;
TO ;
CURRENT ;
OPEN ;
DT(DT) ;
TERM ;
DEV
WRITE
START ;EP - From TaskMan.
COUNTY ;
B1
ACTIVE ;if they have HRN, are active, and have info in VA PATIENT
END
PTS ;
FROM ;
HDR ;

External References

Name Field # of Occurrence
NOW^%DTC AGMCDPC+15
^%ZIS DEV, WRITE+1
^%ZISC DEV+1, DEV+9, END+1
^%ZTLOAD DEV+8
KILL^%ZTLOAD END+5
CTR^AG WRITE, WRITE+8
LINE^AG HDR+27
NOW^AG WRITE
RTRN^AG WRITE+37, END, B1
^AGDICLK COUNTY+6
$$S^AGVDF END, HDR+5
^DIC PLAN2+18
^DIR ACCTS+3, PLAN2+8, PTS+5, FROM+3, TO+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PLAN2+1
Function Call: WRITE
  • Prompt: *7,!,"Please queue to system printers."
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: ?30,$P($G(^DPT(DFN,.13)),U)
  • Line Location: WRITE+16
Function Call: WRITE
  • Prompt: "-"
  • Line Location: WRITE+33
Function Call: WRITE
  • Prompt: !!!,"TOTAL MEDICAID PATIENTS: ",AGTOT
  • Line Location: END+0
Function Call: WRITE
  • Prompt: $$S^AGVDF("IOF")
  • Line Location: END+0
Function Call: WRITE
  • Prompt: " FOR ALL PLANS"
  • Line Location: HDR+21
Function Call: WRITE
  • Prompt: ?30,"HOME PHONE"
  • Line Location: HDR+24
Function Call: WRITE
  • Prompt: !!
  • Line Location: B1+1
Routine Call
  • DIC
  • Line Location:
    • PLAN2+18
Routine Call
  • DIR
  • Line Location:
    • ACCTS+3
    • PLAN2+8
    • PTS+5
    • FROM+3
    • TO+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV
    • WRITE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTNINS - [#9999999.18] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("UCI" DEV+2, WRITE+7
^AUPNMCD - [#9000004] ALL+2, ALL+3, ALL+7, OPEN+2, OPEN+3, OPEN+7, CURRENT+2, CURRENT+3, CURRENT+7, TERM+2
, TERM+3, TERM+7
^AUPNMCD("AB" START+5, START+6, START+7, START+8
^AUPNPAT - [#9000001] WRITE+17, ACTIVE+1
^AUTNINS - [#9999999.18] WRITE+28
^AUTTCOM - [#9999999.05] COUNTY+7, COUNTY+8
^AUTTCTY - [#9999999.23] COUNTY+9
^AUTTLOC - [#9999999.06] DEV+5
^DIC(4 - [#4] WRITE+4
^DIC(5 - [#5] WRITE+19
^DPT - [#2] WRITE+16, ACTIVE+1, ALL+15, OPEN+17, CURRENT+17, TERM+17
^TMP($J START+4!, WRITE+11, WRITE+12, WRITE+13, WRITE+14, WRITE+20, WRITE+22, WRITE+23, END+2!, ALL+15*
, OPEN+17*, CURRENT+17*, TERM+17*
^VA(200 - [#200] WRITE+5

Label References

Name Line Occurrences
$$DT WRITE+25, WRITE+26, HDR+2, HDR+3
ACTIVE START+10
ALL START+11, ACTIVE+5
COUNTY ALL+14, OPEN+16, CURRENT+16, TERM+16
CURRENT ACTIVE+3
DEV DEV+1, DEV+9
END START+13, WRITE+38, B1
FROM ACCTS+6
HDR WRITE+9, WRITE+39, B1
OPEN ACTIVE+2
START DEV+1
TERM ACTIVE+4
WRITE START+12

Naked Globals

Name Field # of Occurrence
^( ACTIVE+1
^(0 WRITE+17, COUNTY+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV*
>> A WRITE+33*
AG DEV+9!, END+2!
AG("DRENT" COUNTY+4*
AG("HAT" AGMCDPC+13*, END!
AG("LINE" HDR+27*
AG("LKDATA" END+3!, COUNTY+7, COUNTY+8
AG("LKERR" END+3!, COUNTY+7
AG("LKPRINT" END+3!
AG("LOC" WRITE+4*, WRITE+6, WRITE+7, END+3!
AG("PLANS" PLANS+1!, PLAN2+4, PLAN2+11*, PLAN2+12!, PLAN2+20*, HDR+15, HDR+16, HDR+21, ALL+10, ALL+11
, ALL+12, OPEN+10, OPEN+11, OPEN+12, CURRENT+10, CURRENT+11, CURRENT+12, TERM+10, TERM+11, TERM+12
AG("USR" WRITE+5*, WRITE+6, END+4!
AG("USRLOC" WRITE+6*, WRITE+7*, END+4!, HDR+5
>> AGACCTS ACCTS+4*, ACCTS+6, WRITE+16, HDR+9, HDR+10, HDR+11, HDR+12, HDR+24, ACTIVE+2, ACTIVE+3
, ACTIVE+4, ACTIVE+5
>> AGACCTS1 HDR+9*, HDR+10*, HDR+11*, HDR+12*, HDR+13
AGBM WRITE+2*, WRITE+36, END+2!, B1
>> AGCOV WRITE+24*, WRITE+30*, WRITE+31, ALL+6*, ALL+15, OPEN+6*, OPEN+17, CURRENT+6*, CURRENT+17, TERM+6*
, TERM+17
AGCP END+2!, COUNTY+8*, COUNTY+9
AGCTY WRITE+10*, WRITE+11*, WRITE+12, WRITE+13, WRITE+14, WRITE+18, WRITE+20, WRITE+22, WRITE+23, END+2!
, ALL+15, OPEN+17, CURRENT+17, TERM+17, COUNTY+5*, COUNTY+9*
>> AGELG ALL+3*, ALL+4, ALL+5, ALL+6, OPEN+3*, OPEN+4, OPEN+5, OPEN+6, CURRENT+3*, CURRENT+4
, CURRENT+5, CURRENT+6, TERM+3*, TERM+4, TERM+5, TERM+6
>> AGELG2 ALL+7*, ALL+8, ALL+13, OPEN+7*, OPEN+8, OPEN+13, CURRENT+7*, CURRENT+8, CURRENT+13, TERM+7*
, TERM+8, TERM+13
>> AGELGBEG WRITE+21*, WRITE+22*, WRITE+23, WRITE+25, ALL+4*, ALL+15, OPEN+4*, OPEN+15, OPEN+17, CURRENT+4*
, CURRENT+17, TERM+4*, TERM+17
>> AGELGBG1 WRITE+24*, WRITE+25*, WRITE+31
>> AGELGDT ALL+1*, ALL+2*, ALL+3, OPEN+1*, OPEN+2*, OPEN+3, CURRENT+1*, CURRENT+2*, CURRENT+3, TERM+1*
, TERM+2*, TERM+3
>> AGELGED1 WRITE+24*, WRITE+26*, WRITE+31
>> AGELGEND ALL+5*, ALL+15, OPEN+5*, OPEN+14, OPEN+17, CURRENT+5*, CURRENT+15, CURRENT+17, TERM+5*, TERM+14
, TERM+15, TERM+17
>> AGEND START+13, WRITE+10*, WRITE+11, WRITE+12, WRITE+13, WRITE+14, WRITE+38*
>> AGFLAG START+9*
>> AGFLG ALL+9*, ALL+10, ALL+11*, ALL+12*, OPEN+9*, OPEN+10, OPEN+11*, OPEN+12*, CURRENT+9*, CURRENT+10
, CURRENT+11*, CURRENT+12*, TERM+9*, TERM+10, TERM+11*, TERM+12*
>> AGFRMDT ACCTS+7, HDR+1, HDR+2, FROM+4*, OPEN+15, TERM+15
>> AGFRMDT1 HDR+2*, HDR+11, HDR+12
>> AGIMID START+3*, START+8*, ALL+2, ALL+3, ALL+7, OPEN+2, OPEN+3, OPEN+7, CURRENT+2, CURRENT+3
, CURRENT+7, TERM+2, TERM+3, TERM+7
AGIO AGMCDPC+13*, DEV+9!, WRITE+2, END+2!
AGL END+2!
>> AGMID START+3*, START+7*, START+8, WRITE+20*, WRITE+22, WRITE+23, WRITE+31, ALL+15, OPEN+17, CURRENT+17
, TERM+17
AGNM WRITE+8*, WRITE+10*, WRITE+12*, WRITE+13, WRITE+14, WRITE+15, WRITE+20, WRITE+22, WRITE+23, END+3!
AGNUM END+3!
AGPCC END+3!
AGPGPG WRITE+3*, END+4!, HDR+4*, HDR+5
>> AGPLAN WRITE+24*, WRITE+27*, WRITE+28*, WRITE+31, ALL+8*, ALL+11, ALL+12, ALL+15, OPEN+8*, OPEN+11
, OPEN+12, OPEN+17, CURRENT+8*, CURRENT+11, CURRENT+12, CURRENT+17, TERM+8*, TERM+11, TERM+12, TERM+17
>> AGPLN HDR+14*, HDR+16*, HDR+17*, HDR+18, HDR+19
>> AGPLNNM HDR+14*, HDR+15*, HDR+16, HDR+17
>> AGPLNS HDR+14*, HDR+18*, HDR+19*, HDR+20
AGPT END+4!
>> AGPTS PTS+6*, START+10, START+11, HDR+6
>> AGPTS1 HDR+6*, HDR+7*, HDR+8
AGQIO DEV+6*, DEV+9!, WRITE+1
>> AGRATE WRITE+24*, WRITE+29*, WRITE+31, ALL+13*, ALL+15, OPEN+13*, OPEN+17, CURRENT+13*, CURRENT+17, TERM+13*
, TERM+17
>> AGREC WRITE+23*, WRITE+26, WRITE+27, WRITE+29, WRITE+30
AGST AGMCDPC+14~, START+2*, START+6*, START+7, START+8, WRITE+10*, WRITE+13*, WRITE+14, WRITE+19, WRITE+20
, WRITE+22, WRITE+23, END+4!, ALL+15, OPEN+17, CURRENT+17, TERM+17
AGTIME WRITE*, END+2!, HDR+23
>> AGTODAY AGMCDPC+16*, CURRENT+15
>> AGTODT ACCTS+7, HDR+1, HDR+3, TO+4*, OPEN+15, TERM+15
>> AGTODT1 HDR+3*, HDR+11, HDR+12
AGTOT WRITE+3*, WRITE+34*, END, END+4!
AGUCI WRITE+8*, END+4!, HDR+22
>> AGZ("I" WRITE+1*
DA END+2!, COUNTY+1*
DFN START+1*, START+5*, START+6, START+7, START+8, WRITE+10*, WRITE+14*, WRITE+16, WRITE+17, WRITE+20
, WRITE+22, WRITE+23, END+2!, ACTIVE+1, ALL+15, OPEN+17, CURRENT+17, TERM+17, COUNTY+1
>> DFOUT WRITE+38, B1
DIC PLAN2+13*, END+2!, COUNTY+2*
DIC("S" PLAN2+17*
DIC(0 PLAN2+15*
DIR ACCTS+3!, PLAN2+8!, PTS+5!, FROM+3!, TO+3!
DIR("A" ACCTS+2*, PLAN2+5*, PLAN2+7*, PTS+2*, PTS+3*, FROM+2*, TO+2*
DIR("B" PLAN2+6*, PTS+4*
DIR(0 ACCTS+1*, PLAN2+3*, PTS+1*, FROM+1*, TO+1*
>> DIROUT PLAN2+10
DR END+2!, COUNTY+3*
DT DT~, DT+1, DT+2, DT+3
>> DT1 DT+2*, DT+3*, DT+4
>> DTOUT ACCTS+5, PLAN2+10, PTS+7, WRITE+38, FROM+5, TO+5, B1
>> DUOUT PLAN2+10, PLAN2+21, WRITE+38, B1
DUZ WRITE+5
DUZ(2 DEV+5, WRITE+4, WRITE+17, ACTIVE+1
G DEV+6*, DEV+9!, END+2!
I END+2!
IO AGMCDPC+13, DEV+6, WRITE+2, WRITE+9
IO("Q" DEV+1!
IO("S" DEV+1
ION DEV
>> IOP DEV*, WRITE+1*
IOSL WRITE+2
IOST DEV+1
>> POP DEV, WRITE+1
U DEV+5, WRITE+4, WRITE+5, WRITE+16, WRITE+17, WRITE+19, WRITE+26, WRITE+27, WRITE+28, WRITE+29
, WRITE+30, ACTIVE+1, ALL+4, ALL+5, ALL+6, ALL+8, ALL+13, ALL+15, OPEN+4, OPEN+5
, OPEN+6, OPEN+8, OPEN+13, OPEN+17, CURRENT+4, CURRENT+5, CURRENT+6, CURRENT+8, CURRENT+13, CURRENT+17
, TERM+4, TERM+5, TERM+6, TERM+8, TERM+13, TERM+17, COUNTY+8, COUNTY+9
X AGMCDPC+16, PLAN2+2, PLAN2+14*, PLAN2+19, WRITE*, WRITE+8*, END+4!
Y ACCTS+4, ACCTS+5, PLAN2+2, PLAN2+9, PLAN2+11*, PLAN2+12*, PLAN2+14, PLAN2+20, PTS+6, PTS+7
, DEV+4, WRITE+8, END+4!, FROM+4, FROM+5, TO+4, TO+5
ZTDESC DEV+5*, DEV+9!
ZTIO DEV+4*, DEV+9!
>> ZTQUEUED END+5
ZTRTN DEV+3*, DEV+9!
ZTSAVE DEV+9!
ZTSAVE( DEV+6*
ZTSAVE("AG*" DEV+7*
ZTSK DEV+9!
ZTUCI DEV+4*, DEV+9!
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