Global: ^SRO(133.8

Information

FileMan FileNo	FileMan Filename	Package
133.8	SURGERY WAITING LIST	Surgery

This file contains information regarding the surgery waiting list for each surgical specialty. Patients entered into this file will later be moved into the Surgery file at the point that a request for surgery is made.

Package	Total	Routines
Surgery	26	SROPCE1 SROPOST0 SROWL SROWL0 SROXREF SRSRBS SRSRBS1 SRSRBW SRSRBW1 SRSRQST1 SRSWL SRSWL1 SRSWL10 SRSWL11 SRSWL12 SRSWL13 SRSWL14 SRSWL15 SRSWL2 SRSWL3 SRSWL4 SRSWL6 SRSWL7 SRSWL8 SRSWL9 SRSWREQ

Package	Total	Routines
Surgery	2	SROPOST0 SROWL

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SURGICAL SPECIALTY	0;1	POINTER TO LOCAL SURGICAL SPECIALTY FILE (#137.45)	**********************REQUIRED FIELD********************** LOCAL SURGICAL SPECIALTY(#137.45) INPUT TRANSFORM: `S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUN 04, 1992` HELP-PROMPT: `Enter the name of the Local Surgical Specialty.` DESCRIPTION: `This is the name of the Surgical Specialty. All entries in the Waiting List file have an associated Surgical Specialty.` SCREEN: `S DIC("S")="I '$P(^(0),U,3)"` EXPLANATION: `Screen prevents selection of inactive entries.` CROSS-REFERENCE: `133.8^B` 1)= S ^SRO(133.8,"B",$E(X,1,30),DA)="" 2)= K ^SRO(133.8,"B",$E(X,1,30),DA)
1	PATIENT	1;0	POINTER Multiple #133.801	133.801 DESCRIPTION: `This is the name of the patient.`

SURGICAL SPECIALTY

0;1

POINTER TO LOCAL SURGICAL SPECIALTY FILE (#137.45)

************************REQUIRED FIELD************************

INPUT TRANSFORM: S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 04, 1992
HELP-PROMPT: Enter the name of the Local Surgical Specialty.
DESCRIPTION: This is the name of the Surgical Specialty. All entries in the Waiting List file have an associated Surgical Specialty.
SCREEN: S DIC("S")="I '$P(^(0),U,3)"
EXPLANATION: Screen prevents selection of inactive entries.

CROSS-REFERENCE: 133.8^B

1)= S ^SRO(133.8,"B",$E(X,1,30),DA)=""

2)= K ^SRO(133.8,"B",$E(X,1,30),DA)

PATIENT

1;0

POINTER Multiple #133.801