Global: ^SD(409.75

FileMan FileNo	FileMan Filename	Package
409.75	TRANSMITTED OUTPATIENT ENCOUNTER ERROR	Scheduling

Directly Accessed By Routines, Total: 34

Package	Total	Routines
Scheduling	26	SCDDI1 SCDXFU02 SCDXRT03 SCDXSUP2 SCDXUTL2 SCDXUTL3 SCDXUTL4 SCENI ERROR SORT SCENI PT ALPHA SORT SCENI0 SCENIA0 SCENIA1 SCMSP66 SCMSVUT2 SCRPI01 SCRPI01A SCRPI02 SCRPW1 SCRPW8 SD53105A SD5360PT SD5370PT SD5384PT SD5396PT TEAM POSITIONS ^SD(409.75

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

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`

.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

External References

Name	Field # of Occurrence
KILACOD1^SCDDI1	.01(XREF 5K)
KILACOD2^SCDDI1	.02(XREF 2K)
KILAECL^SCDDI1	.01(XREF 3K)
KILAEDT^SCDDI1	.01(XREF 2K)
SETACOD1^SCDDI1	.01(XREF 5S)
SETACOD2^SCDDI1	.02(XREF 2S)
SETAECL^SCDDI1	.01(XREF 3S)
SETAEDT^SCDDI1	.01(XREF 2S)

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(409.75	10.01+1
^SD(409.73 - [#409.73]	10.01+1, 10.01OF9.2+1
^SD(409.75 - [#409.75]	.01(XREF 1S), .01(XREF 1K), .01(XREF 4S), .01(XREF 4K), .02(XREF 1S), .02(XREF 1K), 10.01OF9.2+1

Naked Globals

Name	Field # of Occurrence
^(0	10.01OF9.2+1
^(1	10.01+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
C	.01(XREF 4S), .01(XREF 4K)
>> D0	10.01+1, 10.01OF9.2+1
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .01(XREF 5K) , .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)
P	.02(XREF 1S), .02(XREF 1K)
U	.01(XREF 4S), .01(XREF 4K), .02(XREF 1S), .02(XREF 1K), 10.01+1, 10.01OF9.2+1
>> X	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .01(XREF 5K) , .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), 10.01+1*
>> Y(	10.01+1, 10.01OF9.2+1

Customize PDF page

Package: Scheduling