Global: ^APCCDPL

Information

FileMan FileNo	FileMan Filename	Package
9001205	APCC DOCUMENT LOG	Patient Care Component

Package	Total	Routines
Patient Care Component Table Maintiance	5	APCM14E4 APCM14E5 APCM24E4 APCM24E5 APCM25E4

Package	Total	FileMan Files
IHS Patient	1	VISIT(#9000010)[.01]
Kernel	1	NEW PERSON(#200)[#9001205.1(.03)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	VISIT	0;1	POINTER TO VISIT FILE (#9000010)	**********************REQUIRED FIELD********************** VISIT(#9000010) INPUT TRANSFORM: `S:$D(X) DINUM=X` LAST EDITED: `JUL 01, 2013` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9001205^B` 1)= S ^APCCDPL("B",$E(X,1,30),DA)="" 2)= K ^APCCDPL("B",$E(X,1,30),DA)
1	LOG	1;0	DATE Multiple #9001205.1	9001205.1

VISIT

0;1

POINTER TO VISIT FILE (#9000010)

************************REQUIRED FIELD************************

CROSS-REFERENCE: 9001205^B

1)= S ^APCCDPL("B",$E(X,1,30),DA)=""

2)= K ^APCCDPL("B",$E(X,1,30),DA)

1 LOG 1;0 DATE Multiple #9001205.1 9001205.1