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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLSILT

Package: Patient Care Component Reports

Routine: APCLSILT


Information

APCLSILT ;IHS/CMI/LAB - AGGREGATE ILI REPORT PRINT; ; 10 Oct 2011 7:36 AM

Source Information

Source file <APCLSILT.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 $$FMTE^XLFDT  $$REPEAT^XLFSTR  
Patient Care Component Reports 1 HEADER^APCLSILR  
VA Fileman 1 COMMA^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component Reports 1 APCLSILR  

Entry Points

Name Comments DBIA/ICR reference
ILIAVM ;EP - meds
SUBHEAD4 ;
TAB9 ;EP - WRITE OUT TABLE 7
TAB8 ;EP - WRITE OUT TABLE 8
TAB8SUB ;
TAB9SUB ;
LOCSEX
ILIAGEP ;EP
C(X,X2,X3) ;
VACAGEP ;EP
SUBHEAD3 ;
TAB7SUB ;
ILISEX ;EP
LOCAGE

External References

Name Field # of Occurrence
COMMA^%DTC C+1
HEADER^APCLSILR ILISEX+1, ILISEX+13, LOCSEX+1, ILIAVM+1, ILIAVM+9, ILIAGEP+1, VACAGEP+1, LOCAGE+2, LOCAGE+27, LOCAGE+39
, LOCAGE+56, TAB8+1, TAB8+11, TAB8+30, TAB9+2, TAB9+22
$$FMTE^XLFDT TAB9+5
$$REPEAT^XLFSTR ILISEX+17, LOCSEX+5, ILIAGEP+28, ILIAGEP+48, VACAGEP+24, LOCAGE+15, LOCAGE+41, LOCAGE+52, TAB7SUB+6, TAB8+17
, TAB8+26, TAB8SUB+5, TAB9+25, TAB9+31, TAB9SUB+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "TABLE 2: ILI Diagnoses by Sex"
  • Line Location: ILISEX+2
Function Call: WRITE
  • Prompt: !,"This table provides a patient/visit count, by sex, for ILI diagnosis. An ILI"
  • Line Location: ILISEX+3
Function Call: WRITE
  • Prompt: !,"diagnosis is defined as a visit with an diagnosis contained in the "
  • Line Location: ILISEX+4
Function Call: WRITE
  • Prompt: !,"SURVEILLANCE ILI NO TMP NEEDED taxonomy."
  • Line Location: ILISEX+5
Function Call: WRITE
  • Prompt: !," OR"
  • Line Location: ILISEX+6
Function Call: WRITE
  • Prompt: !,"a temperature of >=100 AND one of the ICD diagnosis in the SURVEILLANCE ILI"
  • Line Location: ILISEX+7
Function Call: WRITE
  • Prompt: !,"taxonomy."
  • Line Location: ILISEX+8
Function Call: WRITE
  • Prompt: !!,"An unduplicated count of patients is also provided.",!!,?40,"# patients",?60,"# visits",!
  • Line Location: ILISEX+9
Function Call: WRITE
  • Prompt: !,"ALL FACILITIES COMBINED",!
  • Line Location: ILISEX+11
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("-",79),!
  • Line Location: ILISEX+17
Function Call: WRITE
  • Prompt: "TABLE 3: ILI Anti-Viral Medications Dispensed"
  • Line Location: ILIAVM+2
Function Call: WRITE
  • Prompt: !,"This table provides a count by drug name of the number of visits on which"
  • Line Location: ILIAVM+3
Function Call: WRITE
  • Prompt: !,"an Anti-Viral Medication was dispensed. Anti-Viral Medications are defined"
  • Line Location: ILIAVM+4
Function Call: WRITE
  • Prompt: !,"as any medication contained in the FLU ANTIVIRAL MEDS taxonomy or any "
  • Line Location: ILIAVM+5
Function Call: WRITE
  • Prompt: !,"Medication whose drug name contains OSELTAMIVIR or ZANAMIVIR. An unduplicated"
  • Line Location: ILIAVM+6
Function Call: WRITE
  • Prompt: !," unduplicated count of patients is also provided.",!,?40,"# patients",?60,"# visits",!
  • Line Location: ILIAVM+7
Function Call: WRITE
  • Prompt: !,"TABLE 2: ILI Diagnoses by Sex",!,?40,"# patients",?60,"# visits",!
  • Line Location: SUBHEAD3+1
Function Call: WRITE
  • Prompt: "TABLE 3: ILI Anti-Viral Medications Dispensed",!!,?40,"# patients",?60,"# prescriptions",!
  • Line Location: SUBHEAD4+1
Function Call: WRITE
  • Prompt: "TABLE 4: ILI Diagnoses by Age by Visit"
  • Line Location: ILIAGEP+2
Function Call: WRITE
  • Prompt: !,"This table displays a visit count by age group. Only visits on which "
  • Line Location: ILIAGEP+3
Function Call: WRITE
  • Prompt: !,"there was at least one ILI diagnosis are counted. An ILI diagnosis"
  • Line Location: ILIAGEP+4
Function Call: WRITE
  • Prompt: !,"is defined as a visit with one of the codes in the SURVEILLANCE ILI"
  • Line Location: ILIAGEP+5
Function Call: WRITE
  • Prompt: !,"NO TMP NEEDED taxonomy."
  • Line Location: ILIAGEP+6
Function Call: WRITE
  • Prompt: !," OR"
  • Line Location: ILIAGEP+7
Function Call: WRITE
  • Prompt: !,"a temperature of >=100 AND one of the codes in the SURVEILLANCE ILI"
  • Line Location: ILIAGEP+8
Function Call: WRITE
  • Prompt: !,"taxonomy."
  • Line Location: ILIAGEP+9
Function Call: WRITE
  • Prompt: !,"The visits have to be defined as 'surveillance' visits. The definition "
  • Line Location: ILIAGEP+10
Function Call: WRITE
  • Prompt: !,"of these visits is the following:"
  • Line Location: ILIAGEP+11
Function Call: WRITE
  • Prompt: !," - a Hospitalization"
  • Line Location: ILIAGEP+12
Function Call: WRITE
  • Prompt: !," - a visit to a PHN"
  • Line Location: ILIAGEP+13
Function Call: WRITE
  • Prompt: !," - an Ambulatory visit (service categories A, O, R, S) to one of the "
  • Line Location: ILIAGEP+14
Function Call: WRITE
  • Prompt: !," following clinics: 01 GENERAL, 06 DIABETIC, 10 GYN, 12 IMMUNIZATION,"
  • Line Location: ILIAGEP+15
Function Call: WRITE
  • Prompt: !," 13 INTERNAL MEDICINE, 20 PEDIATRICS, 24 WELL CHILD CARE, "
  • Line Location: ILIAGEP+16
Function Call: WRITE
  • Prompt: !," 28 FAMILY PRACTICE, 30 EMERGENCY ROOM, 57 EPSDT, "
  • Line Location: ILIAGEP+17
Function Call: WRITE
  • Prompt: !," 70 WOMEN'S HEALTH, 80 URGENT CARE, 89 EVENING"
  • Line Location: ILIAGEP+18
Function Call: WRITE
  • Prompt: !!,"Age",?19," 0-4y",?29,"5-24y",?39,"25-49y",?49,"50-64y",?59,"65y+",?69,"TOTAL",!
  • Line Location: ILIAGEP+19
Function Call: WRITE
  • Prompt: !,"Ambulatory ILI"
  • Line Location: ILIAGEP+20
Function Call: WRITE
  • Prompt: ?19,$$C($G(APCLAGEG("I","A","0-4y")),0,7)
  • Line Location: ILIAGEP+21
Function Call: WRITE
  • Prompt: ?29,$$C($G(APCLAGEG("I","A","5-24y")),0,7)
  • Line Location: ILIAGEP+22
Function Call: WRITE
  • Prompt: ?39,$$C($G(APCLAGEG("I","A","25-49y")),0,7)
  • Line Location: ILIAGEP+23
Function Call: WRITE
  • Prompt: ?49,$$C($G(APCLAGEG("I","A","50-64y")),0,7)
  • Line Location: ILIAGEP+24
Function Call: WRITE
  • Prompt: ?59,$$C($G(APCLAGEG("I","A","65y+")),0,7)
  • Line Location: ILIAGEP+25
Function Call: WRITE
  • Prompt: ?69,$$C($G(APCLAGEG("I","A","TOTAL")),0,7),!
  • Line Location: ILIAGEP+26
Function Call: WRITE
  • Prompt: "Diagnosis",!
  • Line Location: ILIAGEP+27
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("-",79),!
  • Line Location: ILIAGEP+28
Function Call: WRITE
  • Prompt: !,"Hospital ILI"
  • Line Location: ILIAGEP+40
Function Call: WRITE
  • Prompt: ?19,$$C($G(APCLAGEG("I","H","0-4y")),0,7)
  • Line Location: ILIAGEP+41
Function Call: WRITE
  • Prompt: ?29,$$C($G(APCLAGEG("I","H","5-24y")),0,7)
  • Line Location: ILIAGEP+42
Function Call: WRITE
  • Prompt: ?39,$$C($G(APCLAGEG("I","H","25-49y")),0,7)
  • Line Location: ILIAGEP+43
Function Call: WRITE
  • Prompt: ?49,$$C($G(APCLAGEG("I","H","50-64y")),0,7)
  • Line Location: ILIAGEP+44
Function Call: WRITE
  • Prompt: ?59,$$C($G(APCLAGEG("I","H","65y+")),0,7)
  • Line Location: ILIAGEP+45
Function Call: WRITE
  • Prompt: ?69,$$C($G(APCLAGEG("I","H","TOTAL")),0,7),!
  • Line Location: ILIAGEP+46
Function Call: WRITE
  • Prompt: "Diagnosis",!
  • Line Location: ILIAGEP+47
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("-",79),!
  • Line Location: ILIAGEP+48
Function Call: WRITE
  • Prompt: "TABLE 5: Seasonal Flu Immunizations by Age by Visit"
  • Line Location: VACAGEP+2
Function Call: WRITE
  • Prompt: !,"This table displays a count for immunizations by age group. Only visits on"
  • Line Location: VACAGEP+3
Function Call: WRITE
  • Prompt: !,"which a Seasonal Flu immunization was dispensed are counted. The "
  • Line Location: VACAGEP+4
Function Call: WRITE
  • Prompt: !,"definition of the immunizations are:"
  • Line Location: VACAGEP+5
Function Call: WRITE
  • Prompt: !," - Seasonal Flu: Immunization CVX codes 15, 16, 88, 111, 135, 140, 141, 144,"
  • Line Location: VACAGEP+6
Function Call: WRITE
  • Prompt: !," 149, 151, 153, 155, 158"
  • Line Location: VACAGEP+7
Function Call: WRITE
  • Prompt: !," CPT 90654-90662, 90672-90673, 90685-90686, 90724, G0008, G8108"
  • Line Location: VACAGEP+8
Function Call: WRITE
  • Prompt: !," Diagnoses V04.8, V04.81, V06.6"
  • Line Location: VACAGEP+9
Function Call: WRITE
  • Prompt: !," Procedure: 99.52"
  • Line Location: VACAGEP+10
Function Call: WRITE
  • Prompt: !!,"ALL FACILITIES"
  • Line Location: VACAGEP+12
Function Call: WRITE
  • Prompt: !!,"Age",?14," 6-23m",?22,"24-59m",?30,"60m-18y",?38,"19-24y",?46,"25-49y",?54,"50-64y",?62," 65+y",?72,"TOTAL",!
  • Line Location: VACAGEP+13
Function Call: WRITE
  • Prompt: !,"Seasonal"
  • Line Location: VACAGEP+14
Function Call: WRITE
  • Prompt: ?14,$$C($G(APCLIMMG("I","A","6-23m")),0,7)
  • Line Location: VACAGEP+15
Function Call: WRITE
  • Prompt: ?22,$$C($G(APCLIMMG("I","A","24-59m")),0,7)
  • Line Location: VACAGEP+16
Function Call: WRITE
  • Prompt: ?30,$$C($G(APCLIMMG("I","A","60m-18y")),0,7)
  • Line Location: VACAGEP+17
Function Call: WRITE
  • Prompt: ?38,$$C($G(APCLIMMG("I","A","19-24y")),0,7)
  • Line Location: VACAGEP+18
Function Call: WRITE
  • Prompt: ?46,$$C($G(APCLIMMG("I","A","25-49y")),0,7)
  • Line Location: VACAGEP+19
Function Call: WRITE
  • Prompt: ?54,$$C($G(APCLIMMG("I","A","50-64y")),0,7)
  • Line Location: VACAGEP+20
Function Call: WRITE
  • Prompt: ?62,$$C($G(APCLIMMG("I","A","65+y")),0,7)
  • Line Location: VACAGEP+21
Function Call: WRITE
  • Prompt: ?72,$$C($G(APCLIMMG("I","A","TOTAL")),0,7),!
  • Line Location: VACAGEP+22
Function Call: WRITE
  • Prompt: "Flu",!
  • Line Location: VACAGEP+23
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("-",79),!
  • Line Location: VACAGEP+24
Function Call: WRITE
  • Prompt: !
  • Line Location: LOCAGE+0
Function Call: WRITE
  • Prompt: "TABLE 7: Potential Adverse Events"
  • Line Location: LOCAGE+28
Function Call: WRITE
  • Prompt: !!,"This table contains a tally of all patients who were seen for a"
  • Line Location: LOCAGE+29
Function Call: WRITE
  • Prompt: !,"diagnosis that may be considered to be an adverse event. Adverse"
  • Line Location: LOCAGE+30
Function Call: WRITE
  • Prompt: !,"Event diagnoses are:"
  • Line Location: LOCAGE+31
Function Call: WRITE
  • Prompt: !,"ITP: 287.31"
  • Line Location: LOCAGE+32
Function Call: WRITE
  • Prompt: !,"2nd TP: 287.4"
  • Line Location: LOCAGE+33
Function Call: WRITE
  • Prompt: !,"TP: 287.5"
  • Line Location: LOCAGE+34
Function Call: WRITE
  • Prompt: !,"Bells Palsy: 351.0"
  • Line Location: LOCAGE+35
Function Call: WRITE
  • Prompt: !,"GBS: 357.0"
  • Line Location: LOCAGE+36
Function Call: WRITE
  • Prompt: !,"Febrile Seizures Simple: 780.31 < 5 yrs"
  • Line Location: LOCAGE+37
Function Call: WRITE
  • Prompt: !,"Febrile Seizures Complex: 780.32 < 5 yrs"
  • Line Location: LOCAGE+38
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: LOCAGE+41
Function Call: WRITE
  • Prompt: !
  • Line Location: LOCAGE+42
Function Call: WRITE
  • Prompt: !!,"There were no visits for adverse events during the time period.",!!
  • Line Location: LOCAGE+43
Function Call: WRITE
  • Prompt: APCLX
  • Line Location: LOCAGE+48
Function Call: WRITE
  • Prompt: $P(APCLX,":",1),!,$P(APCLX,":",2)
  • Line Location: LOCAGE+49
Function Call: WRITE
  • Prompt: !!,"Note: Follow up investigation is needed to determine if the adverse event"
  • Line Location: LOCAGE+57
Function Call: WRITE
  • Prompt: !,"could be associated with vaccine adverse events that may be a result of"
  • Line Location: LOCAGE+58
Function Call: WRITE
  • Prompt: !,"vaccination should be reported to the Vaccine Adverse Event Reporting"
  • Line Location: LOCAGE+59
Function Call: WRITE
  • Prompt: !,"System (VAERS)."
  • Line Location: LOCAGE+60
Function Call: WRITE
  • Prompt: !
  • Line Location: LOCAGE+61
Function Call: WRITE
  • Prompt: !!,"TABLE 7: Potential Adverse Events"
  • Line Location: TAB7SUB+1
Function Call: WRITE
  • Prompt: !,"Potential Adverse",?26,"Seasonal flu",?46,"No seasonal flu",?66,"Total # of"
  • Line Location: TAB7SUB+2
Function Call: WRITE
  • Prompt: !,"Events",?26,"vaccine in the ",?46,"vaccine in the",?66,"Adverse Events"
  • Line Location: TAB7SUB+3
Function Call: WRITE
  • Prompt: !?26,"60 days prior to",?46,"60 days prior to"
  • Line Location: TAB7SUB+4
Function Call: WRITE
  • Prompt: !?26,"adverse event",?46,"adverse event"
  • Line Location: TAB7SUB+5
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: TAB7SUB+6
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB7SUB+7
Function Call: WRITE
  • Prompt: "TABLE 8: Potential Adverse Events from live virus seasonal Flu vaccine"
  • Line Location: TAB8+2
Function Call: WRITE
  • Prompt: !!,"This table contains a tally of all patients who were seen for a"
  • Line Location: TAB8+3
Function Call: WRITE
  • Prompt: !,"diagnosis that may be considered to be an adverse event after"
  • Line Location: TAB8+4
Function Call: WRITE
  • Prompt: !,"receiving the Seasonal Flu Live Virus vaccine."
  • Line Location: TAB8+5
Function Call: WRITE
  • Prompt: !,"The adverse event diagnoses are:"
  • Line Location: TAB8+6
Function Call: WRITE
  • Prompt: !?5,"Asthma (ICD Codes): 493.0*, 493.9*"
  • Line Location: TAB8+7
Function Call: WRITE
  • Prompt: !?5,"Wheezing (ICD Codes): 786.07"
  • Line Location: TAB8+8
Function Call: WRITE
  • Prompt: !?5,"Influenza (ICD Codes): 488.1 (H1N1)"
  • Line Location: TAB8+9
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB8+10
Function Call: WRITE
  • Prompt: !,"Potential Adverse",?26,"Live virus vaccine",?46,"No Live virus",?66,"Total # of"
  • Line Location: TAB8+12
Function Call: WRITE
  • Prompt: !,"Events",?26,"(CVX code 111) 14",?46,"vaccine (CVX code",?66,"Adverse Events"
  • Line Location: TAB8+13
Function Call: WRITE
  • Prompt: !?26,"days prior to",?46,"111) 14 days prior"
  • Line Location: TAB8+14
Function Call: WRITE
  • Prompt: !?26,"adverse event",?46,"to adverse event"
  • Line Location: TAB8+15
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB8+16
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: TAB8+17
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB8+18
Function Call: WRITE
  • Prompt: !!,"There were no visits for adverse events during the time period.",!!
  • Line Location: TAB8+19
Function Call: WRITE
  • Prompt: !!,"Note: Follow up investigation is needed to determine if the adverse event"
  • Line Location: TAB8+31
Function Call: WRITE
  • Prompt: !,"could be associated with vaccine adverse events that may be a result of"
  • Line Location: TAB8+32
Function Call: WRITE
  • Prompt: !,"vaccination should be reported to the Vaccine Adverse Event Reporting"
  • Line Location: TAB8+33
Function Call: WRITE
  • Prompt: !,"System (VAERS)."
  • Line Location: TAB8+34
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB8+35
Function Call: WRITE
  • Prompt: "TABLE 8: Potential Adverse Events Related to H1N1 Live Virus"
  • Line Location: TAB8SUB+1
Function Call: WRITE
  • Prompt: !,"Adverse",?40,"Patients who received"
  • Line Location: TAB8SUB+2
Function Call: WRITE
  • Prompt: !,"Events",?40,"H1N1 Live"
  • Line Location: TAB8SUB+3
Function Call: WRITE
  • Prompt: !?40,"Nasal Vaccine"
  • Line Location: TAB8SUB+4
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: TAB8SUB+5
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB8SUB+6
Function Call: WRITE
  • Prompt: "TABLE 9: Adverse Events without an ILI / H1N1 vaccination"
  • Line Location: TAB9+3
Function Call: WRITE
  • Prompt: !!,"This table contains a tally of all patient visits during the time"
  • Line Location: TAB9+4
Function Call: WRITE
  • Prompt: !,"period ",$$FMTE^XLFDT(APCLBD)," to ",$$FMTE^XLFDT(APCLED)
  • Line Location: TAB9+5
Function Call: WRITE
  • Prompt: !,"where a potential ILI or H1N1 adverse event is diagnosed for a "
  • Line Location: TAB9+6
Function Call: WRITE
  • Prompt: !,"patient that does not have a documented H1N1 or ILI vaccination. "
  • Line Location: TAB9+7
Function Call: WRITE
  • Prompt: !,"These adverse events diagnoses are:"
  • Line Location: TAB9+8
Function Call: WRITE
  • Prompt: !?5,"Thrombocytopenia (ICD Codes): 287.31; 287.4; 287.5"
  • Line Location: TAB9+9
Function Call: WRITE
  • Prompt: !?5,"Encephalitis/Myelitis (ICD Codes): 323.5; 323.51; 323.52; 323.6; 323.61;"
  • Line Location: TAB9+10
Function Call: WRITE
  • Prompt: !?10,"323.62; 323.63; 323.8; 323.81; 323.82; 323.9; 341.2"
  • Line Location: TAB9+11
Function Call: WRITE
  • Prompt: !?10,"Neuritis (ICD Codes): 351.0; 357.0; specifically Bell's palsy,"
  • Line Location: TAB9+12
Function Call: WRITE
  • Prompt: !?10,"Guillain-Barre' syndrome, postinfectious polyneuritis"
  • Line Location: TAB9+13
Function Call: WRITE
  • Prompt: !?5,"Optic Neuritis (ICD Codes): 377.30; 377.31; 377.32; 377.39"
  • Line Location: TAB9+14
Function Call: WRITE
  • Prompt: !?5,"Anaphylactic Shock (ICD Codes): 995.0; 999.4"
  • Line Location: TAB9+15
Function Call: WRITE
  • Prompt: !?5,"Other diagnosis in the SURVEILLANCE ADV EV NO H1N1 taxonomy: 798*; 674.90;"
  • Line Location: TAB9+16
Function Call: WRITE
  • Prompt: !?10,"674.92; 674.94;"
  • Line Location: TAB9+17
Function Call: WRITE
  • Prompt: !,"When finding the date of the most recent H1N1 vaccine, the search starts"
  • Line Location: TAB9+18
Function Call: WRITE
  • Prompt: !,"on the 1st of June prior to the end date selected by the user. If the"
  • Line Location: TAB9+19
Function Call: WRITE
  • Prompt: !,"patient does not have a documented H1N1 vaccine after June 1 it is "
  • Line Location: TAB9+20
Function Call: WRITE
  • Prompt: !,"assumed that they did not have a vaccination this 'flu season'."
  • Line Location: TAB9+21
Function Call: WRITE
  • Prompt: !,"Diagnosis or",?40,"No ILI or H1N1 Vaccination"
  • Line Location: TAB9+23
Function Call: WRITE
  • Prompt: !,"Conditions",?40,"# visits"
  • Line Location: TAB9+24
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: TAB9+25
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB9+26
Function Call: WRITE
  • Prompt: "TABLE 9: Adverse Events without an ILI / H1N1 vaccination"
  • Line Location: TAB9SUB+1
Function Call: WRITE
  • Prompt: !,"Diagnosis or",?40,"No ILI or H1N1 Vaccination"
  • Line Location: TAB9SUB+2
Function Call: WRITE
  • Prompt: !,"Conditions",?40,"# visits"
  • Line Location: TAB9SUB+3
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: TAB9SUB+4
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB9SUB+5

Label References

Name Line Occurrences
$$C ILISEX+14, LOCSEX+4, ILIAVM+10, ILIAGEP+21, ILIAGEP+22, ILIAGEP+23, ILIAGEP+24, ILIAGEP+25, ILIAGEP+26, ILIAGEP+41
, ILIAGEP+42, ILIAGEP+43, ILIAGEP+44, ILIAGEP+45, ILIAGEP+46, VACAGEP+15, VACAGEP+16, VACAGEP+17, VACAGEP+18, VACAGEP+19
, VACAGEP+20, VACAGEP+21, VACAGEP+22, LOCAGE+6, LOCAGE+7, LOCAGE+8, LOCAGE+9, LOCAGE+10, LOCAGE+11, LOCAGE+12
, LOCAGE+13, LOCAGE+50, LOCAGE+51, TAB8+24, TAB8+25, TAB9+30
LOCAGE VACAGEP+11
LOCSEX ILISEX+10
SUBHEAD3 ILISEX+13, LOCSEX+1
SUBHEAD4 ILIAVM+9
TAB7SUB LOCAGE+40

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLAGEG("I" ILIAGEP+21, ILIAGEP+22, ILIAGEP+23, ILIAGEP+24, ILIAGEP+25, ILIAGEP+26, ILIAGEP+41, ILIAGEP+42, ILIAGEP+43, ILIAGEP+44
, ILIAGEP+45, ILIAGEP+46
>> APCLBD TAB9+5
>> APCLD ILIAVM+8*, ILIAVM+10
>> APCLED TAB9+5
>> APCLILIS( ILISEX+12, ILISEX+14
>> APCLIMMG("I" VACAGEP+15, VACAGEP+16, VACAGEP+17, VACAGEP+18, VACAGEP+19, VACAGEP+20, VACAGEP+21, VACAGEP+22
>> APCLIMML( LOCAGE+1, LOCAGE+6, LOCAGE+7, LOCAGE+8, LOCAGE+9, LOCAGE+10, LOCAGE+11, LOCAGE+12, LOCAGE+13
>> APCLLOC LOCSEX*, LOCSEX+2, LOCSEX+3, LOCSEX+4, LOCAGE+1*, LOCAGE+3, LOCAGE+6, LOCAGE+7, LOCAGE+8, LOCAGE+9
, LOCAGE+10, LOCAGE+11, LOCAGE+12, LOCAGE+13
>> APCLLOCT ILISEX+10, VACAGEP+11
>> APCLMEDS( ILIAVM+8, ILIAVM+10
>> APCLQUIT ILISEX+1, ILISEX+12, ILISEX+13, ILISEX+16, LOCSEX, LOCSEX+1, LOCSEX+3, ILIAVM+1, ILIAVM+8, ILIAVM+9
, LOCAGE+1, LOCAGE+39, LOCAGE+47, LOCAGE+54, LOCAGE+56, TAB8+11, TAB8+23, TAB8+28, TAB8+30, TAB9+22
, TAB9+29
>> APCLSEX ILISEX+12*, ILISEX+14, LOCSEX+3*, LOCSEX+4
>> APCLSEXL( LOCSEX, LOCSEX+3, LOCSEX+4
>> APCLTAB7 LOCAGE+43
>> APCLTAB7( LOCAGE+45*, LOCAGE+46*, LOCAGE+50, LOCAGE+51
>> APCLTAB8 TAB8+19
>> APCLTAB8( TAB8+21*, TAB8+22*, TAB8+23, TAB8+24, TAB8+25
>> APCLTAB9( TAB9+28*, TAB9+29, TAB9+30
>> APCLX LOCAGE+47*, LOCAGE+48, LOCAGE+49, LOCAGE+50, LOCAGE+51, TAB8+23*, TAB8+24, TAB8+25, TAB9+29*, TAB9+30
IOSL ILISEX+13, LOCSEX+1, ILIAVM+9, LOCAGE+2, LOCAGE+39, LOCAGE+56, TAB8+11, TAB8+30, TAB9+22
U ILISEX+14, LOCSEX+4, ILIAVM+10
X C~, C+2, LOCAGE+44*, LOCAGE+45, LOCAGE+46, TAB8+20*, TAB8+21, TAB8+22, TAB9+27*, TAB9+28
X2 C~
X3 C~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All