Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields
Print Page as PDF
Global: ^SD(409.75

Package: Scheduling

Global: ^SD(409.75


Information

FileMan FileNo FileMan Filename Package
409.75 TRANSMITTED OUTPATIENT ENCOUNTER ERROR Scheduling

Description

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Scheduling 4 SCDXFU02    SCDXPRN    SCMSP66    SD53142    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Scheduling 2 TRANSMITTED OUTPATIENT ENCOUNTER(#409.73)[.01]    TRANSMITTED OUTPATIENT ENCOUNTER ERROR CODE(#409.76)[.02]    

Fields, Total: 3

Field # Name Loc Type Details
.01 TRANSMITTED ENCOUNTER 0;1 POINTER TO TRANSMITTED OUTPATIENT ENCOUNTER FILE (#409.73)
************************REQUIRED FIELD************************
TRANSMITTED OUTPATIENT ENCOUNTER(#409.73)

  • LAST EDITED:  AUG 07, 1997
  • HELP-PROMPT:  Enter Transmitted Outpatient Encounter that wasn't successfully transmitted
  • DESCRIPTION:  
    Pointer to entry in TRANSMITTED OUTPATIENT ENCOUNTER file that was not successfully transmitted to the National Patient Care Database.
  • CROSS-REFERENCE:  409.75^B
    1)= S ^SD(409.75,"B",$E(X,1,30),DA)=""
    2)= K ^SD(409.75,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  409.75^AEDT^MUMPS
    1)= D SETAEDT^SCDDI1(DA,X)
    2)= D KILAEDT^SCDDI1(DA,X)
    Cross reference by Outpatient Encounter date [Deleted Outpatient Encounter Date] and Transmitted Outpatient Encounter. The resulting cross reference will look like: ^SD(409.75,"AEDT",Encounter Date,IEN for entry in
    409.73,DA)=""
  • CROSS-REFERENCE:  409.75^AECL^MUMPS
    1)= D SETAECL^SCDDI1(DA,X)
    2)= D KILAECL^SCDDI1(DA,X)
    Cross reference by Outpatient Encounter Clinic [Deleted Outpatient Encounter Clinic] and Transmitted Outpatient Encounter. The resulting cross reference will look like: ^SD(409.75,"AECL",IEN of entry in 44,DA)=""
  • CROSS-REFERENCE:  409.75^AER^MUMPS
    1)= N C S C=$P(^SD(409.75,DA,0),U,2) I C S ^SD(409.75,"AER",$E(X,1,30),C,DA)=""
    2)= N C S C=$P(^SD(409.75,DA,0),U,2) I C K ^SD(409.75,"AER",$E(X,1,30),C,DA)
    Cross reference by Transmitted Outpatient Encounter and Transmitted Outpatient Encounter Error Code. The resulting cross reference will look like: ^SD(409.75,"AER",IEN of entry in 409.73,IEN of entry in 409.76,DA)=""
  • CROSS-REFERENCE:  409.75^ACOD^MUMPS
    1)= D SETACOD1^SCDDI1(DA,X)
    2)= D KILACOD1^SCDDI1(DA,X)
    Cross reference used to sort the error codes by patient. The resulting cross reference will look like: ^SD(409.75,"ACOD",Patient DFN,External value of the error code,DA)=""
.02 ERROR CODE 0;2 POINTER TO TRANSMITTED OUTPATIENT ENCOUNTER ERROR CODE FILE (#409.76) TRANSMITTED OUTPATIENT ENCOUNTER ERROR CODE(#409.76)

  • LAST EDITED:  AUG 07, 1997
  • HELP-PROMPT:  Enter reason for unsuccessfull transmission
  • DESCRIPTION:  
    Why entry in TRANSMITTED OUTPATIENT ENCOUNTER file was not successfully transmitted.
  • CROSS-REFERENCE:  409.75^AER2^MUMPS
    1)= N P S P=$P(^SD(409.75,DA,0),U,1) I P S ^SD(409.75,"AER",P,$E(X,1,30),DA)=""
    2)= N P S P=$P(^SD(409.75,DA,0),U,1) I P K ^SD(409.75,"AER",P,$E(X,1,30),DA)
    Cross reference by Transmitted Outpatient Encounter and Transmitted Outpatient Encounter Error Code. The resulting cross reference will look like: ^SD(409.75,"AER",IEN of entry in 409.73,IEN of entry in 409.76,DA)=""
  • CROSS-REFERENCE:  409.75^ACOD2^MUMPS
    1)= D SETACOD2^SCDDI1(DA,X)
    2)= D KILACOD2^SCDDI1(DA,X)
    Cross reference used to sort the error codes by patient. The resulting cross reference will look like: ^SD(409.75,"ACOD",Patient DFN,External value of the error code,DA)=""
10.01 DATE/TIME OF X-MIT TO NPCDB COMPUTED DATE

  • MUMPS CODE:  X ^DD(409.75,10.01,9.2) S Y(409.75,10.01,101)=$S($D(^SD(409.73,D0,1)):^(1),1:"") S X=$P(Y(409.75,10.01,101),U,1) S D0=Y(409.75,10.01,80)
    9.2 = S Y(409.75,10.01,80)=$S($D(D0):D0,1:""),Y(409.75,10.01,1)=$S($D(^SD(409.75,D0,0)):^(0),1:""),D0=$P(Y(409.75,10.01,1),U,1) S:'$D(^SD(409.73,+D0,0)) D0=-1
  • ALGORITHM:  .01:11
  • LAST EDITED:  OCT 29, 1996
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields