Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Fields |  All
Print Page as PDF
Global: ^AUTTINC

Package: Utility Tables

Global: ^AUTTINC


Information

FileMan FileNo FileMan Filename Package
9999999.44 INCOME SOURCE Utility Tables

Description

Fields, Total: 2

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

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<3)!'(X'?1P.E) X
  • HELP-PROMPT:  ANSWER MUST BE 3-10 CHARACTERS IN LENGTH
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  9999999.44^B
    1)= S ^AUTTINC("B",$E(X,1,30),DA)=""
    2)= K ^AUTTINC("B",$E(X,1,30),DA)
1 CODE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>1!($L(X)<1) X I $D(X),$D(^AUTTINC("C",X)),'$D(^AUTTINC("C",X,DA)) K X W:'$D(ZTQUEUED) " Already used! "
  • LAST EDITED:  MAY 19, 1993
  • HELP-PROMPT:  ANSWER MUST BE 1 CHARACTER IN LENGTH
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9999999.44^C
    1)= S ^AUTTINC("C",$E(X,1,30),DA)=""
    2)= K ^AUTTINC("C",$E(X,1,30),DA)
Info |  Desc |  Fields |  All