130 (412)    INDEX (.11)

Name Value
FILE 130
NAME AK
DESCRIPTION
This cross-reference will be checked before sending a notification to the
PFSS after editing the Date Of Operation field.
SHORT DESCRIPTION PFSS field monitor flag.
TYPE MUMPS
EXECUTION FIELD
ACTIVITY IR
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 130
SET LOGIC I ($P(X1(1),".")'=$P(X2(1),"."))&(X2(1)'="") S ^TMP("SRPFSS",$J)="" Q
SET CONDITION CODE Q
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   130
    FIELD:   .09
    COLLATION:   forwards
KILL LOGIC I ($P(X1(1),".")'=$P(X2(1),"."))&(X1(1)'="") S ^TMP("SRPFSS",$J)="" Q
KILL CONDITION CODE Q