Sub-Field: 44.1

Parent File	Name	Number	Package
HOSPITAL LOCATION(#44)	PROVIDER	44.1	Scheduling

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PROVIDER	0;1	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) INPUT TRANSFORM: `S DIC("S")="I $$SCREEN^SDUTL2(Y,DT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `SEP 10, 2014` DESCRIPTION: `Enter in this field the providers associated with this clinic. These providers will then be displayed when updating the provider through Appointment Management or Check Out to assist the user in entering the correct` `provider.` SCREEN: `S DIC("S")="I $$SCREEN^SDUTL2(Y,DT)"` EXPLANATION: `Provider must be active and have an active entry in the NEW PERSON file for PERSON CLASS.` EXECUTABLE HELP: `D HELP^SDUTL2(DT)` CROSS-REFERENCE: `44.1^B` `1)= S ^SC(DA(1),"PR","B",$E(X,1,30),DA)=""` `2)= K ^SC(DA(1),"PR","B",$E(X,1,30),DA)` CROSS-REFERENCE: `44^AVADPR^MUMPS` `1)= S ^SC("AVADPR",X,DA(1),DA)=$P(^SC(DA(1),"PR",DA,0),U,2)` `2)= K ^SC("AVADPR",X,DA(1),DA)` `FINDS A PROVIDER'S CLINICS Cross-reference to easily find all clinics for a particular provider and if that provider is listed as default.`
.02	DEFAULT PROVIDER	0;2	SET	'0' FOR NO; '1' FOR YES; INPUT TRANSFORM: `I X,$D(^SC("ADPR",DA(1))),'$D(^(DA(1),DA)) W !?5,"A default provider has already been assigned for this clinic." K X` LAST EDITED: `MAR 26, 1993` DESCRIPTION: `Enter 'YES' in this field if the provider is the default for this clinic. Otherwise, enter 'NO'.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `44^ADPR^MUMPS` `1)= S:X ^SC("ADPR",DA(1),DA)=""` `2)= K ^SC("ADPR",DA(1),DA)`

.01

PROVIDER

0;1

POINTER TO NEW PERSON FILE (#200)

NEW PERSON(#200)

INPUT TRANSFORM: S DIC("S")="I $$SCREEN^SDUTL2(Y,DT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: SEP 10, 2014
DESCRIPTION: Enter in this field the providers associated with this clinic. These providers will then be displayed when updating the provider through Appointment Management or Check Out to assist the user in entering the correct
provider.
SCREEN: S DIC("S")="I $$SCREEN^SDUTL2(Y,DT)"
EXPLANATION: Provider must be active and have an active entry in the NEW PERSON file for PERSON CLASS.
EXECUTABLE HELP: D HELP^SDUTL2(DT)
CROSS-REFERENCE: 44.1^B
1)= S ^SC(DA(1),"PR","B",$E(X,1,30),DA)=""
2)= K ^SC(DA(1),"PR","B",$E(X,1,30),DA)
CROSS-REFERENCE: 44^AVADPR^MUMPS
1)= S ^SC("AVADPR",X,DA(1),DA)=$P(^SC(DA(1),"PR",DA,0),U,2)
2)= K ^SC("AVADPR",X,DA(1),DA)
FINDS A PROVIDER'S CLINICS Cross-reference to easily find all clinics for a particular provider and if that provider is listed as default.

.02

DEFAULT PROVIDER

0;2

SET

'0' FOR NO;
'1' FOR YES;

INPUT TRANSFORM: I X,$D(^SC("ADPR",DA(1))),'$D(^(DA(1),DA)) W !?5,"A default provider has already been assigned for this clinic." K X
LAST EDITED: MAR 26, 1993
DESCRIPTION:
Enter 'YES' in this field if the provider is the default for this clinic. Otherwise, enter 'NO'.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 44^ADPR^MUMPS
1)= S:X ^SC("ADPR",DA(1),DA)=""
2)= K ^SC("ADPR",DA(1),DA)

Customize PDF page

Package: Scheduling

HOSPITAL LOCATION(#44)-->44.1

Sub-Field: 44.1

Information

Details