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 | 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

This file contains the Surgical Specialties used locally. This file contains all the entries in the national SURGICAL SPECIALTY file (45.3) as well as locally created entries. All entries should point to a standard entry in the national SURGICAL SPECIALTY file.

Directly Accessed By Routines, Total: 136

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

Accessed By FileMan Db Calls, Total: 3

Package	Total	Routines
Surgery	2	SROPOST SROPOST1
IHS Changes To ADT	1	BDGIPL31

Pointed To By FileMan Files, Total: 4

Package	Total	FileMan Files
Surgery	4	SURGERY(#130)[.04] OPERATION TIMES(#131.25)[.01] SURGERY WAITING LIST(#133.8)[.01] SURGERY UTILIZATION(#131.8)[#131.82(.01)]

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: 5

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.

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 EXTRACTS	NATIONAL SURGICAL SPECIALTY (1). Access: Direct Global Read & w/Fileman

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | All