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

Package: Automated Information Collection System

Global: ^IBE(358.5


Information

FileMan FileNo FileMan Filename Package
358.5 IMP/EXP DATA FIELD Automated Information Collection System

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Automated Information Collection System 2 SUBFIELD    ^IBE(358.5    
Integrated Billing 2 REPORT    SUBFIELD    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Automated Information Collection System 2 IMP/EXP ENCOUNTER FORM BLOCK(#358.1)[.02]    IMP/EXP PACKAGE INTERFACE(#358.6)[.03]    

Fields, Total: 13

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  APR 19, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    The name is used to identify the field within a block. It can be anything the designer of a form wants it to be.
  • CROSS-REFERENCE:  358.5^B
    1)= S ^IBE(358.5,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(358.5,"B",$E(X,1,30),DA)
.02 BLOCK 0;2 POINTER TO IMP/EXP ENCOUNTER FORM BLOCK FILE (#358.1)
************************REQUIRED FIELD************************
IMP/EXP ENCOUNTER FORM BLOCK(#358.1)

  • LAST EDITED:  NOV 18, 1992
  • HELP-PROMPT:  What block should this data field appear in?
  • DESCRIPTION:  
    The particular block the data field should appear in.
  • CROSS-REFERENCE:  358.5^C
    1)= S ^IBE(358.5,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(358.5,"C",$E(X,1,30),DA)
.03 TYPE OF DATA 0;3 POINTER TO IMP/EXP PACKAGE INTERFACE FILE (#358.6) IMP/EXP PACKAGE INTERFACE(#358.6)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,6)=2,$P(^(0),U,9)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 09, 1993
  • HELP-PROMPT:  What data should be displayed in this field?
  • DESCRIPTION:  
    The particular interface that should be invoked to obtain the data for display. Some of the interfaces don't actually return data, but are instead 'dummy' interfaces for the purpose of printing things like blank lines.
  • SCREEN:  S DIC("S")="I $P(^(0),U,6)=2,$P(^(0),U,9)=1"
  • EXPLANATION:  Allows only available output routines
.04 LAST ITEM INDICATOR 0;4 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 13, 1993
  • DESCRIPTION:  
    This field is used to indicate which item on a list is the last to be printed to the form. The remaining items can be printed to a separate piece of paper.
  • EXECUTABLE HELP:  W "Enter YES if this is the last item that should print, else enter NO."
.05 NUMBER ON LIST 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 13, 1993
  • HELP-PROMPT:  The data is a list of items. Which item on the list should be displayed?
  • DESCRIPTION:  
    For data returned by the package interface that is in the form of a list, this field indicates which one of the items on the list should be displayed to this field.
.06 TEXT LABEL 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>150!($L(X)<1) X
  • OUTPUT TRANSFORM:  NOT EXECUTABLE!! -- SPECIFIER NEEDS AN "O"!
  • LAST EDITED:  AUG 25, 1993
  • HELP-PROMPT:  You can optionally begin the text with a label of your choice.
  • DESCRIPTION:  
    The label that should precede the text.
.07 TEXT LABEL APPEARANCE 0;7 FREE TEXT

  • INPUT TRANSFORM:  S X=$$UPPER^VALM1(X) K:$L(X)>3!("UBR"'[$E(X,1))!("UBR"'[$E(X,2))!("UBR"'[$E(X,3)) X
  • LAST EDITED:  MAY 27, 1994
  • HELP-PROMPT:  B=bold,U=underline,R=reverse. You can enter BU to make the label bold and underlined.
  • DESCRIPTION:  
    The label can have characteristics, such as being underlined or emboldened.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.1 TEXT STARTING COLUMN 0;10 NUMBER

  • INPUT TRANSFORM:  S:+X=X X=X-1 K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X
  • OUTPUT TRANSFORM:  S Y=+Y+1
  • LAST EDITED:  MAY 27, 1994
  • HELP-PROMPT:  What block column should the text start at?
  • DESCRIPTION:  
    This field determines what column the text should begin in. Applies only if the Package Interface returns a word-processing field.
  • TECHNICAL DESCR:  The internal representation starts at 0, the external representation starts at 1. The difference is because for computing the form image it is convenient to work with displacements from the top left-hand corner. However,
    users do not want to work with row=0 or column=0.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.11 TEXT STARTING ROW 0;11 NUMBER

  • INPUT TRANSFORM:  S:+X=X X=X-1 K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X
  • OUTPUT TRANSFORM:  S:Y=+Y Y=Y+1
  • LAST EDITED:  MAY 27, 1994
  • HELP-PROMPT:  What block row should the text begin in?
  • DESCRIPTION:  
    Determines which line on the form, relative to the block, the text area should begin at. Only applies if the package interface returns a word-processing field.
  • TECHNICAL DESCR:  The internal representation starts at 0, the external representation starts at 1. The difference is because for computing the form image it is convenient to work with displacements from the top left-hand corner. However,
    users do not want to work with row=0 or column=0.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.12 NUMBER OF FORM LINES FOR TEXT 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>200)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 14, 1993
  • HELP-PROMPT:  How many lines of the form should be allocated for the text?
  • DESCRIPTION:  
    The number of lines on the form that should be allocated for the text.
.13 SPACING OF TEXT LINES 0;13 SET
  • '1' FOR SINGLE SPACED;
  • '2' FOR DOUBLE SPACED;
  • '3' FOR SINGLE, BUT DOUBLE IF BLANK;

  • LAST EDITED:  APR 14, 1993
  • HELP-PROMPT:  How do you want the text lines to be spaced?
  • DESCRIPTION:  
    Determines the spacing between lines of text.
.14 WIDTH OF TEXT LINES 0;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 14, 1993
  • HELP-PROMPT:  How many columns wide do you want the text?
  • DESCRIPTION:  
    Determines how many characters across should be allocated to the text.
2 SUBFIELD 2;0 Multiple #358.52 358.52

  • LAST EDITED:  MAR 23, 1993
  • DESCRIPTION:  
    A data field can be composed of multiple subfields. Each subfield can have a label and data.

External References

Name Field # of Occurrence
^DIC .03+1, .03+1
$$UPPER^VALM1 .07+1, .07+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(358.5 - [#358.5] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(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), .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)
DIC .03+1!*, .03+1!*
DIC("S" .03+1*, .03SCR+1*, .03+1*, .03SCR+1*
>> DIE .03+1, .03+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03+1*!, .05+1!, .06+1!, .07+1*!, .1+1*!
, .11+1*!, .12+1!, .14+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03+1*!, .05+1!
, .06+1!, .07+1*!, .1+1*!, .11+1*!, .12+1!, .14+1!
>> Y .03+1, .06OT+1*, .1OT+1*, .11OT+1*, .03+1, .06OT+1*, .1OT+1*, .11OT+1*
>> Y(0 .06OT+1*, .11OT+1*, .06OT+1*, .11OT+1*
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All