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

Accessed By FileMan Db Calls, Total: 3

Pointed To By FileMan Files, Total: 4

Pointer To FileMan Files, Total: 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

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