Global: ^APCDLLOG

FileMan FileNo	FileMan Filename	Package
9001001.7	PCC DATA ENTRY ORPHAN LOG	Patient Care Component

Directly Accessed By Routines, Total: 1

Package	Total	Routines
Patient Care Component	1	APCDKLVR

Package	Total	Routines
Patient Care Component	7	APCDKBV APCDKIV APCDKLV APCDKLVP APCDKMV APCDKPV APCDKRV

Package	Total	FileMan Files
IHS Patient	1	VISIT(#9000010)[.01]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	VISIT	0;1	POINTER TO VISIT FILE (#9000010)	**********************REQUIRED FIELD********************** VISIT(#9000010) LAST EDITED: `JUN 04, 1997` CROSS-REFERENCE: `9001001.7^B` 1)= S ^APCDLLOG("B",$E(X,1,30),DA)="" 2)= K ^APCDLLOG("B",$E(X,1,30),DA)
.02	DATE COMPLETED	0;2	DATE	INPUT TRANSFORM: `S %DT="PEX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 27, 1999` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9001001.7^AC` 1)= S ^APCDLLOG("AC",$E(X,1,30),DA)="" 2)= K ^APCDLLOG("AC",$E(X,1,30),DA)
.03	TYPE OF ORPHAN	0;3	SET	'L' FOR LAB; 'R' FOR RADIOLOGY; 'P' FOR PHARMACY; 'I' FOR IMMUNIZATION; 'B' FOR BLOOD BANK; 'M' FOR MICROBIOLOGY; LAST EDITED: `OCT 28, 2003`

VISIT

0;1

POINTER TO VISIT FILE (#9000010)

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

CROSS-REFERENCE: 9001001.7^B

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

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

DATE COMPLETED

0;2

DATE

CROSS-REFERENCE: 9001001.7^AC

1)= S ^APCDLLOG("AC",$E(X,1,30),DA)=""

2)= K ^APCDLLOG("AC",$E(X,1,30),DA)

TYPE OF ORPHAN

0;3

SET