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 |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^DENT(220.5

Package: Dental

Global: ^DENT(220.5


Information

FileMan FileNo FileMan Filename Package
220.5 DENTAL PROVIDER Dental

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Dental 9 DENTSCR    ^DENT(220.5    ^DENT(226    DENTA4A    DENTCPM    DENTCRD1    ^DENT(221    DENTCRD2
TREATMENT PLAN #    
DSS Extracts 1 ECXDENT    

Accessed By FileMan Db Calls, Total: 8

Package Total Routines
Dental 7 DENTA11    DENTA12    DENTA4A    DENTAR11    DENTAR12    DENTE3    DENTSCR    
DSS Extracts 1 ECXDENT    

Pointed To By FileMan Files, Total: 3

Package Total FileMan Files
Dental 3 DENTAL PATIENT(#220)[.09.1#220.03(3)#220.03(5)#220.03(7)#220.03(9)#220.03(11)#220.03(13)#220.03(15)]    DENTAL TREATMENT (AMIS)(#221)[.5]    DENTAL NON CLINICAL TIME(#226)[.06]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[.01]    

Fields, Total: 4

Field # Name Loc Type Details
.01 NAME 0;1 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  JUL 03, 1995
  • HELP-PROMPT:  Select the dental provider's name (last name, first name).
  • CROSS-REFERENCE:  220.5^B
    1)= S ^DENT(220.5,"B",$E(X,1,30),DA)=""
    2)= K ^DENT(220.5,"B",$E(X,1,30),DA)
.04 NEW DENTAL PROVIDER NUMBER 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<8)!'(X?8N) X
  • LAST EDITED:  FEB 05, 2004
  • HELP-PROMPT:  Answer must be 8 numeric characters in length
  • DESCRIPTION:  This is the Dental Provider Number. The first two characters are the zero-filled DENTAL PROVIDER TYPE, the second two characters are the zero-filled DENTAL PROVIDER SPECIALTY and the last 4 characters are system
    generated.
  • CROSS-REFERENCE:  220.5^D
    1)= S ^DENT(220.5,"D",$E(X,1,30),DA)=""
    2)= K ^DENT(220.5,"D",$E(X,1,30),DA)
    This references the file by the New Dental Provider Number.
1 DENTAL PROVIDER NUMBER 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<4)!'(X?4N) X I $D(X),$D(^DENT(220.5,"C",X)) W !,"PROVIDER NUMBER ",X," ALREADY EXISTS",*7 K X
  • LAST EDITED:  FEB 05, 2004
  • HELP-PROMPT:  *This field is no longer used*
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  220.5^C
    1)= S ^DENT(220.5,"C",$E(X,1,30),DA)=""
    2)= K ^DENT(220.5,"C",$E(X,1,30),DA)
2 STATUS 0;3 SET
  • '1' FOR INACTIVE;

  • LAST EDITED:  SEP 22, 1987
  • HELP-PROMPT:  Enter a '1' or 'I' to INACTIVATE a provider. To reactivate a provider, delete the inactive flag.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #1863
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
  • NAME (.01).
    Access: Direct Global Read & w/Fileman

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DENT(220.5 - [#220.5] .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), 1+1, 1(XREF 1S), 1(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID.04+1, ID1+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> DA .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), 1(XREF 1S), 1(XREF 1K)
    U ID.04+1, ID1+1
    X .01(XREF 1S), .01(XREF 1K), .04+1!, .04(XREF 1S), .04(XREF 1K), 1+1!, 1(XREF 1S), 1(XREF 1K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All