Global: ^APSPP(31.3

FileMan FileNo	FileMan Filename	Package
9009031.3	APSP MANUFACTURER	IHS Changes To Pharmacy

FileMan FileNo

FileMan Filename

Package

9009031.3

APSP MANUFACTURER

This file holds all the manufacturers that are used by the APSP PHARMACY PREPACK LOG file. Entries may be added while making an entry in the APSP PHARMACY PREPACK LOG file. Since this file is pointed to by the above file, entries should not be deleted but rather inactivated by filling in an inactive date.

Package	Total	Routines
IHS Changes To Pharmacy	2	APSPR APSPT15

Package

Total

Routines

APSPR APSPT15

Package	Total	FileMan Files
IHS Changes To Pharmacy	2	APSP PREPACK LOG(#9009031)[.04] NON FORMULARY REQUESTS(#9009035.1)[3.1]

Package

Total

FileMan Files

Fields, Total: 2

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>45!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `JUL 21, 1989` HELP-PROMPT: `Answer must be 3-45 characters in length.` DESCRIPTION: This file contains the names of manufacturers of drugs. It is currently pointed to by the APSP PREPACK LOG file (#9009031). CROSS-REFERENCE: `9009031.3^B` 1)= S ^APSPP(31.3,"B",$E(X,1,30),DA)="" 2)= K ^APSPP(31.3,"B",$E(X,1,30),DA)
.02	INACTIVE DATE	0;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 24, 1989` HELP-PROMPT: `If you enter a date here, this manufacturer will no longer be !,available for selection.` CROSS-REFERENCE: `9009031.3^AI^MUMPS` 1)= S ^APSPP(31.3,DA,"I")=X 2)= K ^APSPP(31.3,DA,"I")

NAME

0;1

FREE TEXT

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

DESCRIPTION:

This file contains the names of manufacturers of drugs.  It is currently pointed to by the APSP PREPACK LOG file (#9009031).

CROSS-REFERENCE: 9009031.3^B

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

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

INACTIVE DATE

0;2

DATE

INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUL 24, 1989
HELP-PROMPT: If you enter a date here, this manufacturer will no longer be !,available for selection.

CROSS-REFERENCE: 9009031.3^AI^MUMPS

1)= S ^APSPP(31.3,DA,"I")=X

2)= K ^APSPP(31.3,DA,"I")