Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PXRRPCR2

Package: PCE Patient Care Encounter

Routine: PXRRPCR2


Information

PXRRPCR2 ;HIN/MjK - Clinic Specfic Workload Reports ;6/7/96

Source Information

Source file <PXRRPCR2.m>

Entry Points

Name Comments DBIA/ICR reference
ACTIVTY ;:_._._._._._._._._._._._.Caseload Activity_._._._._._._._._._._._.
HDR
NONE ;_._._.If no Pateint Activity_._._.
ADM ;A = Patient DFN ;B/C = Admission Date ;E=Discharge Date ;T = Line Tag
ER ;A = Patient DFN ;B/C = Visit Date ;T = Line Tag
LAB ;A = Patient DFN ;B/C = Lab Date ;E =Lab Test Field No. ;T =Line Tag
Q
FUT ;Z/Q = Fut Appointment Date ;A = Patient DFN
CHK ;Hold Screen, Format for Home Device Viewing

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?11,"Report Date Range: ",$$FMTE^XLFDT($P(PXRRBDT,"."))," through ",$$FMTE^XLFDT($P(PXRREDT,"."))
  • Line Location: ACTIVTY+1
Function Call: WRITE
  • Prompt: !?22,"Clinic Stop: ",PXRSTPNM
  • Line Location: ACTIVTY+2
Function Call: WRITE
  • Prompt: ", ",$P(PXRRCLIN(I),U)
  • Line Location: ACTIVTY+4
Function Call: WRITE
  • Prompt: !?13,$P($G(PXRRCLIN(I)),U)
  • Line Location: ACTIVTY+5
Function Call: WRITE
  • Prompt: !?2,"CASELOAD ACTIVITY...patients' hospital admissions/discharges, emergency room",!?2,"visits and critical lab values ;address,phone,future appts",!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,"No patients were recorded to have these actitvites within the",!,"selected date range."
  • Line Location: NONE+1
Function Call: WRITE
  • Prompt: !,"____________________________ADMISSIONS/DISCHARGES____________________________",!
  • Line Location: ADM+1
Function Call: WRITE
  • Prompt: !?5,"o There were no ADMISSIONS for these patients during this date range.",!
  • Line Location: ADM+2
Function Call: WRITE
  • Prompt: !,$P(C,"@"),?13,E,?30,$E($P(^DPT(A,0),U),1,25)
  • Line Location: ADM+4
Function Call: WRITE
  • Prompt: ?57,$P(^DPT(A,0),U,9)
  • Line Location: ADM+5
Function Call: WRITE
  • Prompt: $P($G(^(B)),U,6)_" "
  • Line Location: ADM+10
Function Call: WRITE
  • Prompt: !?32,"~~~~~~~~~~~~"
  • Line Location: ADM+14
Function Call: WRITE
  • Prompt: !,"_____________________________EMERGENCY ROOM VISITS_____________________________",!
  • Line Location: ER+1
Function Call: WRITE
  • Prompt: !?5,"o There were no ER VISITS for these patients during this date range.",!
  • Line Location: ER+2
Function Call: WRITE
  • Prompt: !,C,?27,$E($P(^DPT(A,0),U),1,27),?57,$P(^DPT(A,0),U,9)
  • Line Location: ER+4
Function Call: WRITE
  • Prompt: $P($G(^TMP($J,"ER",A,B)),U,4)_" "
  • Line Location: ER+8
Function Call: WRITE
  • Prompt: !?32,"~~~~~~~~~~~~"
  • Line Location: ER+11
Function Call: WRITE
  • Prompt: !,"____________________________CRITICAL LAB VALUES____________________________",!
  • Line Location: LAB+1
Function Call: WRITE
  • Prompt: !?5,"o There were no CRITICAL LABS for these patients during this date range. ",!
  • Line Location: LAB+2
Function Call: WRITE
  • Prompt: !,$P(C,"@"),?13,$E($P(^DPT(A,0),U),1,20),?35,$P(^DPT(A,0),U,9)
  • Line Location: LAB+4
Function Call: WRITE
  • Prompt: ?48,$P($G(^TMP($J,"LAB",A,B,E)),U)
  • Line Location: LAB+5
Function Call: WRITE
  • Prompt: ?75,$P($G(^TMP($J,"LAB",A,B,E)),U,8)
  • Line Location: LAB+6
Function Call: WRITE
  • Prompt: $P($G(^TMP($J,"LAB",A,B,E)),U,5)_" "
  • Line Location: LAB+10
Function Call: WRITE
  • Prompt: !?32,"~~~~~~~~~~~~"
  • Line Location: LAB+14
Function Call: WRITE
  • Prompt: !,"______________________________________________________________________________",!
  • Line Location: Q+0
Function Call: WRITE
  • Prompt: !?2,"Future Appt. Dt: ",?22,"NONE"
  • Line Location: FUT+1
Function Call: WRITE
  • Prompt: !?8,"Fut. Appt. Dt: ",Q,?41," - CL: ",$E($G(^TMP($J,"FUT",A,Z)),1,30)
  • Line Location: FUT+3
Info |  Source |  Entry Points |  Interaction Calls