PRCFUOMS (161)    SORT TEMPLATE (.401)

Name Value
NAME PRCFUOMS
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   442
    GET CODE:   X DPP(1,"OVF0",9.5) S X=$S(Y(202):Y(302),Y(303):X) S D0=I(0,0) I D0>0 S DISX(1)=X
    QUERY CONDITION:   I DISX(1)'=""
    DESCRIPTION OF SORT:   $S(#8:#2'=3&(#8:#2'=7):#8:#2,1:"""") not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   X DPP(1,"OVF0",9.5) S X=$S(Y(202):Y(302),Y(303):X) S D0=I(0,0) I D0>0 S DISX(1)=X
    OVERFLOW DATA:
    • FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.2
      OVERFLOW CODE:   S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^PRC(442,D0,1)):^(1),1:""),D0=$P(Y(1),U,7) S:'$D(^PRCD(420.8,+D0,0)) D0=-1 S I(100,0)=$S($D(D0):D0,1:"")
    • FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.3
      OVERFLOW CODE:   X DPP(1,"OVF0",9.2) S Y(101)=$S($D(^PRCD(420.8,D0,0)):^(0),1:"") S X=$P(Y(101),U,3)'=3,Y(102)=X,D0=$P(Y(1),U,7) S:'$D(^PRCD(420.8,+D0,0)) D0=-1 S I(200,0)=$S($D(D0):D0,1:"")
    • FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.4
      OVERFLOW CODE:   X DPP(1,"OVF0",9.3) S Y(201)=$S($D(^PRCD(420.8,D0,0)):^(0),1:"") S X=$P(Y(201),U,3)'=7,Y=X,X=Y(102),X=X&Y,Y(202)=X
    • FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.5
      OVERFLOW CODE:   X DPP(1,"OVF0",9.4) S D0=$P(Y(1),U,7) S:'$D(^PRCD(420.8,+D0,0)) D0=-1 S Y(301)=$S($D(^PRCD(420.8,D0,0)):^(0),1:"") S X=$P(Y(301),U,3),Y(302)=X S X=1,Y(303)=X S X=""
    FIELD NAME:   $S(#8:#2'=3&(#8:#2'=7):#8:#2,1:"")
    SORT QUALIFIERS BEFORE FIELD:   '"
  • FILE OR SUBFILE NO.:   442
    GET CODE:   S DISX(2)=$P($G(^PRC(442,D0,0)),U,1)
    QUERY CONDITION:   I DISX(2)'=""
    DESCRIPTION OF SORT:   PURCHASE ORDER NUMBER not null
    SEARCH EFFICIENCY RATING:   0.0202
    PROBABILITY RATING:   0.0198
    DATA TYPE FOR SORTING:   FREE TEXT
    FIELD NO.:   .01
    FIELD NAME:   PURCHASE ORDER NUMBER
    SORT QUALIFIERS BEFORE FIELD:   @
    CROSS REFERENCE DATA:   ^PRC(442,"B",^PRC(442,^2
  • FILE OR SUBFILE NO.:   442.09
    GET CODE:   S DISX(3)=$P($G(^PRC(442,D0,10,D1,0)),U,6)
    QUERY CONDITION:   I DISX(3)'=""
    DESCRIPTION OF SORT:   DATE SIGNED not null
    DATA TYPE FOR SORTING:   DATE/TIME
    MULTIPLE FIELD DATA:
    • MULT.FILE OR SUBFILE NO.:   442
      NODE:   10
    FIELD NO.:   5
    FIELD NAME:   DATE SIGNED
    SORT QUALIFIERS BEFORE FIELD:   '@
DATE CREATED 1989-03-01 00:00:00
FILE PROCUREMENT & ACCOUNTING TRANSACTIONS