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 |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^SD(409.95

Package: Automated Information Collection System

Global: ^SD(409.95


Information

FileMan FileNo FileMan Filename Package
409.95 PRINT MANAGER CLINIC SETUP Automated Information Collection System

Description

Directly Accessed By Routines, Total: 34

Package Total Routines
Automated Information Collection System 34 EXCLUDED REPORT    IBDF11    IBDF14A    IBDF15A    IBDF18A    IBDF18B    IBDF1A    IBDF1B1A
IBDF1B2    IBDF1B5    IBDF1BA    IBDF6    IBDF6A    IBDF6C    IBDFC3    IBDFCNOF
IBDFDE6    IBDFDE7    IBDFDE8    IBDFFSMP    IBDFFT    IBDFFV1    IBDFFV2    IBDFOSG1
IBDFREG    IBDFRPC    IBDFU4    IBDFUTL1    IBDFUTL2    ^SD(409.95    ^SDAUDIT    IBDFUTL4
IBDFUTL5    REPORT    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Automated Information Collection System 3 IBDF11    IBDF6A    IBDFC3    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Automated Information Collection System 3 ENCOUNTER FORM(#357)[.02, .03, .04, .05, .06, .07, .08, .09]    PACKAGE INTERFACE(#357.6)[#409.9501(.01), #409.9502(.01)]    PRINT CONDITIONS(#357.92)[#409.9501(.02)]    
Scheduling 1 HOSPITAL LOCATION(#44)[.01]    

Fields, Total: 12

Field # Name Loc Type Details
.01 CLINIC 0;1 POINTER TO HOSPITAL LOCATION FILE (#44)
************************REQUIRED FIELD************************
HOSPITAL LOCATION(#44)

  • 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)
.02 BASIC DEFAULT ENCOUNTER FORM 0;2 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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)
.03 SUPPLMNTL FORM - ESTBLSHED PT. 0;3 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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)
.04 SUPPLMNTL FORM - FIRST VISIT 0;4 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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)
.05 FORM W/O PATIENT DATA 0;5 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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:  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)
.06 SUPPLMNTL FORM #1 ALL PATIENTS 0;6 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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.
.07 RESERVED FOR FUTURE USE 0;7 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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.
.08 SUPPLMNTL FORM #2 ALL PATIENTS 0;8 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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.
.09 SUPPLMNTL FORM #3 ALL PATIENTS 0;9 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#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.
.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.
1 REPORT 1;0 POINTER Multiple #409.9501 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.
2 EXCLUDED REPORT 2;0 POINTER Multiple #409.9502 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.

External References

Name Field # of Occurrence
^DIC .01+1, .02+1, .03+1, .04+1, .05+1, .06+1, .07+1, .08+1, .09+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SD(409.95 - [#409.95] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K), .05(XREF 1S), .05(XREF 1K)
, .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K), .08(XREF 1S), .08(XREF 1K), .09(XREF 1S), .09(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K), .05(XREF 1S), .05(XREF 1K)
, .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K), .08(XREF 1S), .08(XREF 1K), .09(XREF 1S), .09(XREF 1K)
DIC .01+1!*, .02+1!*, .03+1!*, .04+1!*, .05+1!*, .06+1!*, .07+1!*, .08+1!*, .09+1!*
DIC("S" .01+1*, .01SCR+1*, .02+1*, .02SCR+1*, .03+1*, .03SCR+1*, .04+1*, .04SCR+1*, .05+1*, .05SCR+1*
, .06+1*, .06SCR+1*, .07+1*, .07SCR+1*, .08+1*, .08SCR+1*, .09+1*, .09SCR+1*
>> DIE .01+1, .02+1, .03+1, .04+1, .05+1, .06+1, .07+1, .08+1, .09+1
X .01+1*!, .01(XREF 1S), .01(XREF 1K), .02+1*!, .02(XREF 1S), .02(XREF 1K), .03+1*!, .03(XREF 1S), .03(XREF 1K), .04+1*!
, .04(XREF 1S), .04(XREF 1K), .05+1*!, .05(XREF 1S), .05(XREF 1K), .06+1*!, .06(XREF 1S), .06(XREF 1K), .07+1*!, .07(XREF 1S)
, .07(XREF 1K), .08+1*!, .08(XREF 1S), .08(XREF 1K), .09+1*!, .09(XREF 1S), .09(XREF 1K)
>> Y .01+1, .02+1, .03+1, .04+1, .05+1, .06+1, .07+1, .08+1, .09+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All