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 |  Fields |  ICR |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^DIC(45.3

Package: Registration

Global: ^DIC(45.3


Information

FileMan FileNo FileMan Filename Package
45.3 SURGICAL SPECIALTY Registration

Description

Directly Accessed By Routines, Total: 23

Package Total Routines
Registration 11 DG3PR2    DG53729R    DG53757P    DGPTAPA2    DGPTFM5    DGPTFMO    DGPTFTR0    ^DIC(45.3
DGPTLMU5    DGPTR0    DGPTRI0    
Surgery 8 DONOR RACE    SROATM1    SROATMNO    SROAUTL3    SROAUTLC    SROQD1    ^SRO(137.45    SRSCOR
DSS Extracts 2 ECXSURG    ECXUSUR1    
Integrated Billing 1 IB20PT8A    
Interim Management Support 1 ECTDSUR    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Registration 2 DG53729R    DG53757P    
Surgery 1 SROPCEP    

Pointed To By FileMan Files, Total: 3

Package Total FileMan Files
Integrated Billing 1 PFSS ACCOUNT(#375)[14.02]    
Registration 1 PTF(#45)[#45.01(3)]    
Surgery 1 LOCAL SURGICAL SPECIALTY(#137.45)[1]    

Fields, Total: 2

Field # Name Loc Type Details
.01 CODE 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(((X>62)!(X<48))&(X'=78))!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 30, 2007
  • HELP-PROMPT:  Type a Number between 48 and 62, or 78
  • DESCRIPTION:  
    This field contains the code for the surgical specialty. The code is a number between 48 and 62, or 78.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  45.3^B
    1)= S ^DIC(45.3,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(45.3,"B",$E(X,1,30),DA)
1 SPECIALTY 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>40!($L(X)<3) X
  • LAST EDITED:  FEB 23, 1984
  • HELP-PROMPT:  Enter the surgical specialty, 3-40 characters.
  • DESCRIPTION:  
    This field contain the description of the surgical specialty. The field contains between 3 and 40 characters.
  • CROSS-REFERENCE:  45.3^C
    1)= S ^DIC(45.3,"C",$E(X,1,30),DA)=""
    2)= K ^DIC(45.3,"C",$E(X,1,30),DA)

Found Entries, Total: 16

CODE: 50    CODE: 51    CODE: 52    CODE: 53    CODE: 54    CODE: 55    CODE: 56    CODE: 57    
CODE: 58    CODE: 59    CODE: 60    CODE: 61    CODE: 62    CODE: 48    CODE: 49    CODE: 78    

ICR, Total: 1

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

    SPECIALTY (1).
    Access: Direct Global Read & w/Fileman

    DEPARTMENT CODE (2).
    Access: Direct Global Read & w/Fileman

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(45.3 - [#45.3] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^("0" ID1+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
    U ID1+1
    X .01+1!, .01(XREF 1S), .01(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 |  Fields |  ICR |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All