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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: SROUTL1

Package: Surgery

Routine: SROUTL1


Information

SROUTL1 ;BIR/ADM - UTILITY ROUTINE ;1/13/2011

Source Information

Source file <SROUTL1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 EN^DDIOL  FILE^DIE  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
ATT ; check for attend surg when completing case
ASK
ATTP ; check for attend provider when completing non-OR procedure
ASKP
ZERO ; add leading zero to Dose amounts between 0 and 1 for clarity purposes, e.g. Dose entered as .5, will display as 0.5; called from input transform on the following Dose flds:
; .375 Medications mult 130.33, subfld 1 Time Adm mult 130.34, subfld 1 Dose
; .37 Anesthesia Technique mult 130.06, subfld 24 Anesthesia Agents mult 130.47, subfld 1 Dose (mg)
; .37 Anesthesia Technique mult 130.06, subfld 32 Test Does mult 130.48, subfld 1 Dose (mg)
WOND(Y) ; screen called by wound classification field #1.09
WCPT ;;43108,43113,43118,43123,43361,43645,43845,43847,44020,44021,44110,44111,44120,44121

External References

Name Field # of Occurrence
EN^DDIOL ASK+1, ASK+2, ASK+3, ASKP+1, ASKP+2, ASKP+3
FILE^DIE ASK+5, ASKP+5
^DIR ASK+4, ASKP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICPT("B" WOND+6, WOND+7
^SRF - [#130] ATT+1, ATT+2, ATTP+1, ATTP+2, WOND+3, WOND+4

Label References

Name Line Occurrences
ASK ATT+2
ASKP ATTP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA ATT+1, ATT+2, ASK+5, ATTP+1, ATTP+2, ASKP+5, WOND+2
DIR ASK+4!, ASKP+4!
DIR("A" ASK+4*, ASKP+4*
DIR(0 ASK+4*, ASKP+4*
>> DTOUT ASK+4, ASKP+4
>> DUOUT ASK+4, ASKP+4
SRCPT WOND+1~, WOND+4*, WOND+7
SREQ ASK~, ASKP~
SREQ(130 ASK+5*, ASKP+5*
SRF WOND+1~*, WOND+5, WOND+6, WOND+7*, WOND+8
SRI WOND+1~, WOND+6*
SRJ WOND+1~, WOND+5*
SRLIST WOND+1~, WOND+5*, WOND+6
>> SRTN WOND+2*, WOND+3, WOND+4
SRX WOND+1~, WOND+6*, WOND+7
SRY WOND+1~, WOND+7*
X ATT+2!, ASK~, ATTP+2!, ASKP~, ZERO+4*
Y ASK~, ASK+5, ASKP~, ASKP+5, WOND~

Marked Items

Name Field # of Occurrence
$T(WCPT+SRJ WOND+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All