Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields
Print Page as PDF
Global: ^DIC(220.3

Package: Dental

Global: ^DIC(220.3


Information

FileMan FileNo FileMan Filename Package
220.3 DENTAL TYPE OF SERVICE Dental

Description

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Dental 2 DENTE2    DENTP1    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Dental 1 DENTAL PATIENT(#220)[#220.02(.01)]    

Fields, Total: 4

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 21, 1985
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 99
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>45!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  FEB 09, 1988
  • HELP-PROMPT:  Enter the name of a Dental type of service. Answer must be 3-45 characters in length.
  • CROSS-REFERENCE:  220.3^B
    1)= S ^DIC(220.3,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(220.3,"B",$E(X,1,30),DA)
1 CTV 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  FEB 09, 1988
  • HELP-PROMPT:  Enter a composite time value (CTV) for this type of service. Answer must be a number from 0 to 999 with up to 2 decimals.
2 $VALUE 0;3 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?.N1"."2N)!(X>999999)!(X<0) X
  • HELP-PROMPT:  Enter the appropriate dollar value for this type of service as determined locally. The dollar value must be between 0 and 999999 with up to 2 decimals.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields