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 |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IBE(358.7

Package: Automated Information Collection System

Global: ^IBE(358.7


Information

FileMan FileNo FileMan Filename Package
358.7 IMP/EXP FORM LINE Automated Information Collection System

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Automated Information Collection System 1 ^IBE(358.7    
Integrated Billing 1 REPORT    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Automated Information Collection System 1 IMP/EXP ENCOUNTER FORM BLOCK(#358.1)[.06]    

Fields, Total: 8

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

  • INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
  • HELP-PROMPT:  NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
  • DESCRIPTION:  
    The name given to the line. Lines should be given names that will allow them to be identifies, such as V(1,1), meaning a vertical line starting at coordinates (1,1).
  • CROSS-REFERENCE:  358.7^B
    1)= S ^IBE(358.7,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(358.7,"B",$E(X,1,30),DA)
.02 LINE STARTING COLUMN 0;2 NUMBER
************************REQUIRED FIELD************************

  • 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:  JUL 15, 1993
  • HELP-PROMPT:  Enter the block column the line should begin at.
  • DESCRIPTION:  
    The column, relative to the block, that the line should begin at.
  • 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
.03 LINE STARTING ROW 0;3 NUMBER
************************REQUIRED FIELD************************

  • 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:  JUL 15, 1993
  • HELP-PROMPT:  Enter the block row the line should begin at.
  • DESCRIPTION:  
    The row, relative to the block, that the line should begin at.
  • 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
.04 ORIENTATION 0;4 SET
************************REQUIRED FIELD************************
  • 'H' FOR HORIZONTAL;
  • 'V' FOR VERTICAL;

  • LAST EDITED:  APR 15, 1993
  • HELP-PROMPT:  Should the line be horizontal or vertical?
  • DESCRIPTION:  
    The direction the line goes in.
.05 LENGTH 0;5 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>200)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 19, 1993
  • HELP-PROMPT:  How long should the line be?
  • DESCRIPTION:  
    The length of the line. For horizontal lines the length is in terms of characters. For vertical lines it is in terms of rows.
.06 BLOCK 0;6 POINTER TO IMP/EXP ENCOUNTER FORM BLOCK FILE (#358.1)
************************REQUIRED FIELD************************
IMP/EXP ENCOUNTER FORM BLOCK(#358.1)

  • LAST EDITED:  AUG 02, 1993
  • HELP-PROMPT:  What block should the line appear in?
  • DESCRIPTION:  
    The block the line appears in.
  • EXECUTABLE HELP:  W "DOES THIS WORK",!
  • CROSS-REFERENCE:  358.7^C
    1)= S ^IBE(358.7,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(358.7,"C",$E(X,1,30),DA)
    This cross-reference is used to find all lines belonging to a block.
.07 NUMBER OF LINES 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>100)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 17, 1995
  • HELP-PROMPT:  Type a Number between 1 and 100, 0 Decimal Digits
.08 LINE SPACING 0;8 SET
  • 's' FOR SINGLE;
  • 'd' FOR DOUBLE;
  • 't' FOR TRIPLE;

  • LAST EDITED:  JUL 17, 1995
  • HELP-PROMPT:  How should the lines be spaced?

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(358.7 - [#358.7] .01(XREF 1S), .01(XREF 1K), .06(XREF 1S), .06(XREF 1K), .01(XREF 1S), .01(XREF 1K), .06(XREF 1S), .06(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1, ID.03+1, ID.02+1, ID.03+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .06(XREF 1S), .06(XREF 1K), .01(XREF 1S), .01(XREF 1K), .06(XREF 1S), .06(XREF 1K)
U ID.02+1, ID.03+1, ID.02+1, ID.03+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1*!, .03+1*!, .05+1!, .06(XREF 1S), .06(XREF 1K), .07+1!, .01+1!
.01(XREF 1S), .01(XREF 1K), .02+1*!, .03+1*!, .05+1!, .06(XREF 1S), .06(XREF 1K), .07+1!
>> Y .02OT+1*, .03OT+1*, .02OT+1*, .03OT+1*
>> Y(0 .02OT+1*, .03OT+1*, .02OT+1*, .03OT+1*
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All