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 |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^ECX(728.44

Package: DSS Extracts

Global: ^ECX(728.44


Information

FileMan FileNo FileMan Filename Package
728.44 CLINICS AND STOP CODES DSS Extracts

Description

Directly Accessed By Routines, Total: 28

Package Total Routines
DSS Extracts 21 ECX357PT    ECX3P120    ECX3P127    ECX3P154    ECX3P161    ECXFEKEY    ECXLABN    ECXOPRX
ECXPIVDN    ECXSCLD    ECXSCLD1    ECXSCX1    ECXSTOP    ^ECX(728.44    ECXSCX3    ^ECX(729
ECXSCRP    ECXSCXN    ECXSURG    ECXUSUR1    ECXUTL6    
Event Capture 6 ECPAT    ECRDSSA    ECRECER    ECSCPT1    ECSUM1    ECUMRPC1    
Scheduling 1 SD53P568    

Accessed By FileMan Db Calls, Total: 9

Package Total Routines
DSS Extracts 6 ECXEC    ECXFEKEY    ECXQSR    ECXSCLD    ECXSCLD1    ECXSCX1    
Scheduling 2 SDES2UTIL    SDESUTIL    
Event Capture 1 ECPCER    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
DSS Extracts 2 NATIONAL CLINIC(#728.441)[7]    MCA LABOR CODE(#728.442)[13]    
Kernel 1 INSTITUTION(#4)[14]    
Scheduling 1 HOSPITAL LOCATION(#44)[.01]    

Fields, Total: 15

Field # Name Loc Type Details
.01 CLINIC NAME 0;1 POINTER TO HOSPITAL LOCATION FILE (#44)
************************REQUIRED FIELD************************
HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  K X W !,"Entries into this file may be made only by using the DSS software",!!
  • LAST EDITED:  DEC 12, 1996
  • HELP-PROMPT:  Enter the clinic name.
  • DESCRIPTION:  
    The name of the clinic.
  • TECHNICAL DESCR:  
    Pointer to the HOSPITAL LOCATION file (#44).
  • DELETE TEST:  .01,0)= I 1 W !,"Entries must not be deleted from this file!,",!!
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  728.44^B
    1)= S ^ECX(728.44,"B",$E(X,1,30),DA)=""
    2)= K ^ECX(728.44,"B",$E(X,1,30),DA)
1 STOP CODE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  NOV 06, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    The stop code for this clinic as determined by Medical Administration Service (MAS).
  • TECHNICAL DESCR:  
    Stop code from the HOSPITAL LOCATION file (#44) for this clinic.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
2 CREDIT STOP CODE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAR 12, 1991
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  The credit stop code, if none exists, for this clinic as determined by Medical Administration Service (MAS).
  • TECHNICAL DESCR:  
    The credit stop code for this clinic in the HOSPITAL LOCATION file (#44).
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
3 DSS STOP CODE 0;4 NUMBER

  • INPUT TRANSFORM:  N DIC D INPUTT^ECXUTL6 Q:'$D(X) K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X Q:'$D(X) N ECXSC S ECXSC=$O(^DIC(40.7,"C",X,"")) I ECXSC'="" K:("PE"'[$P(^DIC(40.7,ECXSC,0),U,6))!($P(^(0),U,7)>DT) X
  • LAST EDITED:  SEP 29, 2008
  • HELP-PROMPT:  Enter an active 3 digit Stop Code with restriction type of "Primary" or "Either".
  • DESCRIPTION:  
    Three digit Stop Code number assigned to specific location. Each Stop Code number represents a type of care or Service/treating specialty (clinics only). Stop code must have a restriction type of Primary or Either.
  • TECHNICAL DESCR:  
    Stop code is verified by existence in File# 40.7 Node ^DIC(40.7,"C",stop code,pointer) must exist.
  • EXECUTABLE HELP:  N X S ZD=D,X="?",DIC="^DIC(40.7,",DIC(0)="EQ",DIC("S")="I '$P(^(0),U,3) I $L($P(^(0),U,2))=3" D ^DIC S D=ZD K DIC,ZD
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
4 DSS CREDIT STOP CODE 0;5 NUMBER

  • INPUT TRANSFORM:  N DIC D INPUTT^ECXUTL6 Q:'$D(X) K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X Q:'$D(X) N ECXSC S ECXSC=$O(^DIC(40.7,"C",X,"")) I ECXSC'="" K:("SE"'[$P(^DIC(40.7,ECXSC,0),U,6))!($P(^(0),U,7)>DT) X
  • LAST EDITED:  SEP 29, 2008
  • HELP-PROMPT:  Enter an active Stop Code with restriction type of "Secondary" or "Either".
  • DESCRIPTION:  Appointments to this clinic will receive this Stop Code credit in addition to the 'normal' Stop Code credit if a Stop Code different from the 'normal' Stop Code for this clinic is entered here. Credit Stop Code must have
    a restriction type of Secondary or Either.
  • TECHNICAL DESCR:  
    Credit Stop code is verified by existence in File# 40.7 Node ^DIC(40.7,"C",stop code,pointer) must exists.
  • EXECUTABLE HELP:  N X S ZD=D,X="?",DIC="^DIC(40.7,",DIC(0)="EQ",DIC("S")="I '$P(^(0),U,3) I $L($P(^(0),U,2))=3 Q" D ^DIC S D=ZD K DIC,ZD
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
5 ACTION TO SEND 0;6 SET
************************REQUIRED FIELD************************
  • '4' FOR SEND STOP CODE(S) WITH CHAR4 CODE;
  • '5' FOR SEND STOP CODE(S) WITHOUT CHAR4 CODE;
  • '6' FOR DO NOT SEND;

  • LAST EDITED:  MAR 29, 2016
  • HELP-PROMPT:  Select the appropriate stop code action.
  • DESCRIPTION:  
    This determines how Stop Code, Credit Stop Code, CHAR4 Code, and MCA Labor Code (if present) are combined to form a Feeder Key for this clinic.
  • TECHNICAL DESCR:  
    This field is used in routine ECXSCX to create the feeder key for this clinic.
6 DATE LAST REVIEWED 0;7 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 24, 1992
  • HELP-PROMPT:  Enter the date this data was reviewed.
  • DESCRIPTION:  
    The date this data in this file was last reviewed.
  • TECHNICAL DESCR:  
    This field is used to prompt users that the data in this file might need to be reviewed.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
  • CROSS-REFERENCE:  728.44^AC^MUMPS
    1)= S ^ECX(728.44,"A1",-X,DA)=""
    2)= K ^ECX(728.44,"A1",-X,DA)
    3)= DO NOT DELETE.
    An inverse date cross reference to tell the user when data in this file was last reviewed.
7 NATIONAL CODE 0;8 POINTER TO NATIONAL CLINIC FILE (#728.441)
************************REQUIRED FIELD************************
NATIONAL CLINIC(#728.441)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^(2)),U)=""""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 08, 2013
  • HELP-PROMPT:  Enter the appropriate national code.
  • DESCRIPTION:  The NATIONAL CODE is a four character code that is optionally used to build part of the DSS Feeder Key field in the DSS Clinic (CLI) Extract. If used, the four character code helps describe/identify the clinic the CLI
    Extract record is for.
  • TECHNICAL DESCR:  When the ACTION TO SEND field (#5) is set to code 4 then the NATIONAL CODE (#7) field will be used to build the DSS feeder key for the Clinic (CLI) extract. This four character code is a standardized code used to identify
    the clinic associated with the CLI extract record.
  • SCREEN:  S DIC("S")="I $P($G(^(2)),U)="""""
  • EXPLANATION:  Invalid code. Only active codes can be entered.
8 NON-OR DSS IDENTIFIER 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  FEB 01, 2017
  • HELP-PROMPT:  Enter the identifier if this clinic is used for non-OR surgical procedures.
  • DESCRIPTION:  
    This field will identify clinics which are used for non-OR procedures in the Surgery package.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
9 INACTIVE DATE 0;10 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 17, 1996
  • HELP-PROMPT:  Enter the date this clinic became inactive.
  • DESCRIPTION:  
    This is the date that MAS inactivated this clinic.
  • TECHNICAL DESCR:  
    From the INACTIVE DATE field (2505) in the HOSPITAL LOCATION file (#44).
10 DSS PRODUCT DEPARTMENT 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  FEB 23, 2004
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    The nationally defined DSS Intermediate Department Number designated to the patient care product being provided.
11 NON-COUNT CLINIC (Y/N) 0;12 SET
************************REQUIRED FIELD************************
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  MAY 25, 2009
  • HELP-PROMPT:  The value of this field should match field #2502 in the HOSPITAL LOCATION file (#44) for the same clinic.
  • DESCRIPTION:  
    Is this clinic to be a non-count clinic for workload purposes? OR Are visits to this clinic to be included in workload statistics?
12 RECORD LAST SYNCHED 0;13 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 02, 2013
  • HELP-PROMPT:  Enter the date this record was last synchronized.
  • DESCRIPTION:  
    This is the date the entry in this file was last synched.
  • TECHNICAL DESCR:  The fields in this record are copied from the matching clinic entry in the HOSPITAL LOCATION (#44) file. When the site runs the Create DSS Clinic Stop Code File option [ECXSCLIST] to synchronize entries in this file, this
    field is set to today's date, indicating the last time this process was completed.
    This field will always store the date the synchronization was last completed.
  • CROSS-REFERENCE:  728.44^C
    1)= S ^ECX(728.44,"C",$E(X,1,30),DA)=""
    2)= K ^ECX(728.44,"C",$E(X,1,30),DA)
    Identifies the date the record was last synched.
13 MCA LABOR CODE 0;14 POINTER TO MCA LABOR CODE FILE (#728.442) MCA LABOR CODE(#728.442)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^(0)),U,3)'=""I""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 31, 2017
  • HELP-PROMPT:  Enter the MCA LABOR CODE associated with this clinic.
  • DESCRIPTION:  
    This field further defines the clinic setup by identifying the Managerial Cost Accounting (MCA) labor code associated with this clinic.
  • TECHNICAL DESCR:  
    Allows for further refinement of the labor category associated with this clinic when the stop code pair and CHAR4 code are not sufficient.
  • SCREEN:  S DIC("S")="I $P($G(^(0)),U,3)'=""I"""
  • EXPLANATION:  Only active labor codes may be selected.
14 PROVIDER STATION 0;15 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • INPUT TRANSFORM:  S DIC("S")="I '$P($G(^(99)),U,4),+$P($G(^(99)),U),'$D(^DG(40.8,""AD"",+Y))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
  • OUTPUT TRANSFORM:  S Y=$$GET1^DIQ(4,Y,99)
  • LAST EDITED:  JUN 10, 2022
  • HELP-PROMPT:  Enter an active Institution and it should not be in the current Medical Center Division.
  • DESCRIPTION:  
    This is the Sta6a of the provider's station when the provider is based at another facility.
  • TECHNICAL DESCR:  
    The field is a pointer to the INSTITUTION file (#4) and the user must select a valid value. The user cannot select a Sta6a in their own Medical Center Division file.
  • SCREEN:  S DIC("S")="I '$$GET1^DIQ(4,+Y,101,""I"")"
  • EXPLANATION:  Must be an active Institution.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

External References

Name Field # of Occurrence
^%DT 6+1, 9+1, 12+1
^DIC 3(HELP ), 4(HELP ), 7+1, 13+1, 14+1
$$GET1^DIQ 14OT+1
INPUTT^ECXUTL6 3+1, 4+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(40.7 - [#40.7] 3+1, 4+1
^ECX(728.44 - [#728.44] .01(XREF 1S), .01(XREF 1K), 6(XREF 1S), 6(XREF 1K), 12(XREF 1S), 12(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 3+1, 4+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 6+1*, 9+1*, 12+1*
>> D 3(HELP ), 4(HELP )
>> DA .01(XREF 1S), .01(XREF 1K), 6(XREF 1S), 6(XREF 1K), 12(XREF 1S), 12(XREF 1K)
DIC 3+1~, 3(HELP ), 4+1~, 4(HELP ), 7+1!*, 13+1!*, 14+1!*
DIC("S" 3(HELP ), 4(HELP ), 7+1*, 7SCR+1*, 13+1*, 13SCR+1*, 14+1*, 14SCR+1*
DIC(0 3(HELP ), 4(HELP )
>> DIE 7+1, 13+1, 14+1
DT 3+1, 4+1
ECXSC 3+1~*, 4+1~*
U 3+1, 4+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, 3+1!, 3(HELP ), 4+1!, 4(HELP ), 6+1*!
, 6(XREF 1S), 6(XREF 1K), 7+1*!, 8+1!, 9+1*!, 10+1!, 12+1*!, 12(XREF 1S), 12(XREF 1K), 13+1*!
, 14+1*!
>> Y 6+1, 7+1, 9+1, 12+1, 13+1, 14+1, 14OT+1*
>> Y(0 14OT+1*
ZD 3(HELP ), 4(HELP )
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All