Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: NHINPI

NHINPI.m

Go to the documentation of this file.

NHINPI ; SLC/AGP - NHIN package post install ; 12/01/2009

 ;;1.0;NHIN;;Oct 25, 2010;Build 14

POST ;

 ; Create proxy user

 Q:$O(^VA(200,"B","NHIN,APPLICATION PROXY",0))

N X

 S X=$$CREATE^XUSAP("NHIN,APPLICATION PROXY","","NHIN APPLICATION PROXY")

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HNHINPI   266     printed  Dec 13, 2024@02:17:11                                                                                                                                                                                                       Page 2

NHINPI    ; SLC/AGP - NHIN package post install ; 12/01/2009

 +1       ;;1.0;NHIN;;Oct 25, 2010;Build 14

 +2       ;

POST      ;

 +1       ; Create proxy user

 +2        if $ORDER(^VA(200,"B","NHIN,APPLICATION PROXY",0))

               QUIT

 +3        NEW X

 +4        SET X=$$CREATE^XUSAP("NHIN,APPLICATION PROXY","","NHIN APPLICATION PROXY")

 +5        QUIT

 +6       ;