Routine: BPSJVAL2

Select the objects that you wish to see in the downloaded PDF

Information

BPSJVAL2 ;BHAM ISC/LJF - Validate Pharmacy data ;3/5/08 11:14

Name	Comments	DBIA/ICR reference
VALIDATE(BPSJDDD)	;
1	; Set ID - NS
2	; NCPDP Number - C
3	; PHARMACY NAME - R
4	; DEA Number - R
5	; Hour of Operation
6	; Mailing Address - R
7	; Remittance Address - R
8	; Contact Name
9	; Contact Title
10	; Contact means
11	; Alternate Contact Name
12	; Alternate Contact Title
13	; Alternate Contact means
14	; Lead Pharmacist Name - R
15	; Lead Pharmacist Title
16	; Lead Pharmacist License Number
17	; NPI Number - C (R - AFTER DDD)
TRIMTAIL(INSTR)	;
DECODE(INSTR)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"VERIFY PHARMACY REGISTRATIONS DATA.",! Line Location: BPSJVAL2+8
Function Call: WRITE	Prompt: ! Line Location: BPSJVAL2+10
Function Call: WRITE	Prompt: !,RETCODE(RIX) Line Location: VALIDATE+22