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 |  Found Entries |  All
Print Page as PDF
Global: ^IBE(359.94

Package: Automated Information Collection System

Global: ^IBE(359.94


Information

FileMan FileNo FileMan Filename Package
359.94 HAND PRINT FIELD Automated Information Collection System

Description

Directly Accessed By Routines, Total: 8

Package Total Routines
Automated Information Collection System 8 IBDF10A    IBDF10C    IBDF2A1    IBDF2H    IBDF9B4    IBDFCMP1    IBDFRPC    IBDFRPC1

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Automated Information Collection System 2 IBDF2H    IBDF9B4    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Automated Information Collection System 3 ENCOUNTER FORM BLOCK(#357.1)[.08]    PACKAGE INTERFACE(#357.6)[.06]    AICS DATA ELEMENTS(#359.1)[.1]    

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
  • LAST EDITED:  MAY 18, 1993
  • HELP-PROMPT:  NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
  • DESCRIPTION:  
    The name of the field.
  • CROSS-REFERENCE:  359.94^B
    1)= S ^IBE(359.94,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(359.94,"B",$E(X,1,30),DA)





.02
LABEL
0;2
FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>150!($L(X)<1) X
  • LAST EDITED:  SEP 06, 1995
  • HELP-PROMPT:  What label should appear before the hand print field?
  • DESCRIPTION:  
    The text that labels the field on the form.





.03
STARTING COLUMN
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+1
  • LAST EDITED:  JUL 28, 1995
  • HELP-PROMPT:  What block column should the field begin in?
  • DESCRIPTION:  
    The column the label begins at.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER





.04
STARTING ROW
0;4
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+1
  • LAST EDITED:  JUL 28, 1995
  • HELP-PROMPT:  What block row should the field start in?
  • DESCRIPTION:  
    The row the label begins at.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER





.05
LABEL APPEARANCE
0;5
FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1)!($TR(X,"BUR")'="") X
  • LAST EDITED:  OCT 24, 1996
  • HELP-PROMPT:  B=bold,U=underline,R=reverse You can enter any combination of {B,U,R}.
  • DESCRIPTION:  
    Allows the form designer to specify the appearance of the label.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER





.06
TYPE OF DATA
0;6
POINTER TO PACKAGE INTERFACE FILE (#357.6) 

************************REQUIRED FIELD************************
PACKAGE INTERFACE(#357.6)
  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,6)=1,$P(^(0),U,9)=1,$P(^(0),U,16)[""H""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 25, 1995
  • HELP-PROMPT:  What type of data will be entered to the field?
  • DESCRIPTION:  
    Points to the package interface file. That is where information about the data and how to map it to DHCP is stored.
  • SCREEN:  S DIC("S")="I $P(^(0),U,6)=1,$P(^(0),U,9)=1,$P(^(0),U,16)[""H"""
  • EXPLANATION:  Allows only available input interfaces defined as allowable for hand print fields.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER





.08
BLOCK
0;8
POINTER TO ENCOUNTER FORM BLOCK FILE (#357.1) 

************************REQUIRED FIELD************************
ENCOUNTER FORM BLOCK(#357.1)
  • LAST EDITED:  JUL 20, 1994
  • HELP-PROMPT:  What block should this input field appear in?
  • DESCRIPTION:  
    The block the field belongs to.
  • CROSS-REFERENCE:  359.94^C
    1)= S ^IBE(359.94,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(359.94,"C",$E(X,1,30),DA)
    Used to find all the input fields appearing in a block.





.1
DHCP DATA ELEMENT
0;10
POINTER TO AICS DATA ELEMENTS FILE (#359.1) 

************************REQUIRED FIELD************************
AICS DATA ELEMENTS(#359.1)
  • INPUT TRANSFORM:  S DIC("S")="I $$DTGOOD^IBDFU9($P($G(^IBE(359.94,DA,0)),""^"",6),Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 27, 1995
  • HELP-PROMPT:  What data will be printed in this field?
  • DESCRIPTION:  
    Specifies what data the hand print field is for.
  • SCREEN:  S DIC("S")="I $$DTGOOD^IBDFU9($P($G(^IBE(359.94,DA,0)),""^"",6),Y)"
  • EXPLANATION:  Allows only data elements defined as allowable for the Package Interface.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER







    



Info | 
Desc | 
Directly Accessed By Routines | 
Accessed By FileMan Db Calls | 
Pointer To FileMan Files | 
Fields | 
Found Entries | 
All