Global: ^APCDFORM

Information

FileMan FileNo	FileMan Filename	Package
9001001.5	PCC DATA ENTRY FORMS CONTROL	Patient Care Component

Package	Total	Routines
Patient Care Component	7	APCDFC1 APCDFC2 APCDFINQ APCDFOA1 APCDFOS1 APCDFPPV APCDFQA1
IHS Changes To ADT	1	ADGCRB6

Package	Total	Routines
Patient Care Component	2	APCDFORM APCDFPRG

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

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	POSTING DATE	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EPX" D ^%DT S X=Y K:DTX) X` LAST EDITED: `JAN 27, 1999` HELP-PROMPT: `TYPE A DATE BETWEEN DT AND DT` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9001001.5^B` 1)= S ^APCDFORM("B",$E(X,1,30),DA)="" 2)= K ^APCDFORM("B",$E(X,1,30),DA)
1101	VISIT	11;0	POINTER Multiple #9001001.51101	9001001.51101

POSTING DATE

0;1

DATE

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

CROSS-REFERENCE: 9001001.5^B

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

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

1101 VISIT 11;0 POINTER Multiple #9001001.51101 9001001.51101