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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: DVBCUTL2

Package: Automated Medical Information Exchange

Routine: DVBCUTL2


Information

DVBCUTL2 ;ALB/GTS-557/THM,SBW-DVBCUTIL, CONTINUED ; 3/MAY/2011

Source Information

Source file <DVBCUTL2.m>

Entry Points

Name Comments DBIA/ICR reference
KILL
DDIS1 ;display rated disabilities
DDIS
HDR2
HDR3
DUZ2 ;select station number
TST
TST1
RQCODE ; ** Cancel an entire 2507 request after cancellation of last exam **
PROCDAY(REQDA) ; ** Calculate processing time for REQDA (v2.7 - Enhc 13)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?2,DX,?37,$J(PCT,3,0)," %",?50,$S(SC=1:"Yes",1:"No"),?58,DXCOD,!
  • Line Location: DDIS1+1
Function Call: WRITE
  • Prompt: !!,"No rated disabilities on file",!!
  • Line Location: DDIS+0
Function Call: WRITE
  • Prompt: !?2,"Rated Disability",?37,"Percent",?50,"SC ?",?58,"Dx Code",!
  • Line Location: DDIS+1
Function Call: WRITE
  • Prompt: ?2
  • Line Location: DDIS+1
Function Call: WRITE
  • Prompt: ?2
  • Line Location: DDIS+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: DDIS+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: DDIS+3
Function Call: WRITE
  • Prompt: @IOF,!,"C&P Final Report",?71,"Page: ",PG,!!,"Name: ",PNAM,?38,"SSN: ",SSN,?60,"C-number: ",CNUM,!,EXHD,!
  • Line Location: HDR2+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: @IOF,!,"C&P Reprint of Final Report",?71,"Page: ",PG,!!,"Name: ",PNAM,?38,"SSN: ",SSN,?60,"C-number: ",CNUM,!,EXHD,!
  • Line Location: HDR3+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR3+2
Function Call: WRITE
  • Prompt: ?3
  • Line Location: TST+0
Function Call: WRITE
  • Prompt: $S(PRTNM]"":PRTNM,1:"Missing exam name")_$S(TSTA1]"":" - cancelled ("_TSTA1_")",TSTAT="T":" - Transferred",TSTAT]""&($G(DVBPALL)>0):" - "_$$EXTERNAL^DILFD(396.4,.04,,TSTAT),TSTAT="":" (Unknown status)",1:"")
  • Line Location: TST1+7
Function Call: WRITE
  • Prompt: " to ",$P(X,".",1)
  • Line Location: TST1+8
Function Call: WRITE
  • Prompt: "; "
  • Line Location: TST1+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396.4 - [#396.4] EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call