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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: SROANEST

Package: Surgery

Routine: SROANEST


Information

SROANEST ;BIR/TJH - ANESTHESIA ENTRY ;01 Jun 2003

Source Information

Source file <SROANEST.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 ^%DT  C^%DTC  FILE^DIE  $$GET1^DIQ  
Surgery 1 HELP^SROCON  

Entry Points

Name Comments DBIA/ICR reference
HELP ;
ASK2 ;
ANESTIME(SRDFN,SRFDATE,SRTDATE) ; API to return multiple anesthesia records and times
  • ICR #4427
    • Status: Active
    • Usage: Private
    BILLTIME() ; calculate total minutes for mult anes start and end times
    CSET ; caled by set xref of mult anes start and end times used for concurrent case anes field stuffing
    SINPUT ;
    DEL ; called by kill xref of mult anes start and end times
    STIME ;
    ASK
    FINALT
    CALC ; calculate minutes between start and end times
    CHKTIME ; verify blocks of time are valid

    External References

    Name Field # of Occurrence
    ^%DT SINPUT+2
    C^%DTC CALC+2, CALC+3
    FILE^DIE STIME+10, ASK+3, ASK+9, ASK2+4, ASK2+5, CSET+7, DEL+2, DEL+3
    $$GET1^DIQ STIME+3, STIME+7, FINALT+3, ASK+7, CHKTIME+4, CHKTIME+9, CSET+2, CSET+5, CSET+6, BILLTIME+3
    , BILLTIME+6, ANESTIME+19, ANESTIME+28
    HELP^SROCON ASK2+2

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"The time entered is before the 'TIME PAT IN HOLD AREA'. Please check the",!,"DATE/TIME entered for this field."
    • Line Location: SINPUT+14
    Function Call: WRITE
    • Prompt: !!,"Start time is after current end time. Please correct."
    • Line Location: STIME+4
    Function Call: WRITE
    • Prompt: !!,"New start time entry not permitted until previous end time is entered."
    • Line Location: STIME+8
    Function Call: WRITE
    • Prompt: !!,"Start time is prior to previous end time. Please correct."
    • Line Location: STIME+9
    Function Call: WRITE
    • Prompt: !!,"End time prior to start time. Please correct."
    • Line Location: FINALT+4
    Function Call: READ
    • Timeout: DTIME
    • Variable: SRYN
    • Line Location: ASK+0
    Function Call: WRITE
    • Prompt: !,"Invalid response, please enter Yes or No. Use ? for help."
    • Line Location: ASK+1
    Function Call: READ
    • Timeout: DTIME
    • Variable: SRYN
    • Line Location: ASK2+1
    Function Call: WRITE
    • Prompt: !,"Invalid response, please enter Yes or No. Use ? for help."
    • Line Location: ASK2+3
    Function Call: WRITE
    • Prompt: !!,"One or more time entries missing end time. Please correct."
    • Line Location: CHKTIME+6
    Function Call: WRITE
    • Prompt: !!,"Some time entries overlap. Please correct."
    • Line Location: CHKTIME+10
    Function Call: WRITE
    • Prompt: !,"Enter ""Y"" only if the block of time entered is the final block of time for"
    • Line Location: HELP+1
    Function Call: WRITE
    • Prompt: !,"this case. If the block of time is not the final block, enter ""N""."
    • Line Location: HELP+2
    Routine Call
    • DIE
    • Line Location:
      • STIME+10
      • ASK+3
      • ASK+9
      • ASK2+4
      • ASK2+5
      • CSET+7
      • DEL+2
      • DEL+3

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^SRF - [#130] GET1^DIQ
    130.213 GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^SRF - [#130] SINPUT+2, SINPUT+12, STIME+5, FINALT+2, FINALT+5, ASK+6, ASK2+4, CHKTIME+3, CHKTIME+5, CHKTIME+7
    , CSET+4, DEL+3, BILLTIME+4, BILLTIME+5, ANESTIME+11, ANESTIME+12, ANESTIME+13, ANESTIME+21, ANESTIME+23, ANESTIME+25
    , ANESTIME+27
    ^SRF("B" ANESTIME+5, ANESTIME+7
    ^SRO(136 - [#136] ANESTIME+20
    ^TMP("SRANES" ANESTIME+29!, ANESTIME+31*

    Label References

    Name Line Occurrences
    ASK ASK+1, ASK+2
    ASK2 ASK2+2, ASK2+3
    CALC BILLTIME+7, ANESTIME+30
    CHKTIME ASK+4
    HELP ASK+2, ASK2+2

    Naked Globals

    Name Field # of Occurrence
    ^("CON" FINALT+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %DT SINPUT+2!*
    %H CALC+1~, CALC+2, CALC+3
    >> D DEL+2, DEL+3
    >> D0 BILLTIME+3, BILLTIME+4, BILLTIME+5, BILLTIME+6
    >> DA(1 SINPUT+2, SINPUT+12, STIME+3, STIME+5, STIME+7, STIME+10, FINALT+2, FINALT+3, FINALT+5, ASK+3
    , ASK+6, ASK+7, ASK+9, CHKTIME+3, CHKTIME+4, CHKTIME+5, CHKTIME+7, CHKTIME+9, CSET+2, CSET+4
    , CSET+5, CSET+6, CSET+7, DEL+2, DEL+3
    >> DA(2 STIME+3, STIME+5, STIME+10, FINALT+3, FINALT+5, ASK+7, ASK+8, DEL+1, DEL+2, DEL+3
    DTIME ASK, ASK2+1
    SR ANESTIME+1~
    SR(0 ANESTIME+23*, ANESTIME+24
    SRAFLAG ASK+5!, ASK+10!, CHKTIME+2*, CHKTIME+6*, CHKTIME+10*
    SRAFLAG1 CHKTIME+1~, CHKTIME+2*, CHKTIME+3, CHKTIME+6*, CHKTIME+8*, CHKTIME+10*
    SRAO ANESTIME+1~, ANESTIME+22*, ANESTIME+24*, ANESTIME+31
    SRCASE ANESTIME+1~, ANESTIME+10*, ANESTIME+11, ANESTIME+12, ANESTIME+13, ANESTIME+18*, ANESTIME+19, ANESTIME+20, ANESTIME+21, ANESTIME+23
    , ANESTIME+25, ANESTIME+27, ANESTIME+28, ANESTIME+29, ANESTIME+31
    SRCASE( ANESTIME+7*, ANESTIME+9, ANESTIME+10, ANESTIME+15!, ANESTIME+17, ANESTIME+18
    SRCET CHKTIME+1~, CHKTIME+4*, CHKTIME+6, CHKTIME+10, CSET+1~, CSET+6*, CSET+7, BILLTIME+1~, BILLTIME+6*, CALC+3
    , CALC+6, CALC+9, ANESTIME+1~, ANESTIME+28*, ANESTIME+29, ANESTIME+31
    SRCNT ANESTIME+1~, ANESTIME+2*, ANESTIME+7*
    SRCON FINALT+1~, FINALT+2*, ASK+11, ASK2+4, ASK2+5
    SRCRET STIME+2~, STIME+3*, STIME+4
    SRCST FINALT+1~, FINALT+3*, FINALT+4, CHKTIME+1~, CHKTIME+4*, CSET+1~, CSET+5*, CSET+7, BILLTIME+1~, BILLTIME+6*
    , CALC+2, CALC+5, CALC+8, ANESTIME+1~, ANESTIME+28*, ANESTIME+31
    SRCV ANESTIME+1~, ANESTIME+24*, ANESTIME+31
    SRDATE ANESTIME+1~, ANESTIME+12*, ANESTIME+13*, ANESTIME+14*, ANESTIME+15
    SRDFN ANESTIME~, ANESTIME+3, ANESTIME+5, ANESTIME+7, ANESTIME+31
    SRDHRS CALC+1~, CALC+4*, CALC+7*, CALC+11
    SRDIAG ANESTIME+1~, ANESTIME+20*, ANESTIME+21*, ANESTIME+31
    SREC ANESTIME+1~, ANESTIME+22*, ANESTIME+24*, ANESTIME+31
    SREHR CALC+1~, CALC+6*, CALC+7*, CALC+10*, CALC+11
    SREMN CALC+1~, CALC+9*, CALC+10*, CALC+11
    SRETH CALC+1~, CALC+3*, CALC+4
    SRFDA FINALT+1~, ASK+3!, ASK2+4!, DEL+2!, DEL+3!
    SRFDA(130 ASK+3*, ASK2+4*, DEL+2*, DEL+3*
    SRFDATE ANESTIME~, ANESTIME+3, ANESTIME+4, ANESTIME+6*, ANESTIME+15
    SRFLAG SINPUT+3!, SINPUT+13!, SINPUT+15!
    SRHNC ANESTIME+1~, ANESTIME+22*, ANESTIME+24*, ANESTIME+31
    SRIR ANESTIME+1~, ANESTIME+22*, ANESTIME+24*, ANESTIME+31
    SRLET FINALT+1~, ASK+7*, ASK+8*, ASK+9
    SRLREC FINALT+1~, ASK+6*, ASK+7, ASK+8, CHKTIME+1~, CHKTIME+5*, CHKTIME+6
    SRMST ANESTIME+1~, ANESTIME+22*, ANESTIME+24*, ANESTIME+31
    SRNON ANESTIME+1~, ANESTIME+11*, ANESTIME+12, ANESTIME+13
    SRNST CHKTIME+1~, CHKTIME+9*, CHKTIME+10
    SRPET STIME+2~, STIME+7*, STIME+8, STIME+9
    SRQO ANESTIME+1~
    SRREC ANESTIME+1~, ANESTIME+2*, ANESTIME+7*, ANESTIME+8*, ANESTIME+9*, ANESTIME+10, ANESTIME+15, ANESTIME+16*, ANESTIME+17*, ANESTIME+18
    , ANESTIME+26*, ANESTIME+27*, ANESTIME+28, ANESTIME+29*
    SRRES ANESTIME+1~, ANESTIME+2*, ANESTIME+19*, ANESTIME+25*, ANESTIME+26*, ANESTIME+29*, ANESTIME+32
    SRSC ANESTIME+1~, ANESTIME+24*, ANESTIME+31
    SRSHAD ANESTIME+1~, ANESTIME+22*, ANESTIME+24*, ANESTIME+31
    SRSHR CALC+1~, CALC+5*, CALC+7, CALC+11
    SRSMN CALC+1~, CALC+8*, CALC+10, CALC+11
    SRSNREC FINALT+1~, FINALT+5*, FINALT+6, CHKTIME+1~, CHKTIME+7*, CHKTIME+8, CHKTIME+9
    SRSPREC STIME+2~, STIME+5*, STIME+6, STIME+7
    SRSREC CHKTIME+1~, CHKTIME+2*, CHKTIME+3*, CHKTIME+4, CHKTIME+6, CHKTIME+7, CSET+1~, CSET+3*, CSET+4*, CSET+5
    , CSET+6, BILLTIME+1~, BILLTIME+2*, BILLTIME+5*, BILLTIME+6, ANESTIME+1~
    SRSTART SINPUT+1~, SINPUT+12*, SINPUT+13, SINPUT+14
    SRSTH CALC+1~, CALC+2*, CALC+4
    SRTDATE ANESTIME~, ANESTIME+4*, ANESTIME+6*, ANESTIME+15
    SRTIME STIME+2~, FINALT+1~, CSET+1~
    SRTIME(130 STIME+10*, ASK+9*, ASK2+5*, CSET+7*
    >> SRTN SINPUT+2, SINPUT+12
    SRTTIME BILLTIME+1~, BILLTIME+2*, BILLTIME+3, BILLTIME+4, BILLTIME+8, CALC+12*, ANESTIME+1~, ANESTIME+30*, ANESTIME+31
    SRX ANESTIME+1~, ANESTIME+12*, ANESTIME+13*
    SRYN FINALT+1~, ASK*, ASK+1*, ASK+2, ASK+3, ASK2+1*, ASK2+2, ASK2+3*, ASK2+4
    X SINPUT+2*!, SINPUT+3, SINPUT+11, SINPUT+14, STIME+1, STIME+4!, STIME+8!, STIME+9!, STIME+10, FINALT+4!
    , ASK+8
    X1 CALC+1~, CALC+2*, CALC+3*
    X2 CALC+1~, CALC+2*, CALC+3*
    Y SINPUT+2, CALC+1~, CALC+11*, CALC+12
    Z SINPUT+2*!
    Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All