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 |  All
Print Page as PDF
Global: ^SD(409.73

Package: Scheduling

Global: ^SD(409.73


Information

FileMan FileNo FileMan Filename Package
409.73 TRANSMITTED OUTPATIENT ENCOUNTER Scheduling

Description

Directly Accessed By Routines, Total: 34

Package Total Routines
Scheduling 34 SCDDI1    SCDXFU01    SCDXFU02    SCDXFU03    SCDXFU04    SCDXFU10    SCDXFU11    SCDXFU13
SCDXFX01    SCDXHLDR    SCDXMSG    SCDXMSG0    SCDXMSG2    SCDXPOV    SCDXRT01    SCDXSUP
SCDXUTL    SCDXUTL2    SCDXUTL3    SCDXUTL4    SCDXUTL5    SCENI0    SCENIA1    SCENIA2
SCMSVUT2    SCRPI02    SCRPW1    SCRPW8    SCRPW81    SCUTIE1    SD53105A    SD53227P
SD53252P    SD5360PT    

Accessed By FileMan Db Calls, Total: 6

Package Total Routines
Scheduling 6 SCDXFU01    SCDXFU03    SCDXMSG2    SCDXPRN    SCDXUTL5    SCRPW1    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Scheduling 2 TRANSMITTED OUTPATIENT ENCOUNTER ERROR(#409.75)[.01]    ACRP TRANSMISSION HISTORY(#409.77)[.01]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Scheduling 2 OUTPATIENT ENCOUNTER(#409.68)[.02]    DELETED OUTPATIENT ENCOUNTER(#409.74)[.03]    
Kernel 1 NEW PERSON(#200)[.07]    

Fields, Total: 18

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

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 29, 1996
  • HELP-PROMPT:  Type a Number between 1 and 999999999999999, 0 Decimal Digits
  • DESCRIPTION:  Number to uniquely identify entries in the file.
    This number is automatically generated if a value of '+' is entered.
  • PRE-LOOKUP:  I X="+" S X=$$AUTO^SCDXFX01()
  • CROSS-REFERENCE:  409.73^B
    1)= S ^SD(409.73,"B",$E(X,1,30),DA)=""
    2)= K ^SD(409.73,"B",$E(X,1,30),DA)





.02
OUTPATIENT ENCOUNTER
0;2
POINTER TO OUTPATIENT ENCOUNTER FILE (#409.68)
OUTPATIENT ENCOUNTER(#409.68)
  • LAST EDITED:  MAY 02, 1996
  • HELP-PROMPT:  Enter the entry in the Outpatient Encounter file that requires transmission
  • DESCRIPTION:  
    Entry in Outpatient Encounter file that requires transmission.
  • CROSS-REFERENCE:  409.73^AENC
    1)= S ^SD(409.73,"AENC",$E(X,1,30),DA)=""
    2)= K ^SD(409.73,"AENC",$E(X,1,30),DA)
    Cross reference for sorting entries that point to the OUTPATIENT ENCOUNTER file (#409.68).
    Resulting node:
    ^SD(409.73,"AENC",[.02],DA)
    Where:
    [.02] = Value contained in OUTPATIENT ENCOUNTER field (#.02)
    DA = Pointer to entry in file





.03
DELETED OUTPATIENT ENCOUNTER
0;3
POINTER TO DELETED OUTPATIENT ENCOUNTER FILE (#409.74)
DELETED OUTPATIENT ENCOUNTER(#409.74)
  • LAST EDITED:  MAY 02, 1996
  • HELP-PROMPT:  Enter the entry in the Deleted Outpatient Encounter file that requires transmission
  • DESCRIPTION:  
    Entry in Deleted Outpatient Encounter file that requires transmssion.
  • CROSS-REFERENCE:  409.73^ADEL
    1)= S ^SD(409.73,"ADEL",$E(X,1,30),DA)=""
    2)= K ^SD(409.73,"ADEL",$E(X,1,30),DA)
    Cross reference for sorting entries that point to the DELETED OUTPATIENT ENCOUNTER file (#409.74).
    Resulting node:
    ^SD(409.73,"ADEL",[.03],DA)
    Where:
    [.03] = Value contained in DELETED OUTPATIENT ENCOUNTER field (#.03)
    DA = Pointer to entry in file





.04
TRANSMISSION REQUIRED
0;4
SET

  • '0' FOR NO;
  • '1' FOR YES;
  • LAST EDITED:  MAY 15, 1996
  • HELP-PROMPT:  Enter 'YES' if the [Deleted] Outpatient Encounter requires transmission
  • DESCRIPTION:  
    Flag denoting if transmission of [Deleted] Outpatient Encounter is required.
  • CROSS-REFERENCE:  409.73^AACXMIT1^MUMPS
    1)= D AACXMIT^SCDXFX01(DA,-1)
    2)= D AACXMIT^SCDXFX01(DA,0)
    This cross reference is used to flag entries for transmission to the National Patient Care Database.  The TRANSMISSION EVENT field (#.05) is checked for an add, edit, delete, or retransmit event before setting the cross
    reference.
    Resulting node:
    ^SD(409.73,"AACXMIT",[.06],DA)
    Where:
    [.06] = Value contained in DATE/TIME OF EVENT field (#.06)
    DA = Pointer to entry in file





.05
TRANSMISSION EVENT
0;5
SET

  • '0' FOR RETRANSMIT;
  • '1' FOR ADD;
  • '2' FOR EDIT;
  • '3' FOR DELETE;
  • LAST EDITED:  APR 29, 1996
  • HELP-PROMPT:  Enter the action taken on the [Deleted] Outpatient Encounter
  • DESCRIPTION:  Code denoting action taken on [Deleted] Outpatient Encounter.
    Event relates to why the encounter is being transmitted to the National Patient Care Database (NPCDB).
    ADD - Check out complete; add entry to NPCDB
    EDIT - Encounter was editted; edit existing entry in NPCDB
    DELETE - Encounter was deleted; delete entry from NPCDB RETRANSMIT - Encounter being retransmitted
    * Encounter data not acknowledged by NPCDB within
    two days is automatically marked for retransmission
    * The option 'Retransmit Ambulatory Care Data by
    Date Range' marks encounters for retransmission
    * The nightly transmission includes encounters that
    are marked for retransmission





.06
DATE/TIME OF EVENT
0;6
DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 30, 1996
  • HELP-PROMPT:  Enter when the action was taken on the [Deleted] Outpatient Encounter
  • DESCRIPTION:  
    Date and [required] time specified action was taken on the [Deleted] Outpatient Encounter.
  • CROSS-REFERENCE:  409.73^AACXMIT2^MUMPS
    1)= D AACXMIT^SCDXFX01(DA,-1)
    2)= D AACXMIT^SCDXFX01(DA,0,X)
    This cross reference is used to flag entries for transmission to the National Patient Care Database.  The TRANSMISSION EVENT field (#.05) is checked for an add, edit, delete, or retransmit event before setting the cross
    reference.
    Resulting node:
    ^SD(409.73,"AACXMIT",[.06],DA)
    Where:
    [.06] = Value contained in DATE/TIME OF EVENT field (#.06)
    DA = Pointer to entry in file





.07
USER CAUSING EVENT
0;7
POINTER TO NEW PERSON FILE (#200)
NEW PERSON(#200)
  • LAST EDITED:  APR 17, 1997
  • HELP-PROMPT:  Enter the user that should be associated to the event that occurred
  • DESCRIPTION:  
    User causing the event to occur.  If the event was caused by the nightly ACRP transmission job, the POSTMASTER (DUZ=.5) will be stored as the user.





11
DATE/TIME OF XMIT TO NPCDB
1;1
DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 30, 1996
  • HELP-PROMPT:  Enter when [Deleted] Outpatient Enounter was transmitted to NPCDB
  • DESCRIPTION:  
    Date and [optional] time the [Deleted] Outpatient Encounter was last transmitted to the National Patient Care Database.
  • CROSS-REFERENCE:  409.73^AACLST
    1)= S ^SD(409.73,"AACLST",$E(X,1,30),DA)=""
    2)= K ^SD(409.73,"AACLST",$E(X,1,30),DA)
    Cross reference used to sort by date/time of last transmission to the National Patient Care Database
    Resulting node:
    ^SD(409.73,"AACLST",[11],DA)
    Where:
    [11] = Value contained in DATE/TIME OF XMIT TO NPCDB field (#11)
    DA = Pointer to entry in file
  • CROSS-REFERENCE:  409.73^AACNA1^MUMPS
    1)= D AACNA^SCDXFX01(DA,1)
    2)= D AACNA^SCDXFX01(DA,0,X)
    This cross reference is used to sort transmissions to the National Patient Care Database that have not been acknowledged.  This cross reference is set when a value is placed into the MESSAGE ID FOR XMIT TO NPCDB field
    (#12) and the cross reference is killed when a value is placed into the DATE/TIME OF ACK FROM NPCDB field (#14).
    Resulting node:
    ^SD(409.73,"AACNOACK",[11],DA)
    Where:
    [11] = Value contained in DATE/TIME OF XMIT TO NPCDB field (#11)
    DA = Pointer to entry in file





12
MESSAGE ID OF XMIT TO NPCDB
1;2
FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  APR 29, 1996
  • HELP-PROMPT:  Enter message control ID of transmission to NPCDB
  • DESCRIPTION:  
    Message control ID of last transmission to National Patient Care Database.
  • CROSS-REFERENCE:  409.73^AACMID
    1)= S ^SD(409.73,"AACMID",$E(X,1,30),DA)=""
    2)= K ^SD(409.73,"AACMID",$E(X,1,30),DA)
    Cross referenced used to sort by message control ID of last transmission to National Patient Care Database.
    Resulting node:
    ^SD(409.73,"AACMID",[12],DA)
    Where:
    [12] = Value contained in MESSAGE ID FOR XMIT TO NPCDB field (#12)
    DA = Pointer to entry in file
  • CROSS-REFERENCE:  ^^TRIGGER^409.73^14
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^SD(409.73,D0,1)):^(1),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X="" X ^DD(409.73,12,1,2,1.4)
    1.4)= S DIH=$S($D(^SD(409.73,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,4)=DIV,DIH=409.73,DIG=14 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= @
    DELETE VALUE)= NO EFFECT
    FIELD)= DATE/TIME OF ACK FROM NPCDB
    Value contained in DATE/TIME OF ACK FROM NPCDB field (#14) is deleted
  • CROSS-REFERENCE:  ^^TRIGGER^409.73^15
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^SD(409.73,D0,1)):^(1),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X="" X ^DD(409.73,12,1,3,1.4)
    1.4)= S DIH=$S($D(^SD(409.73,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,5)=DIV,DIH=409.73,DIG=15 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= @
    DELETE VALUE)= NO EFFECT
    FIELD)= ACK CODE FOR ACK FROM NPCDB
    Value contained in ACK CODE FOR ACK FROM NPCDB field (#15) is deleted





13
BATCH ID OF XMIT TO NPCDB
1;3
FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  APR 29, 1996
  • HELP-PROMPT:  Enter batch control ID of transmission to NPCDB
  • DESCRIPTION:  
    Batch control ID of last transmission to National Patient Care Database.
  • CROSS-REFERENCE:  409.73^AACBID
    1)= S ^SD(409.73,"AACBID",$E(X,1,30),DA)=""
    2)= K ^SD(409.73,"AACBID",$E(X,1,30),DA)
    Cross referenced used to sort by batch control ID of last transmission to National Patient Care Database.
    Resulting node:
    ^SD(409.73,"AACBID",[13],DA)
    Where:
    [13] = Value contained in BATCH ID FOR XMIT TO NPCDB field (#13)
    DA = Pointer to entry in file





14
DATE/TIME OF ACK FROM NPCDB
1;4
DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 30, 1996
  • HELP-PROMPT:  Enter when acknowledgement was received from NPCDB
  • DESCRIPTION:  
    Date and [optional] time acknowledgement for last transmission to National Patient Care Database was received.
  • NOTES:  TRIGGERED by the MESSAGE ID OF XMIT TO NPCDB field of the TRANSMITTED OUTPATIENT ENCOUNTER File
  • CROSS-REFERENCE:  409.73^AACNA2^MUMPS
    1)= D AACNA^SCDXFX01(DA,0)
    2)= Q
    This cross reference is used to sort transmissions to the National Patient Care Database that have not been acknowledged.  This cross reference is set when a value is placed into the MESSAGE ID FOR XMIT TO NPCDB field
    (#12) and the cross reference is killed when a value is placed into the DATE/TIME OF ACK FROM NPCDB field (#14).
    Resulting node:
    ^SD(409.73,"AACNOACK",[11],DA)
    Where:
    [11] = Value contained in DATE/TIME OF XMIT TO NPCDB field (#11)
    DA = Pointer to entry in file





15
ACK CODE FOR ACK FROM NPCDB
1;5
SET

  • 'A' FOR ACCEPTED;
  • 'R' FOR REJECTED;
  • 'E' FOR ERROR;
  • LAST EDITED:  APR 29, 1996
  • HELP-PROMPT:  Enter acknowledgement code received from NPCDB
  • DESCRIPTION:  
    Code denoting type of acknowledgement received for last transmission to National Patient Care Database.
  • NOTES:  TRIGGERED by the MESSAGE ID OF XMIT TO NPCDB field of the TRANSMITTED OUTPATIENT ENCOUNTER File





20.01
PATIENT

COMPUTED

  • MUMPS CODE:  D PAT^SCDXUTL2(D0)
  • ALGORITHM:  D PAT^SCDXUTL2(D0)
  • LAST EDITED:  OCT 09, 1998





20.02
ENCOUNTER DATE

COMPUTED

  • MUMPS CODE:  D ECDT^SCDXUTL2(D0)
  • ALGORITHM:  D ECDT^SCDXUTL2(D0)
  • LAST EDITED:  MAY 24, 1996





20.03
HOSPITAL LOCATION

COMPUTED

  • MUMPS CODE:  D ECLOC^SCDXUTL2(D0)
  • ALGORITHM:  D ECLOC^SCDXUTL2(D0)
  • LAST EDITED:  OCT 09, 1998





20.04
PATIENT SSN

COMPUTED

  • MUMPS CODE:  D SSN^SCDXUTL2(D0)
  • ALGORITHM:  D SSN^SCDXUTL2(D0)





20.05
ENCOUNTER DIVISION

COMPUTED

  • MUMPS CODE:  D EDIV^SCDXUTL2(D0)
  • ALGORITHM:  D EDIV^SCDXUTL2(D0)
  • LAST EDITED:  OCT 09, 1998





20.06
ENCOUNTER DIVISION (INTERNAL)

COMPUTED

  • MUMPS CODE:  D EDIV^SCDXUTL2(D0,1)
  • ALGORITHM:  D EDIV^SCDXUTL2(D0,1)







    



Info | 
Desc | 
Directly Accessed By Routines | 
Accessed By FileMan Db Calls | 
Pointed To By FileMan Files | 
Pointer To FileMan Files | 
Fields | 
All