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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | 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: 48

Package Total Routines
Scheduling 42 SCDDI1    SCDXFU01    SCDXFU02    SCDXFU03    SCDXFU10    SCDXFU11    SCDXFX01    SCDXHLDR
SCDXMSG    SCDXMSG0    SCDXMSG2    SCDXPOV    SCDXRT01    SCDXSUP    SCDXUTL2    SCENI ERROR SORT
^SD(409.73    SCDXFU04    SCDXFU13    SCDXUTL    SCDXUTL3    SCDXUTL4    SCDXUTL5    SCENI PT ALPHA SORT
SCENI0    SCENIA1    SCENIA2    SCMSVUT2    SCRPI02    SCRPW1    SCRPW8    SCRPW81
SCUTIE1    SD53252P    SD5360PT    SD5370PT    ^SD(409.75    SD53105A    SD5364PT    SD53747P
SD5396PT    TEAM POSITIONS    

Accessed By FileMan Db Calls, Total: 7

Package Total Routines
Scheduling 7 SCDXFU01    SCDXFU03    SCDXMSG2    SCDXPRN    SCDXUTL5    SCRPW1    SD5370PT    

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)

External References

Name Field # of Occurrence
^%DT .06+1, 11+1, 14+1
^DICR 12(XREF 2n1.4), 12(XREF 3n1.4)
$$AUTO^SCDXFX01 .01TPL+1
AACNA^SCDXFX01 11(XREF 2S), 11(XREF 2K), 14(XREF 1S)
AACXMIT^SCDXFX01 .04(XREF 1S), .04(XREF 1K), .06(XREF 1S), .06(XREF 1K)
ECDT^SCDXUTL2 20.02+1
ECLOC^SCDXUTL2 20.03+1
EDIV^SCDXUTL2 20.05+1, 20.06+1
PAT^SCDXUTL2 20.01+1
SSN^SCDXUTL2 20.04+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( 12(XREF 2n1.4), 12(XREF 3n1.4)
^DD(409.73 12(XREF 2S), 12(XREF 3S)
^SD(409.73 - [#409.73] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), 11(XREF 1S), 11(XREF 1K), 12(XREF 1S), 12(XREF 1K)
, 12(XREF 2S), 12(XREF 2n1.4), 12(XREF 3S), 12(XREF 3n1.4), 13(XREF 1S), 13(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(1 12(XREF 2S), 12(XREF 2n1.4), 12(XREF 3S), 12(XREF 3n1.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .06+1*, 11+1*, 14+1*
>> D0 12(XREF 2S), 12(XREF 3S), 20.01+1, 20.02+1, 20.03+1, 20.04+1, 20.05+1, 20.06+1
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K), .06(XREF 1S), .06(XREF 1K)
, 11(XREF 1S), 11(XREF 1K), 11(XREF 2S), 11(XREF 2K), 12(XREF 1S), 12(XREF 1K), 12(XREF 2S), 12(XREF 3S), 13(XREF 1S), 13(XREF 1K)
, 14(XREF 1S)
>> DIG 12(XREF 2n1.4), 12(XREF 3n1.4)
>> DIH 12(XREF 2n1.4), 12(XREF 3n1.4)
>> DIU 12(XREF 2S), 12(XREF 3S)
DIV 12(XREF 2S), 12(XREF 2n1.4), 12(XREF 3S), 12(XREF 3n1.4)
DIV(0 12(XREF 2S), 12(XREF 2n1.4), 12(XREF 3S), 12(XREF 3n1.4)
U 12(XREF 2S), 12(XREF 2n1.4), 12(XREF 3S), 12(XREF 3n1.4)
X .01+1!, .01TPL+1*, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .06+1*!, .06(XREF 1K)
, 11+1*!, 11(XREF 1S), 11(XREF 1K), 11(XREF 2K), 12+1!, 12(XREF 1S), 12(XREF 1K), 12(XREF 2S), 12(XREF 2n1.4), 12(XREF 3S)
, 12(XREF 3n1.4), 13+1!, 13(XREF 1S), 13(XREF 1K), 14+1*!
Y .06+1, 11+1, 12(XREF 2S), 12(XREF 3S), 14+1
Y(1 12(XREF 2S), 12(XREF 3S)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All