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