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

Package: Scheduling

Routine: SCRPW56


Information

SCRPW56 ;RENO/KEITH - Most Frequent 50 CPT Codes (OP6) or (IP6) ;06/22/99

Source Information

Source file <SCRPW56.m>

Entry Points

Name Comments DBIA/ICR reference
START ;Print report
EXIT
DPRT(SDV) ;Print division
PLINE ;Print output line
HDR ;Print header
HD1 ;Print subheader
DLIST ;Create alphabetic list of divisions found
VALID() ;Check encounter record
DIV() ;Check division
STOP ;Check for stop task request
SET(SDIV) ;Set division lists

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?(IOM-$L(SDX)\2),SDX
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !?7,$J(SDII,3),?13,SDPROC,?50,$J(SDI,10,0)
  • Line Location: PLINE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PLINE+10
Function Call: WRITE
  • Prompt: ?62,$E(SDPTN,1,50),?114,$J(^TMP("SCRPW",$J,SDV,0,SDCPT,SDPT),10,0)
  • Line Location: PLINE+14
Function Call: WRITE
  • Prompt: !?(IOM-$L(SDTIT(SDI))\2),SDTIT(SDI)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,SDLINE,!,"For Fiscal Year activity through ",SD("PEDT"),!,"Date printed: ",SDPNOW,?(IOM-6-$L(SDPAGE)),"Page: ",SDPAGE,!,SDLINE
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?52,"CPT Code",?114,"Prov. Type",!?7,"Rank",?13,"CPT Code",?51,"Frequency",?62,"Provider Type",?115,"Frequency"
  • Line Location: HD1+1
Function Call: WRITE
  • Prompt: !?7,"----",?13,$E(SDLINE,1,35),?50,$E(SDLINE,1,10),?62,$E(SDLINE,1,50),?114,$E(SDLINE,1,10)
  • Line Location: HD1+2
Info |  Source |  Entry Points |  Interaction Calls