Routine: MAGDSTQ9

Information

MAGDSTQ9 ;WOIFO/PMK - Study Tracker - Query/Retrieve user ; Jan 14, 2026@09:59:16

Name	Comments	DBIA/ICR reference
PICKSCP(DEFAULT,SCPTYPE)	; Pick the SCP for the site

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"* ",$P(DIVISION,",",2,999)," *" Line Location: PICKSCP+5
Function Call: WRITE	Prompt: !!,"No Service Class Providers defined in SCU_LIST.DIC." Line Location: PICKSCP+29
Function Call: WRITE	Prompt: ! Line Location: PICKSCP+32
Function Call: WRITE	Prompt: "-" Line Location: PICKSCP+32
Function Call: WRITE	Prompt: !,$J(I,3)," -- ",$P(TARGET(I),"^") Line Location: PICKSCP+33
Function Call: WRITE	Prompt: " (selected)" Line Location: PICKSCP+34
Function Call: WRITE	Prompt: !!,"Select the provider application (1-",N,"): " Line Location: PICKSCP+35
Function Call: READ	Variable: X Timeout: DTIME Line Location: PICKSCP+36
Function Call: WRITE	Prompt: X Line Location: PICKSCP+38
Function Call: WRITE	Prompt: " ??? -- try again",!! Line Location: PICKSCP+39