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

Package: Hospital Based Home Care

Routine: HBHCRP16


Information

HBHCRP16 ; LR VAMC(IRMS)/MJT-HBHC report on file 631, Admit/Reject Action field=Reject for date range, sorted by name, includes: patient name, Last Four, & evaluation date ; 12/21/05 3:30pm

Source Information

Source file <HBHCRP16.m>

Entry Points

Name Comments DBIA/ICR reference
DQ ; De-queue
LOOP ; Loop thru ^HBHC(631,"AI") evaluation date cross-ref to build report, rejects will only contain evaluation date data until HBHC/PCE patch installed
EXIT ; Exit module
PROCESS ; Process record & build ^TMP("HBHC",$J) global
PRTLOOP ; Print loop
PRINT ; Print report

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,HBHCZ,!,"Program Rejections Total: ",HBHCTOT,!,HBHCZ
  • Line Location: LOOP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,HBHCNAME,?37,$P(HBHCTMP,U),?55,$E(HBHCDATE,4,5)_"-"_$E(HBHCDATE,6,7)_"-"_$E(HBHCDATE,2,3),?70,$P(HBHCTMP,U,2),!,HBHCY
  • Line Location: PRINT+3
Info |  Source |  Entry Points |  Interaction Calls