Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SRSCPT

Package: Surgery

Routine: SRSCPT


Information

SRSCPT ;B'HAM ISC/MAM - CASES MISSING CPT CODES ; [ 09/22/98 11:36 AM ]

Source Information

Source file <SRSCPT.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Surgery 4 DATE^SROUTL  ^SRSCPT1  ^SRSCPT2  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 1 ^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SRSCPT  

Entry Points

Name Comments DBIA/ICR reference
ASK
DATE
EN
END
HELP
SPEC
MSP

External References

Name Field # of Occurrence
^%ZIS DATE+2
^%ZISC END+2
^%ZTLOAD DATE+3
^DIC SPEC+3, MSP+3
DATE^SROUTL DATE
^SRSCPT1 EN+2
^SRSCPT2 EN+3
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Print list of Completed Cases Missing CPT Codes for",!!,"1. O.R. Surgical Procedures",!,"2. Non-O.R. Procedures",!,"3. Both O.R. Surgical Procedures and Non-O.R. Procedures (All Specialties)"
  • Line Location: ASK+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!,"Enter '1' or press <RET> to print the list for surgical procedures performed",!,"in the OR. Enter '2' to print the list for non-OR procedures. Enter '3' to"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"print the list for both OR surgical procedures and non-OR procedures."
  • Line Location: HELP+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HELP+2
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: SPEC+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: !!,"Enter RETURN if you would like to list completed cases missing CPT codes for",!,"all Surgical Specialties, or 'NO' to select a specific specialty.",!!,"Press RETURN to continue "
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SPEC+3
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: MSP+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: MSP+2
Function Call: WRITE
  • Prompt: !!,"Enter RETURN if you would like to list completed cases missing CPT codes for",!,"all Specialties, or 'NO' to select a specific specialty.",!!,"Press RETURN to continue "
  • Line Location: MSP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: MSP+3
Routine Call
  • %ZIS
  • Line Location:
    • DATE+2
Routine Call
  • DIC
  • Line Location:
    • SPEC+3
    • MSP+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN
^TMP("SR" EN+1!, END!

Label References

Name Line Occurrences
ASK ASK+2
END ASK+1, ASK+2, ASK+3, ASK+4, DATEDATE+2, DATE+3, EN+2
HELP ASK+2
MSP ASK+4
SPEC ASK+3, SPEC+2, MSP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DATE+2!*
%ZIS("A" DATE+2*
DIC SPEC+3!*, MSP+3!*
DIC("A" SPEC+3*, MSP+3*
DIC("S" SPEC+3*
DIC(0 SPEC+3*, MSP+3*
DTIME ASK+1, END+1, HELP+2, SPECSPEC+2, MSPMSP+2
>> EDATE DATEENEN+1
IO EN
IO("Q" DATE+2!, DATE+3!
IOF ASKENDEND+2, SPECMSP
IOP DATE+2!
IOST ENDEND+1
POP DATE+2!
>> SDATE DATEENEN+1
>> SRFLG SRSCPT+2*, ASK+3*, ASK+4
SRFRTO EN~*
>> SRINST DATE+1*
>> SRSDT EN+1*
>> SRSEDT EN+1*
>> SRSITE("SITE" DATE+1
>> SRSOUT SRSCPT+2*, ASK+2, ASK+3, ASK+4, DATEDATE+2*, DATE+3*, END+1, HELP+2*, SPEC*
SPEC+3*, MSP*, MSP+3*
>> SRSPEC SRSCPT+2*, EN+2, SPEC+3*, MSP+3*
>> SRSPECN SPEC+3*, MSP+3*
SRTN END+2!
>> SRYN SPEC*, SPEC+1*, SPEC+2, SPEC+3, MSP*, MSP+1*, MSP+2, MSP+3
>> X ASK+1*, ASK+2*, ASK+3, END+1*, HELP+2*, SPEC+2*, MSP+2*
>> Y EN*, SPEC+3, MSP+3
>> Y(0 SPEC+3, MSP+3
>> ZTDESC DATE+3*
>> ZTQUEUED END
>> ZTREQ END*
>> ZTRTN DATE+3*
>> ZTSAVE("EDATE" DATE+3*
>> ZTSAVE("SDATE" DATE+3*
>> ZTSAVE("SRFLG" DATE+3*
>> ZTSAVE("SRINST" DATE+3*
>> ZTSAVE("SRSITE*" DATE+3*
>> ZTSAVE("SRSPEC*" DATE+3*
>> ZTSTOP END
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All