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

Package: Scheduling

Routine: SCDXPOV1


Information

SCDXPOV1 ;ALB/SCK - VISIT REPORT BY NPCDB TRANSMISSION STATUS ;11/29/99 19:23

Source Information

Source file <SCDXPOV1.m>

Entry Points

Name Comments DBIA/ICR reference
WRT ; Entry point for printing visit reprot
END
XMTPRT ; Print data for visit report
XMTQ
HDR1 ; Print report header and column headers
NEWPAGE ;
VISIT ; Category of visits Displayed value/Stored value

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,"VETERAN ELIGIBILITY",!
  • Line Location: XMTPRT+11
Function Call: WRITE
  • Prompt: !?8,$P(^DIC(8,NUM,0),U),?40,$J(+$P(LL,U,1),6),?51,$J(+$P(LL,U,2),6),?65,$J(+$P(LL,U,3),6)
  • Line Location: XMTPRT+16
Function Call: WRITE
  • Prompt: !?38,SDASH,!,?5,"Veteran Sub-Total",?40,$J(SBTT(1),6),?51,$J(SBTT(2),6),?65,$J(SBTT(3),6)
  • Line Location: XMTPRT+19
Function Call: WRITE
  • Prompt: !!,?5,"NON-VETERAN ELIGIBILITY",!
  • Line Location: XMTPRT+23
Function Call: WRITE
  • Prompt: !?8,$P(^DIC(8,NUM,0),U),?40,$J(+$P(LL,U,1),6),?51,$J(+$P(LL,U,2),6),?65,$J(+$P(LL,U,3),6)
  • Line Location: XMTPRT+28
Function Call: WRITE
  • Prompt: !?38,SDASH,!,?5,"Non-Veteran Sub-Total",?40,$J(SBTT(1),6),?51,$J(SBTT(2),6),?65,$J(SBTT(3),6)
  • Line Location: XMTPRT+31
Function Call: WRITE
  • Prompt: !!,?5,"CATEGORY OF VISIT",!
  • Line Location: XMTPRT+35
Function Call: WRITE
  • Prompt: !?8,$P($T(VISIT+NUM),";",3),?40,$J($P(LL,U,1),6),?51,$J($P(LL,U,2),6),?65,$J($P(LL,U,3),6)
  • Line Location: XMTPRT+40
Function Call: WRITE
  • Prompt: !?38,SDASH,!,?5,"Category Sub-Total",?40,$J(SBTT(1),6),?51,$J(SBTT(2),6),?65,$J(SBTT(3),6)
  • Line Location: XMTPRT+43
Function Call: WRITE
  • Prompt: !!?2,SDBDASH,!?5,$S(DNAME["FACILITY":"Facility Total",1:"Total for "_$E(DNAME,1,25))_":",?40,$J(SCETOT(1),6),?51,$J(SCETOT(2),6),?65,$J(SCETOT(3),6)
  • Line Location: XMTPRT+46
Function Call: WRITE
  • Prompt: !?16,"Total: ",SCETOT(1)+SCETOT(2)+SCETOT(3)
  • Line Location: XMTPRT+47
Function Call: WRITE
  • Prompt: !!,?8,"Compensation and Pension appointments are included in the above",!?8,"categories and totals and are shown here for information only"
  • Line Location: XMTPRT+50
Function Call: WRITE
  • Prompt: !!?8,"COMPENSATION AND PENSION",?40,$J($P(LL,U,1),6),?51,$J($P(LL,U,2),6),?65,$J($P(LL,U,3),6)
  • Line Location: XMTPRT+52
Function Call: READ
  • Variable: LL
  • Timeout: DTIME
  • Line Location: XMTPRT+54
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: !?(IOM-$L(HD1))/2,"ENCOUNTER REPORT BY TRANSMISSION STATUS TO NPCDB"
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: !!,?54,"ENCOUNTERS",!?38,SDASH
  • Line Location: HDR1+11
Function Call: WRITE
  • Prompt: !?40,"WAITING",?51,"TRANSMITTED",?65,"ACKNOWLEDGED"
  • Line Location: HDR1+12
Function Call: WRITE
  • Prompt: !?2,SDBDASH
  • Line Location: HDR1+13
Info |  Source |  Entry Points |  Interaction Calls