Routine: GMTSPSCK

Information

GMTSPSCK ;PBM/RMS - MED RECONCILIATION CONFIGURATION CHECKER ;Jun 07, 2018@21:40

Name	Comments	DBIA/ICR reference
EN1	; Main entry point
GETCOMP(IEN)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Checking for TYPE 'Essential Med List for Review' ..." Line Location: EN1+4
Function Call: WRITE	Prompt: " OK",! Line Location: EN1+9
Function Call: WRITE	Prompt: " FAIL (Component not found)",! Line Location: EN1+21
Function Call: WRITE	Prompt: " FAIL (Missing)",! Line Location: EN1+24
Function Call: WRITE	Prompt: "Checking for COMPONENT 'Allergies/ADRs (Tool #5)' configured in TYPE ..." Line Location: EN1+26
Function Call: WRITE	Prompt: " OK",! Line Location: EN1+27
Function Call: WRITE	Prompt: !?5," FAIL (Missing)",! Line Location: EN1+28
Function Call: WRITE	Prompt: "Checking Tool #1 COMPONENTs to Verify One (and Only One) is Present ...",! Line Location: EN1+29
Function Call: WRITE	Prompt: "Checking for COMPONENT 'Med. Reconciliation (Tool #1)' configured in TYPE ...",! Line Location: EN1+30
Function Call: WRITE	Prompt: "Checking for COMPONENT 'Med Recon NoGlossary (Tool #1)' configured in TYPE ..." Line Location: EN1+31
Function Call: WRITE	Prompt: " OK",! Line Location: EN1+32
Function Call: WRITE	Prompt: " OK",! Line Location: EN1+33
Function Call: WRITE	Prompt: !?5," FAIL (Can't have both MRT1 & MRR1 Tool #1 COMPONENTs)" Line Location: EN1+34
Function Call: WRITE	Prompt: !?5," FAIL (Missing One)",! Line Location: EN1+35
Function Call: WRITE	Prompt: !!,"Press <Return> to Continue..." Line Location: EN1+36