Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Source Information |  Naked Globals |  Local Variables |  All
Print Page as PDF
Sort Template: XUS VISIT USERS

Package: Kernel

Sort Template: XUS VISIT USERS


Source Information

Name Value
NAME XUS VISIT USERS
DESCRIPTION
This Template finds NPF entries that have VISIT data from another site.
SORT FIELD DATA
  1. FILE OR SUBFILE NO.:   200
    GET CODE:   S Y(1)="" X DPP(1,"OVF0",9.4) S X=+Y(1)>0 I D0>0 S DISX(1)=X
    QUERY CONDITION:   I DISX(1)
    DESCRIPTION OF SORT:   COUNT(VISITED FROM)>0
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(1)="" X DPP(1,"OVF0",9.4) S X=+Y(1)>0 I D0>0 S DISX(1)=X
    OVERFLOW DATA:
    1. FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.2
      OVERFLOW CODE:   F D=0:0 S (D,D1)=$O(^VA(200,D0,8910,"B",DICOB,D)) Q:D'>0 I $D(^VA(200,D0,8910,D,0))#2 S X=$P(^(0),U) S:X'?." " Y(1)=Y(1)+1 Q:'$D(D) S D=D1
    2. FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.3
      OVERFLOW CODE:   N DICOB S DICOB="" F S DICOB=$O(^VA(200,D0,8910,"B",DICOB)) Q:DICOB="" X DPP(1,"OVF0",9.2) Q:'$D(D)
    3. FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.4
      OVERFLOW CODE:   S I(1,0)=$G(D1) X DPP(1,"OVF0",9.3):D0>0 S X="" S D1=I(1,0)
    FIELD NAME:   COUNT(VISITED FROM)>0
    SORT QUALIFIERS BEFORE FIELD:   "@B
    SORT QUALIFIERS AFTER FIELD:   ;L1
  2. FILE OR SUBFILE NO.:   200
    GET CODE:   S DISX(2)=$P($G(^VA(200,D0,0)),U)
    QUERY CONDITION:   I DISX(2)'=""
    DESCRIPTION OF SORT:   NAME not null
    SEARCH EFFICIENCY RATING:   0
    PROBABILITY RATING:   0
    DATA TYPE FOR SORTING:   FREE TEXT
    FIELD NO.:   .01
    FIELD NAME:   NAME
    CROSS REFERENCE DATA:   ^VA(200,"B",^VA(200,^2
  3. FILE OR SUBFILE NO.:   200.06
    GET CODE:   S DISX(3)=$P($G(^VA(200,D0,8910,D1,0)),U,5)
    QUERY CONDITION:   I DISX(3)]]3120100.999999
    DESCRIPTION OF SORT:   LAST VISITED from Jan 1,2012
    DATA TYPE FOR SORTING:   DATE/TIME
    MULTIPLE FIELD DATA:
    1. MULT.FILE OR SUBFILE NO.:   200
      NODE:   8910
    FIELD NO.:   4
    FIELD NAME:   LAST VISITED
    SORT QUALIFIERS BEFORE FIELD:   ''
    FROM VALUE INTERNAL:   3120100.999999
    FROM VALUE EXTERNAL:   Jan 1,2012
    FROM VALUE PRINTABLE:   Jan 1,2012
    TO VALUE INTERNAL:   z
DATE CREATED 2012-12-14 12:07:00
FILE NEW PERSON
WRITE ACCESS @
DATE LAST USED 2012-12-14 00:00:00

Naked Globals

Name Field # of Occurrence
^(0 OVF01P11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D OVF01P11, OVF01P21
D0 P11, P15, OVF01P11, OVF01P21, OVF01P31, P21, P31
>> D1 OVF01P11, OVF01P31, P31
DICOB OVF01P11, OVF01P21
DISX(1 P11, P13, P15
DISX(2 P21, P23
>> DISX(3 P31, P33
>> DPP(1 P11, P15, OVF01P21, OVF01P31
>> I(1 OVF01P31
U OVF01P11, P21, P31
X P11, P15, OVF01P11, OVF01P31
Y(1 P11, P15, OVF01P11
Source Information |  Naked Globals |  Local Variables |  All