VistA Analysis » VistA Reference » RPCs » ORWTPT ATEAMS

ORWTPT ATEAMS

Properties

Property Value
Label ATEAMS
MUMPS Implementation ORWTPT
Return Type ARRAY

MUMPS Method Description

Property Value
Method ATEAMS^ORWTPT
Method Comment RPC
First Comment
 all teams available to subscribe to
Code
 N CNT,NAME,NODE,NUM K TEAMS
S CNT=0
S NUM=0 F S NUM=$O(^OR(100.21,NUM)) Q:NUM<1 S NODE=$G(^(NUM,0)) D
.I $P(NODE,U,6)'="Y" Q
.I $P(NODE,U,2)="P" Q
.S CNT=CNT+1
.S TEAMS(CNT)=NUM_U_NODE ;$P(NODE,U)

CPRS

File Type Description
Pascal File Options/rOptions.pas


Document generated on August 31st 2022, 2:55:43 pm