Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 9009061.991

Package: IHS Patient Registration

REGISTRATION PARAMETERS(#9009061)-->9009061.099-->9009061.991

Sub-Field: 9009061.991


Information

Parent File Name Number Package
9009061.099 CHARACTER POSITION 9009061.991 IHS Patient Registration

Details

Field # Name Loc Type Details
.01 CHARACTER POSITION 0;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>40)!(X<0)!(X?.E1"."1N.N) X S:$D(X) DINUM=X+1
  • LAST EDITED:  OCT 05, 1989
  • HELP-PROMPT:  Type a Number between 0 and 40, 0 Decimal Digits
  • DESCRIPTION:  
    This is the position on a line of the EMBOSSED CARD where you wish a field to begin printing.  The first character position is 0.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.5 DATA ITEM 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAR 30, 1992
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This field is a free text identifier to help the user know what is to be printed.
1 FILE NAME 0;2 POINTER TO FILE FILE (#1)
************************REQUIRED FIELD************************
FILE(#1)

  • LAST EDITED:  MAR 31, 1992
  • DESCRIPTION:  
    FILE NUMBER is the number of the file to be used for look-up.
2 FIELD NUMBER 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."6N.N) X
  • LAST EDITED:  OCT 05, 1989
  • HELP-PROMPT:  Type a Number between 0 and 99999999, 5 Decimal Digits
  • DESCRIPTION:  
    FIELD NUMBER is the number of the field to be used for look-up.
3 SUB-FILE DD NUMBER 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."6N.N) X
  • LAST EDITED:  MAR 31, 1992
  • HELP-PROMPT:  Type a Number between 0 and 99999999, 5 Decimal Digits
  • DESCRIPTION:  
    SUB-FILE NUMBER must be entered for look-up on a multiple field.  Otherwise, leave it blank (usually the case for look-up from the PATIENT and VA PATIENT files).
4 SUB-FILE FIELD NUMBER 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."6N.N) X
  • LAST EDITED:  OCT 05, 1989
  • HELP-PROMPT:  Type a Number between 0 and 99999999, 5 Decimal Digits
  • DESCRIPTION:  
    Needed only if looking up an entry in a sub-file.  Otherwise, leave it blank (usually the case in the PATIENT and VA PATIENT files).
5 MULTIPLE ENTRY SELECTION (1) 0;6 SET
  • 'DFN' FOR DFN;
  • 'DUZ(2)' FOR DUZ(2);
  • 'IEN1' FOR IEN1;

  • LAST EDITED:  MAR 30, 1992
  • HELP-PROMPT:  How do you want to select the entry? ("??"=more help)
  • DESCRIPTION:  This field indicates how the top level entry of the lookup file is to be selected. If left blank DFN will be used. If DFN or DUZ(2) is indicated the value of the associated variable will be used. If IEN1 is indicated
    the value in the field IEN1 will be used.
5.5 MULTIPLE ENTRY SELECTION (2) 0;7 SET
  • 'DFN' FOR DFN;
  • 'DUZ(2)' FOR DUZ(2);
  • 'IEN2' FOR IEN2;

  • LAST EDITED:  MAR 30, 1992
  • DESCRIPTION:  This field indicates how the second level entry of the lookup file will be selected. If left blank DFN will be used. If DUZ(2) or DFN is indicated the value of the associated variable will be used. If IEN2 is indicated
    the value of the field IEN2 will be used.
5.7 IEN1 2;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  APR 07, 1992
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  
    A number, or an expression that evaluates to a number, to be used as the IEN of the entry desired in the file specified.
5.8 IEN2 2;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  APR 07, 1992
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  
    A number, or an expression that evaluates to a number, to be used as the IEN of the entry desired in the sub-file field designated.
6 OUTPUT TRANSFORM 1;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  OCT 06, 1989
  • HELP-PROMPT:  This is Standard MUMPS code.
  • DESCRIPTION:  You can transform your value format for printing on the EMBOSSED CARD. For example, you can put dashes in the Chart Number:
    S X=$E(X,1,2)_"-"_$E(X,3,4)_"-"_$E(X,5,6)
    (Your value will be in 'X').  You need not enter output transforms which already exist in the dictionary.
    WRITE AUTHORITY:  @
7 CARD FIELD NAME COMPUTED

  • MUMPS CODE:  S Y=^AGFAC(D0,99,D1,1,D2,0),X=$P(^DD($P(Y,U,2),$P(Y,U,3),0),U) S:+$P(Y,U,4) X=$P(^DD($P(Y,U,4),$P(Y,U,5),0),U)
  • ALGORITHM:  S Y=^AGFAC(D0,99,D1,1,D2,0),X=$P(^DD($P(Y,U,2),$P(Y,U,3),0),U) S:+$P(Y,U,4) X=$P(^DD($P(Y,U,4),$P(Y,U,5),0),U)
  • LAST EDITED:  JUN 08, 1990
Info |  Details |  All