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