STANDARD DATA DICTIONARY #359.94 -- HAND PRINT FIELD FILE 6/27/25 PAGE 1 STORED IN ^IBE(359.94, (14 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file allows fields to be defined to print on forms for hand print. DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ CROSS REFERENCED BY: NAME(B), BLOCK(C) 359.94,.01 NAME 0;1 FREE TEXT (Required) 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) 359.94,.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. 359.94,.03 STARTING COLUMN 0;3 NUMBER (Required) 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 359.94,.04 STARTING ROW 0;4 NUMBER (Required) 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 359.94,.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 359.94,.06 TYPE OF DATA 0;6 POINTER TO PACKAGE INTERFACE FILE (#357.6) (Required) WHAT TYPE OF DATA WILL BE ENTERED TO THIS FIELD? 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 359.94,.08 BLOCK 0;8 POINTER TO ENCOUNTER FORM BLOCK FILE (#357.1) (Required) 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. 359.94,.1 DHCP DATA ELEMENT 0;10 POINTER TO AICS DATA ELEMENTS FILE (#359.1) (Required) 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 FILES POINTED TO FIELDS AICS DATA ELEMENTS (#359.1) DHCP DATA ELEMENT (#.1) ENCOUNTER FORM BLOCK (#357.1) BLOCK (#.08) PACKAGE INTERFACE (#357.6) TYPE OF DATA (#.06) INPUT TEMPLATE(S): IBDF EDIT HAND PRINT FIELD SEP 06, 1995@13:06 USER #0 PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):