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 |  Fields |  All
Print Page as PDF
Global: ^AMHRCNT

Package: Mental Health Social Services

Global: ^AMHRCNT


Information

FileMan FileNo FileMan Filename Package
9002013.4 MHSS REPORT CONTROL Mental Health Social Services

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Mental Health Social Services 3 AMHRPT    AMHRPT4    AMHRPTCP    

Fields, Total: 11

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 30, 1993
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
.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
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  9002013.4^B
    1)= S ^AMHRCNT("B",$E(X,1,30),DA)=""
    2)= K ^AMHRCNT("B",$E(X,1,30),DA)
.02 INFORM ROUTINE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<6) X
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  Answer must be 6-18 characters in length.
.03 PRINT INTERACTIVE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<6) X
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  Answer must be 6-18 characters in length.
.04 PRINT ROUTINE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<6) X
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  Answer must be 6-18 characters in length.
.05 PROCESSING ROUTINE 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<4) X
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  Answer must be 4-18 characters in length.
.06 SHORT DESCRIPTION 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<2) X
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  Answer must be 2-40 characters in length.
.07 SETTEMP 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>19!($L(X)<2) X
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  Answer must be 2-19 characters in length.
.08 SORT? 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  NOV 18, 1993
.09 POST-PROCESSING ROUTINE 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  FEB 01, 1994
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
.11 PRE-PROCESSING ROUTINE 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  FEB 01, 1994
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
Info |  Desc |  Directly Accessed By Routines |  Fields |  All