Routine: PSDUP3

Information

PSDUP3 ;BHM/DAV,JPW-IRL Program/Data Download Vault Inv. Insp. ; 5 Oct 94

Source file <PSDUP3.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ASKD+3
Function Call: WRITE	Prompt: $C(7),!!,"No action taken!",!! Line Location: ASKD+5
Function Call: WRITE	Prompt: !!,"Compiling inventory data...",! Line Location: LOOP+3
Function Call: WRITE	Prompt: !,"/$",!,".$1",!,"$$",!,"I",! Line Location: START+2
Function Call: WRITE	Prompt: X,! Line Location: 1+2
Function Call: READ	Variable: XX Timeout: DTIME Line Location: 2+0
Function Call: WRITE	Prompt: "*"_+PSDS,! Line Location: 2+2
Function Call: WRITE	Prompt: DATA,!,$P(DATA(1),U),!,$P(DATA(1),U,2),! Line Location: DATA+0
Function Call: WRITE	Prompt: !,"END" Line Location: QQ+0
Function Call: WRITE	Prompt: !,"You can now disconnect the TRAKKER.",!! Line Location: QQ+1
Function Call: WRITE	Prompt: !,"No vault identified." Line Location: UPLOAD+3
Function Call: WRITE	Prompt: $C(7),!!,?9,"** Please contact your Pharmacy Coordinator for access to",!,?12,"upload this data to the trakker.",!!,?12,"The PSJ RPHARM security key is required.",! Line Location: UPLOAD+5
Function Call: WRITE	Prompt: !!,"Use the Send Data to DHCP option on the TRAKKER at this time.",! Line Location: UPLOAD+6
Function Call: READ	Prompt: ! Variable: X Timeout: DTIME Line Location: UP1+0
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"No signal received from the TRAKKER",! Line Location: NOSIGN+0