Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^SRO(137.45

Package: Surgery

Global: ^SRO(137.45


Information

FileMan FileNo FileMan Filename Package
137.45 LOCAL SURGICAL SPECIALTY Surgery

Description

Directly Accessed By Routines, Total: 138

Package Total Routines
Surgery 135 DONOR RACE    SRCHL7A    SRHLUO    SROACC1    SROACC4    SROACC6    SROAEX    SROALC
SROALCP    SROALCS    SROALCSP    SROALET    SROALL    SROALLP    SROALLS    SROALM
SROALMN    SROALNC    SROALSS    SROALST    SROALSTP    SROALTSP    SROANTP    SROANTSP
SROAOP1    SROAR1    SROAT1P    SROATM1    SROAUTL3    SROCAN0    SRODIS0    SRODLA1
SRODLT0    SRODLT2    SROINQ    SROMORT    SROPCE0    SROPCE0A    SROPCEU    SROPCEX
SROPLIST    SROPPC    SROPRI1    SROQADM    SROQD1    SROQIDP0    SROQN    SRORAT1
SROSPSS    SROUNV2    SROUTUP    SROWC1    SROWC2    SROWC3    SROWL    SRSCD
SRSCDS    SRSCHAP    SRSCOR    SRSCPT2    SRSRQST    SRSUTIN    SRSWL1    SRSWL11
SRSWL12    SRSWL7    SRSWLST    ^SRO(137.45    SRHLVUO    SROACC2    SROACC3    SROACC5
SROACMP    SROALEC    SROALLSP    SROALSL    SROALSSP    SROALT    SROALTP    SROALTS
SROANT    SROANTS    SROAPRT3    SROAR2    SROAT0P    SROAT1T    SROATMNO    SROATT2
SROAUTLC    SROCMP    SROCON    SRODELA    SRODLA2    SRODPT    SROERR1    SROICU1
SROICU2    SROPCE    SROPCE0B    SROPCEP    SROPCEU0    SROPFSS    SROPLSTS    SROPRE0
SROPRI    SROPRI2    SROQD    SROQD0    SROQL    SRORAT2    SROREA1    SROREA2
SROREQ1    SROREQ4    SROSPC1    SROWL0    SRSAVL1    SRSCDS1    SRSCDW    SRSCDW1
SRSCHCA    SRSCHUN    SRSPUT0    SRSRBS1    SRSRBW    SRSRBW1    SRSREQ    SRSWL
SRSWL10    SRSWL13    SRSWL3    SRSWL6    SRSWL8    SRSWL9    SRSWREQ    
DSS Extracts 2 ECXSURG    ECXUSUR1    
IFCAP 1 PRCPRPC1    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
DSS Extracts 1 ECXUTL6    

Pointed To By FileMan Files, Total: 10

Package Total FileMan Files
Surgery 9 SURGERY(#130)[.04]    SPECIAL INSTRUMENTS(#131.02)[#131.23(.01)]    SPECIAL SUPPLIES(#131.04)[#131.45(.01)]    PHARMACY ITEMS(#131.06)[#131.64(.01)]    OPERATION TIMES(#131.25)[.01]    SPECIAL EQUIPMENT(#131.3)[#131.34(.01)]    PLANNED IMPLANT(#131.5)[#131.56(.01)]    SURGERY WAITING LIST(#133.8)[.01]    SURGERY UTILIZATION(#131.8)[#131.82(.01)]    
IFCAP 1 INVENTORY DISTRIBUTED PATIENT SUPPLIES(#446.1)[130.03]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Registration 1 SURGICAL SPECIALTY(#45.3)[1]    
Scheduling 1 HOSPITAL LOCATION(#44)[2]    

Fields, Total: 6

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>40!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  FEB 12, 1993
  • HELP-PROMPT:  Answer must be 3-40 characters in length.
  • DESCRIPTION:  
    This is the name of the 'local' surgical specialty used at this site.
  • DELETE TEST:  1,0)= W !,"Deletion from the Local Surgical Specialty file is not allowed !! ",*7 I 1
  • CROSS-REFERENCE:  137.45^B1^MUMPS
    1)= S ^SRO(137.45,"B1",$E(X,1,40),DA)=""
    2)= K ^SRO(137.45,"B1",$E(X,1,40),DA)
    The B1 cross reference on the NAME field is used for lookup purposes. It displays the entire name as defined in the NAME field (up to 40 characters).
1 NATIONAL SURGICAL SPECIALTY 0;2 POINTER TO SURGICAL SPECIALTY FILE (#45.3)
************************REQUIRED FIELD************************
SURGICAL SPECIALTY(#45.3)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U)?2N&(+^(0)>47&(+^(0)<63)!(+^(0)=78))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • OUTPUT TRANSFORM:  I '$D(SRCUSS("OUT")),Y'="" S Y=$P(^DIC(45.3,Y,0),"^",2)
  • LAST EDITED:  JUL 19, 2007
  • HELP-PROMPT:  Enter the 'national' Surgical Specialty in file 45.3 to which this 'local' surgical specialty points.
  • DESCRIPTION:  
    This is the 'national' surgical specialty in file 45.3 to which this 'local' specialty points.
  • SCREEN:  S DIC("S")="I $P(^(0),U)?2N&(+^(0)>47&(+^(0)<63)!(+^(0)=78))"
  • EXPLANATION:  Screen allows selection of standard entries only.
  • CROSS-REFERENCE:  137.45^C
    1)= S ^SRO(137.45,"C",$E(X,1,30),DA)=""
    2)= K ^SRO(137.45,"C",$E(X,1,30),DA)
2 ASSOCIATED CLINIC 0;5 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I $$HL^SROUTL0(Y,$G(SRSITE(""DIV""))),$$ACTCLIN^SROUTL(Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 11, 1998
  • HELP-PROMPT:  Enter the clinic location associated with this specialty.
  • DESCRIPTION:  
    This is the default clinic associated with operations or procedures performed by this surgical specialty. This information is used to document patient encounters in the VISIT file (#900010).
  • SCREEN:  S DIC("S")="I $$HL^SROUTL0(Y,$G(SRSITE(""DIV""))),$$ACTCLIN^SROUTL(Y)"
  • EXPLANATION:  Select active, count clinic only for user's division.
10 INACTIVE? 0;3 SET
  • '1' FOR YES;

  • LAST EDITED:  JUN 04, 1992
  • HELP-PROMPT:  Enter 'YES' to inactivate this file entry.
  • DESCRIPTION:  
    Enter 'YES' to make this specialty inactive and to prevent its selection and use by users in the Surgery Package.
11 CODE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  JAN 28, 1993
  • HELP-PROMPT:  Your answer must be 1-5 characters in length.
  • DESCRIPTION:  This is a code used for selecting local surgical specialties. Your answer may be a number, number/letter combination, or brief alphabetic code. The specialty code is optional.
  • CROSS-REFERENCE:  137.45^D
    1)= S ^SRO(137.45,"D",$E(X,1,30),DA)=""
    2)= K ^SRO(137.45,"D",$E(X,1,30),DA)
    This is a regular cross reference used for lookup on the Local Surgical Specialty file.
12 ROBOTIC DEFAULT 0;6 SET
  • 'NO' FOR NO - ROBOTICS NOT USED;

  • LAST EDITED:  FEB 11, 2021
  • HELP-PROMPT:  Enter NO to automatically set the ROBOTIC ASSISTANCE (Y/N) field to NO when cases are created for this specialty.
  • DESCRIPTION:  Setting this field to NO - ROBOTICS NOT USED will cause the software to automatically set the ROBOTIC ASSISTANCE (Y/N) field to NO when a surgical case is created and this specialty is selected. The value of the ROBOTIC
    ASSISTANCE (Y/N) for the case can still be modified for the case later.
    Leave this field blank if the specialty uses robotics for any procedures.

Found Entries, Total: 13

NAME: GENERAL(OR WHEN NOT DEFINED BELOW)    NAME: GYNECOLOGY    NAME: NEUROSURGERY    NAME: OPHTHALMOLOGY    NAME: ORTHOPEDICS    NAME: OTORHINOLARYNGOLOGY (ENT)    NAME: PLASTIC SURGERY (INCLUDES HEAD AND NECK)    NAME: PROCTOLOGY    
NAME: THORACIC SURGERY (INC. CARDIAC SURG.)    NAME: UROLOGY    NAME: ORAL SURGERY (DENTAL)    NAME: PODIATRY    NAME: PERIPHERAL VASCULAR    

ICR, Total: 3

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #991
  • IFCAP
    		•  NAME (.01).
    Access: Pointed to

    NAME (.01).
    Access: Direct Global Read & w/Fileman
    ICR #1002
  • QUALITY IMPROVEMENT CHECKLIST
    		•  NAME (.01).
    Access: Read w/Fileman
    ICR #1855
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
    		•  NATIONAL SURGICAL SPECIALTY (1).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    ^DIC 1+1, 2+1
    Y^DIQ ID1+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(45.3 ID1+1
    ^DIC(45.3 - [#45.3] ID1+1, 1OT+1
    ^SRO(137.45 - [#137.45] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 11(XREF 1S), 11(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, ID11+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %I ID1+1*!
    >> C ID1+1*
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 11(XREF 1S), 11(XREF 1K)
    DIC ID1+1, 1+1!*, 2+1!*
    DIC("S" 1+1*, 1SCR+1*, 2+1*, 2SCR+1*
    >> DIE 1+1, 2+1
    >> SRCUSS("OUT" 1OT+1
    U ID1+1, ID11+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1*!, 1(XREF 1S), 1(XREF 1K), 2+1*!, 11+1!, 11(XREF 1S), 11(XREF 1K)
    >> Y ID1+1*, 1+1, 1OT+1*, 2+1
    >> Y(0 1OT+1*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All