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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IBD(357.95

Package: Automated Information Collection System

Global: ^IBD(357.95


Information

FileMan FileNo FileMan Filename Package
357.95 FORM DEFINITION Automated Information Collection System

Description

Directly Accessed By Routines, Total: 35

Package Total Routines
Automated Information Collection System 35 BUBBLES    CLINICS USING THIS FORM    HAND PRINT FIELDS    IBD3KPT    IBDF18C    IBDF18D    IBDF18E    IBDF18E0
IBDF18E2    IBDF19    IBDFBKS    IBDFC2    IBDFDE    IBDFDE6    IBDFDEA    IBDFESP
IBDFFV3    IBDFM1    IBDFPRG1    IBDFRPC3    IBDX951    IBDX9510    IBDX9511    IBDX9512
IBDX952    IBDX953    IBDX954    IBDX955    IBDX956    IBDX957    IBDX958    IBDX959
PAGE INFORMATION    PANDAS HEADERS    ^IBD(357.95    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Automated Information Collection System 2 IBDF18D    IBDF19    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Automated Information Collection System 1 ENCOUNTER FORM TRACKING(#357.96)[.04]    

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
Automated Information Collection System 5 AICS DATA QUALIFIERS(#357.98)[#357.951(.1)#357.952(.1)]    ENCOUNTER FORM(#357)[.21]    SELECTION(#357.3)[#357.951(.14)]    PACKAGE INTERFACE(#357.6)[#357.951(.03)#357.952(.04)]    AICS DATA ELEMENTS(#359.1)[#357.952(.17)]    
Lexicon Utility 1 EXPRESSIONS(#757.01)[#357.951(2.02)]    
Scheduling 1 HOSPITAL LOCATION(#44)[#357.9501(.01)]    

Fields, Total: 21

Field # Name Loc Type Details
.01 FORM TYPE ID 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K X
  • LAST EDITED:  DEC 18, 1995
  • HELP-PROMPT:  Can not be entered through FileMan!
  • DESCRIPTION:  
    This number should be unique for the encounter form type. It equals the ien. Editing the form results in a new FORM TYPE ID being assigned.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  357.95^B
    1)= S ^IBD(357.95,"B",$E(X,1,30),DA)=""
    2)= K ^IBD(357.95,"B",$E(X,1,30),DA)
.02 DATE MARKED FOR DELETION 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 04, 1995
  • HELP-PROMPT:  Enter the date the form was deleted or edited.
  • DESCRIPTION:  
    The date is when the form was deleted or edited. When the last printed form is accounted for the entry can be deleted.
  • CROSS-REFERENCE:  357.95^ADEL
    1)= S ^IBD(357.95,"ADEL",$E(X,1,30),DA)=""
    2)= K ^IBD(357.95,"ADEL",$E(X,1,30),DA)
    Regular cross reference of file. Used to find entries marked for deletion by purge utility
.03 SOURCE 0;3 SET
************************REQUIRED FIELD************************
  • '1' FOR AICS;
  • '2' FOR PANDAS;
  • '3' FOR TELEFORM;
  • '4' FOR PEN;
  • '99' FOR OTHER;

  • LAST EDITED:  DEC 18, 1995
  • HELP-PROMPT:  What software will produce the form?
  • DESCRIPTION:  
    The software that produced the form.
  • CROSS-REFERENCE:  357.95^C
    1)= S ^IBD(357.95,"C",$E(X,1,30),DA)=""
    2)= K ^IBD(357.95,"C",$E(X,1,30),DA)
    Used to determine if the form type provided to Form Tracking was externally assigned.
.09 RIGHT MARGIN 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>133)!(X<80)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 19, 1995
  • HELP-PROMPT:  Type a Number between 80 and 133, 0 Decimal Digits
  • DESCRIPTION:  
    The width of the form in characters.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.1 PAGE LENGTH 0;10 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>300)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 23, 1994
  • HELP-PROMPT:  Type a Number between 1 and 300, 0 Decimal Digits
  • DESCRIPTION:  
    The length of the page.
.11 NUMBER OF PAGES 0;11 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  How many pages should the encounter form have?
  • DESCRIPTION:  
    The encounter form may have multiple pages.
.12 SCANNABLE? 0;12 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  Answer YES if the form will be scanned to accomplish data entry, NO otherwise.
.13 FORM TYPE ID 0;13 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
.14 PAPER SIZE 0;14 SET
  • '1' FOR LETTER (8 1/2 x 11);

  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  What size paper should be used?
.15 ORIENTATION 0;15 SET
  • 'p' FOR PORTRAIT;

  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  How should the form be oriented?
.16 TEXT SIZE 0;16 SET
************************REQUIRED FIELD************************
  • '1' FOR 133 COLUMNS x 80 LINES;
  • '2' FOR 96 COLUMNS x 72 LINES;
  • '3' FOR 80 COLUMNS x 60 LINES;

  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  This choice will determine the size of the print and how much text will fit on the form.
.17 VERSION 0;17 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  Type a Number between 0 and 99, 2 Decimal Digits
.2 DATE CREATED 0;20 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 18, 1995
  • DESCRIPTION:  
    This is the date that this entry was created. It is triggered when the entry is added.
    WRITE AUTHORITY: ^
.21 FORM NAME 0;21 POINTER TO ENCOUNTER FORM FILE (#357) ENCOUNTER FORM(#357)

  • LAST EDITED:  DEC 18, 1995
  • DESCRIPTION:  This is the name of the form when this entry was created. It is triggered when the entry is created.
  • TECHNICAL DESCR:  
    This field is hard set when the entry is created. See routine IBDFM1.
    WRITE AUTHORITY: ^
1 BUBBLES 1;0 Multiple #357.951 357.951

  • LAST EDITED:  OCT 20, 1994
  • DESCRIPTION:  
    The list of bubbles appearing on the form.
  • TECHNICAL DESCR:  
  • IDENTIFIED BY:  
    "WRITE": D EN^DDIOL(" COL = "_$P($G(^(0)),U,2)_" DISPLAY = "_$P($G(^(0)),U,8),"","?0")
2 HAND PRINT FIELDS 2;0 Multiple #357.952 357.952
3 PAGE INFORMATION 3;0 Multiple #357.953 357.953

  • LAST EDITED:  MAR 06, 1995
  • DESCRIPTION:  
    A list of the pages of a form that requires documentation of specific features.
10 CLINICS USING THIS FORM 10;0 POINTER Multiple #357.9501 357.9501

  • DESCRIPTION:  These are the clinics that use this form
  • TECHNICAL DESCR:  
    This field specifically added for PANDAS.
11 PANDAS HEADERS 11;0 Multiple #357.9511 357.9511

  • DESCRIPTION:  
    A list of headers used by PANDAS.
  • TECHNICAL DESCR:  
    This field was requested by the PANDAS project.
12.01 PANDAS TIMESTAMP 12;1 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 20, 1994
  • HELP-PROMPT:  When was the Pandas form last modified?
  • DESCRIPTION:  
    The date and time the PANDAS form was last modified.
  • TECHNICAL DESCR:  
    This field was requested by PANDAS.
13 PANDAS FORMID 12;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 22, 1995
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
  • DESCRIPTION:  
    The form identifier used by PANDAS.
  • TECHNICAL DESCR:  
    This field was requested by PANDAS.
  • CROSS-REFERENCE:  357.95^D
    1)= S ^IBD(357.95,"D",$E(X,1,30),DA)=""
    2)= K ^IBD(357.95,"D",$E(X,1,30),DA)
    Cross-reference to determine Pandas FORM ID.

External References

Name Field # of Occurrence
^%DT .02+1, .2+1, 12.01+1
Y^DIQ ID.21+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(357 ID.21+1
^IBD(357.95 - [#357.95] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), 13(XREF 1S), 13(XREF 1K)
^IBE(357 - [#357] ID.21+1

Naked Globals

Name Field # of Occurrence
^(0 ID.2+1, ID.21+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .02+1*, .2+1*, 12.01+1*
%I ID.21+1*!
>> C ID.21+1*
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), 13(XREF 1S), 13(XREF 1K)
>> DIC ID.03+1, ID.21+1
U ID.2+1, ID.21+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1*!, .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .09+1!, .1+1!
, .11+1!, .13+1!, .17+1!, .2+1*!, 12.01+1*!, 13+1!, 13(XREF 1S), 13(XREF 1K)
>> Y ID.21+1*, .02+1, .2+1, 12.01+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All