Routine: PSGWI016

Information

PSGWI016 ; ; 04-JAN-1994

Source file <PSGWI016.m>

Name	Comments	DBIA/ICR reference
Q

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?6 Line Location: Q+40
Function Call: WRITE	Prompt: $S($D(^PSI(58.2,PC,0)):$P(^(0),U),1:"") Line Location: Q+40
Function Call: WRITE	Prompt: ", " Condition for execution: LP<($L(GRP,",")-1) Line Location: Q+40

Name	Field # of Occurrence
$T(Q+I	PSGWI016+2
$T(Q+I+1	PSGWI016+2