STANDARD DATA DICTIONARY #409.95 -- PRINT MANAGER CLINIC SETUP FILE 3/24/25 PAGE 1
STORED IN ^SD(409.95, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file defines which encounter forms to use for a particular clinic.
Also, this file can be used to define other forms or reports to print, along with the encounter forms. The idea is that for each
appointment a packet of forms can be printed, saving the effort of collating the forms manually.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: REPORT(A), PRINT CONDITION(A1), EXCLUDED REPORT(AE), CLINIC(B), BASIC DEFAULT ENCOUNTER FORM(C),
SUPPLMNTL FORM - ESTBLSHED PT.(D), SUPPLMNTL FORM - FIRST VISIT(E), FORM W/O PATIENT DATA(F),
SUPPLMNTL FORM #1 ALL PATIENTS(G), RESERVED FOR FUTURE USE(H), SUPPLMNTL FORM #2 ALL PATIENTS(I),
SUPPLMNTL FORM #3 ALL PATIENTS(J)
409.95,.01 CLINIC 0;1 POINTER TO HOSPITAL LOCATION FILE (#44) (Required)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)=""C""!($P(^(0),U,3)=""W"")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 08, 2001
HELP-PROMPT: Enter the clinic the print manager setup is for. Currently, only active outpatient clinics and
wards are supported.
DESCRIPTION:
Enter a clinic or ward.
SCREEN: S DIC("S")="I $P(^(0),U,3)=""C""!($P(^(0),U,3)=""W"")"
EXPLANATION: Encounter forms are for clinics or wards.
CROSS-REFERENCE: 409.95^B
1)= S ^SD(409.95,"B",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"B",$E(X,1,30),DA)
409.95,.02 BASIC DEFAULT ENCOUNTER FORM 0;2 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 06, 1993
HELP-PROMPT: What form will be the default form printed with patient data for a patient with an appointment?
DESCRIPTION:
The encounter form that will be printed for every appointment.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow tool kit forms or forms of type other than encounter forms.
CROSS-REFERENCE: 409.95^C
1)= S ^SD(409.95,"C",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"C",$E(X,1,30),DA)
409.95,.03 SUPPLMNTL FORM - ESTBLSHED PT. 0;3 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 18, 1993
HELP-PROMPT: What supplemental form should be printed for patients that have been seen before?
DESCRIPTION: This is a supplemental form that will print only for patients that have been seen in the clinic
previously.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow tool kit forms or forms that are not of type encounter form.
CROSS-REFERENCE: 409.95^D
1)= S ^SD(409.95,"D",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"D",$E(X,1,30),DA)
409.95,.04 SUPPLMNTL FORM - FIRST VISIT 0;4 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 06, 1993
HELP-PROMPT: What supplemental form should be printed for first time patients?
DESCRIPTION: This is a supplemental for that will print only for patients that have not been seen previously at
the clinic.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow tool kit forms or forms that are not of type encounter form.
CROSS-REFERENCE: 409.95^E
1)= S ^SD(409.95,"E",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"E",$E(X,1,30),DA)
409.95,.05 FORM W/O PATIENT DATA 0;5 POINTER TO ENCOUNTER FORM FILE (#357)
FORM TO PRINT WITH NO PATIENT DATA
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: SEP 10, 1993
HELP-PROMPT: Enter the form that should print in cases where you do not want patient data printed on the form.
DESCRIPTION: This is the encounter form that should be printed for unscheduled visits. It may have a space in
the top left hand corner for imprinting the embossed patient card or space to write in the name,
ssn, etc.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow tool kit forms or forms that are not of type encounter form.
CROSS-REFERENCE: 409.95^F
1)= S ^SD(409.95,"F",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"F",$E(X,1,30),DA)
409.95,.06 SUPPLMNTL FORM #1 ALL PATIENTS 0;6 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: DEC 07, 1994
HELP-PROMPT: You may require a supplemental form to be used for all appointments for this clinic.
DESCRIPTION: This is a supplemental form to be used by all patients of the clinic. A form in this category
should not also be in one of the other categories for supplemental forms, else it will be printed
twice.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow tool kit forms or forms that are not of type encounter form.
CROSS-REFERENCE: 409.95^G
1)= S ^SD(409.95,"G",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"G",$E(X,1,30),DA)
Used to find all clinics using this form as a supplemental form for all patients.
409.95,.07 RESERVED FOR FUTURE USE 0;7 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAY 24, 1994
HELP-PROMPT: Assign a form to this category if you don't want it to print for appointments.
DESCRIPTION: This category was created for clinics to assign new forms that are not yet complete without fear
that they would be accidently printed.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow tool kit forms or forms that are not of type encounter form.
CROSS-REFERENCE: 409.95^H
1)= S ^SD(409.95,"H",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"H",$E(X,1,30),DA)
Used to track forms assigned to a clinic but not in current use.
409.95,.08 SUPPLMNTL FORM #2 ALL PATIENTS 0;8 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: DEC 07, 1994
HELP-PROMPT: You can require this supplmental form to be used for all appointments for this clinic.
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow toolkit forms or forms that are not of type encoutner form.
CROSS-REFERENCE: 409.95^I
1)= S ^SD(409.95,"I",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"I",$E(X,1,30),DA)
Used to find all clinics using this form as a suplemental form for all patients.
409.95,.09 SUPPLMNTL FORM #3 ALL PATIENTS 0;9 POINTER TO ENCOUNTER FORM FILE (#357)
INPUT TRANSFORM: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 24, 1997
HELP-PROMPT: You can require this supplemental for to be used for all appointments for this clinic.
TECHNICAL DESCR:
SCREEN: S DIC("S")="I '$P($G(^(0)),U,7),$P($G(^(0)),U,4)'>1"
EXPLANATION: Does not allow toolkit forms or forms that are not of type encounter form.
CROSS-REFERENCE: 409.95^J
1)= S ^SD(409.95,"J",$E(X,1,30),DA)=""
2)= K ^SD(409.95,"J",$E(X,1,30),DA)
Used to find all clinics using this form as a supplemental form for all patients.
409.95,.1 DON'T USE PCMM PROVIDERS 0;10 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: MAR 17, 1997
DESCRIPTION: AICS defaults to printing providers specified in PCMM if they are defined otherwise the providers
from the clinic setup is used. Answering this field "YES" for a clinic will cause AICS to print
the providers from clinic setup irregardless PCMM. This is intended for use by sites bringing up
PCMM but who have not completed the entry of providers.
409.95,1 REPORT 1;0 POINTER Multiple #409.9501
LAST EDITED: MAY 20, 1993
DESCRIPTION: This is a list of reports or forms that should be printed under certain circumstances. The only
types of forms or reports that can be printed are ones that are defined in the Package Interface
file.
SCREEN: S DIC("S")="I $P(^(0),U,6)=4,$P(^(0),U,9)=1"
EXPLANATION: Allows only package interfaces that print reports or other forms and that are available.
409.9501,.01 REPORT 0;1 POINTER TO PACKAGE INTERFACE FILE (#357.6) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,6)=4,$P(^(0),U,9)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAY 20, 1993
HELP-PROMPT: You can choose reports and other forms to print under conditions that you specify.
DESCRIPTION:
An entry in the Package Interface file that should identify a routine that prints the desired
form or report.
SCREEN: S DIC("S")="I $P(^(0),U,6)=4,$P(^(0),U,9)=1"
EXPLANATION: Allows only reports installed in the Package Interface file.
CROSS-REFERENCE: 409.9501^B
1)= S ^SD(409.95,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^SD(409.95,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 409.95^A^MUMPS
1)= I $P(^SD(409.95,DA(1),1,DA,0),U,2) S ^SD(409.95,"A",$P(^SD(409.95,DA(1),0),U),$P(^SD(409.95,DA(
1),1,DA,0),U,2),X,DA(1),DA)=""
2)= I $P(^SD(409.95,DA(1),1,DA,0),U,2) K ^SD(409.95,"A",$P(^SD(409.95,DA(1),0),U),$P(^SD(409.95,DA(
1),1,DA,0),U,2),X,DA(1),DA)
Allows all of the reports that should print under certain conditons for the clinic to be found.
The subscripts are ^SD(409.95,"A",,, ,
, ). It is not necessary to re-index the A1 cross-reference
on the PRINT CONDITION field if this field is re-indexed.
409.9501,.02 PRINT CONDITION 0;2 POINTER TO PRINT CONDITIONS FILE (#357.92) (Required)
LAST EDITED: MAY 18, 1993
HELP-PROMPT: Under what condition should the report be printed?
DESCRIPTION:
The particular condition under which the form or report should print.
EXECUTABLE HELP:D HELP6^IBDFU5A
CROSS-REFERENCE:409.95^A1^MUMPS
1)= S ^SD(409.95,"A",$P(^SD(409.95,DA(1),0),U),X,$P(^SD(409.95,DA(1),1,DA,0),U),DA(1),DA)=""
2)= K ^SD(409.95,"A",$P(^SD(409.95,DA(1),0),U),X,$P(^SD(409.95,DA(1),1,DA,0),U),DA(1),DA)
Allows all of the reports that should print under certain conditons for the clinic to be found. The
subscripts are ^SD(409.95,"A",,, , , ). It is not necessary to re-index the A cross-reference on the
REPORT field if this field is re-indexed.
409.9501,.03 SIMPLEX/DUPLEX 0;3 SET
'0' FOR SIMPLEX;
'1' FOR DUPLEX,LONG-EDGE BINDING;
'2' FOR DUPLEX,SHORT-EDGE BINDING;
LAST EDITED: JUN 27, 1994
HELP-PROMPT: SIMPLEX means one-sided, DUPLEX means two-sided. SHORT-EDGE BINDING is for attaching forms by the
top, LONG-EDGE BINDING is for attaching forms along the side.
DESCRIPTION:
Allows reports to be printed one-sided or two-sided.
409.95,2 EXCLUDED REPORT 2;0 POINTER Multiple #409.9502
DESCRIPTION: Used to override reports defined to print for the division. Reports defined to print for the
division will not print if they are excluded for the clinic.
SCREEN: S DIC("S")="I $P($G(^(0)),U,6)=4,$P($G(^(0)),U,9)=1"
EXPLANATION: Allows only available package interfaces that print reports.
409.9502,.01 EXCLUDED REPORT 0;1 POINTER TO PACKAGE INTERFACE FILE (#357.6) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="I $P($G(^(0)),U,6)=4,$P($G(^(0)),U,9)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 23, 1993
HELP-PROMPT: You may enter reports that you DO NOT want to print for this clinic. Entering an EXCLUDED REPORT
will prevent it from printing even if it is defined to print for the entire division.
DESCRIPTION: Used to override repots defined to print for the division. Reports defined to print for the
division will not print if they are excluded for the clinic.
SCREEN: S DIC("S")="I $P($G(^(0)),U,6)=4,$P($G(^(0)),U,9)=1"
EXPLANATION: Allows only available package interfaces that print reports.
CROSS-REFERENCE: 409.9502^B
1)= S ^SD(409.95,DA(1),2,"B",$E(X,1,30),DA)=""
2)= K ^SD(409.95,DA(1),2,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 409.95^AE^MUMPS
1)= S ^SD(409.95,"AE",$P(^SD(409.95,DA(1),0),U),X,DA(1),DA)=""
2)= K ^SD(409.95,"AE",$P(^SD(409.95,DA(1),0),U),X,DA(1),DA)
Used to determine if a particular report is defined NOT to print for a clinic.
FILES POINTED TO FIELDS
ENCOUNTER FORM (#357) BASIC DEFAULT ENCOUNTER FORM (#.02)
SUPPLMNTL FORM - ESTBLSHED PT. (#.03)
SUPPLMNTL FORM - FIRST VISIT (#.04)
FORM W/O PATIENT DATA (#.05)
SUPPLMNTL FORM #1 ALL PATIENTS (#.06)
RESERVED FOR FUTURE USE (#.07)
SUPPLMNTL FORM #2 ALL PATIENTS (#.08)
SUPPLMNTL FORM #3 ALL PATIENTS (#.09)
HOSPITAL LOCATION (#44) CLINIC (#.01)
PACKAGE INTERFACE (#357.6) REPORT:REPORT (#.01)
EXCLUDED REPORT:EXCLUDED REPORT (#.01)
PRINT CONDITIONS (#357.92) REPORT:PRINT CONDITION (#.02)
INPUT TEMPLATE(S):
IBDF PRINT MANAGER MAR 18, 1997@10:58 USER #0
Used to edit a clinic setup for the print manager.
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):