Sub-Field: 9002199.01

Parent File	Name	Number	Package
ARMS PURCHASING AGENT(#9002199)	DEPARTMENTS SERVED	9002199.01	Commitment Register

Parent File

Name

Number

Package

DEPARTMENTS SERVED

9002199.01

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DEPARTMENTS SERVED	0;1	POINTER TO ARMS DEPARTMENT FILE (#9002188.1)	ARMS DEPARTMENT(#9002188.1) LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Enter the names of ARMS DEPARTMENTS this agent serves.` DESCRIPTION: Enter the name of the departments served by this purchasing agent. CROSS-REFERENCE: `9002199.01^B` 1)= S ^ACRPA(DA(1),10,"B",$E(X,1,30),DA)="" 2)= K ^ACRPA(DA(1),10,"B",$E(X,1,30),DA) CROSS-REFERENCE: `9002199^C` 1)= S ^ACRPA("C",$E(X,1,30),DA(1),DA)="" 2)= K ^ACRPA("C",$E(X,1,30),DA(1),DA)

DEPARTMENTS SERVED

0;1

POINTER TO ARMS DEPARTMENT FILE (#9002188.1)

DESCRIPTION:

Enter the name of the departments served by this purchasing agent.

CROSS-REFERENCE: 9002199.01^B

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

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

CROSS-REFERENCE: 9002199^C

1)= S ^ACRPA("C",$E(X,1,30),DA(1),DA)=""

2)= K ^ACRPA("C",$E(X,1,30),DA(1),DA)