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

Package: Surgery

Routine: SROACOD


Information

SROACOD ;BIR/SJA - ALERT CODERS OF POTENTIAL CODING ISSUES ;04/18/06

Source Information

Source file <SROACOD.m>

Entry Points

Name Comments DBIA/ICR reference
START
ED
MSG
END
ASK
ERR ;The Coding Issue Alert cannot be created at this time

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The following ""final"" codes have been entered for the case.",!!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: "Principal CPT Code: ",?30,$S($L(X):X,1:"NOT ENTERED")
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,"Other CPT Codes: ",?30,$S(SRPROC(1)="":"NOT ENTERED",1:"")
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,"If you believe that the information coded is not correct and would like to",!,"alert the coders of the potential issue, enter a brief description of your",!,"concern below.",!
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+0
Function Call: WRITE
  • Prompt: !,"NOTE: You have exited the field without entering comments. ",!
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+2
Function Call: WRITE
  • Prompt: !!,"Transmitting message..."
  • Line Location: MSG+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ERR+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XMB(3.8 - [#3.8] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call