Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^PRC(411.3

Package: IFCAP

Global: ^PRC(411.3


Information

FileMan FileNo FileMan Filename Package
411.3 IFCAP CONVERSION DISCREPANCY IFCAP

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
IFCAP 5 ^PRC(411.3    ITEM SPECIFIC INFORMATION    PRC5B7A    PRCHPRCV    PRCUFC0E    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
IFCAP 2 PRCHPRCV    PRCUFC0E    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
IFCAP 3 IFCAP CONVERSION ERROR(#411.4)[6]    PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)[12]    ISMS/FMS TRANS(#423.6)[3]    
Kernel 1 NEW PERSON(#200)[2]    

Fields, Total: 13

Field # Name Loc Type Details
.01 DISCREPANCY ID 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
  • LAST EDITED:  JUN 13, 1994
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This Discrepancy ID is just a number to identify this error record.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  411.3^B
    1)= S ^PRC(411.3,"B",$E(X,1,30),DA)=""
    2)= K ^PRC(411.3,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^411.3^1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRC(411.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y X ^DD(411.3,.01,1,2,1.1) X ^DD(411.3,.01,1,2,1.4)
    1.1)= S X=DIV N %I,%H,% D NOW^%DTC S X=%
    1.4)= S DIH=$S($D(^PRC(411.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,2)=DIV,DIH=411.3,DIG=1 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= NOW
    DELETE VALUE)= NO EFFECT
    FIELD)= DATE & TIME
    This is when this error was logged.
  • CROSS-REFERENCE:  ^^TRIGGER^411.3^2
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRC(411.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(411.3,.01,1,3,1.4)
    1.4)= S DIH=$S($D(^PRC(411.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=411.3,DIG=2 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= S X=DUZ
    DELETE VALUE)= NO EFFECT
    FIELD)= user
    This is who ran the conversion routine when this error was found.
1 DATE & TIME OF ERROR 0;2 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 21, 1994
  • DESCRIPTION:  
    This is the date/time, in FileMan format, when the VENDOR conversion error occurred.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the DISCREPANCY ID field of the IFCAP CONVERSION DISCREPANCY File
  • CROSS-REFERENCE:  411.3^AAA^MUMPS
    1)= I $P(^(0),U,10)]"" S ^PRC(411.3,"AAA",$P(^(0),U,10),X,DA)=""
    2)= I $P(^(0),U,10)]"" K ^PRC(411.3,"AAA",$P(^(0),U,10),X,DA)
    This x-ref and the FMS CONVERSION TRANSACTION field are used when a report is created from these errors. This x-ref allows the report to choose those entries that fall within a user selected time range.
2 USER 0;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 13, 1994
  • DESCRIPTION:  
    This is the user, DUZ, who is running this VENDOR conversion.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the DISCREPANCY ID field of the IFCAP CONVERSION DISCREPANCY File
3 RECORD NUMBER (423.6) 0;4 POINTER TO ISMS/FMS TRANS FILE (#423.6) ISMS/FMS TRANS(#423.6)

  • LAST EDITED:  JUN 13, 1994
  • HELP-PROMPT:  Enter the record number that caused this error.
  • DESCRIPTION:  
    The entry in file 423.6 that has the FMS segment that errored out. File 423.6 is where the FMS server placed the VENDOR Conversion transaction.
4 LINE NUMBER (423.6) 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<10000)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 13, 1994
  • HELP-PROMPT:  Enter the line number, from file 423.6, that caused this error.
  • DESCRIPTION:  
    This is the line number within the record in file 423.6. This record is entered in response to an incoming MailMan message addressed to the FMS server.
5 FMS FIELD 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  JUN 13, 1994
  • HELP-PROMPT:  This is the FMS field that displayed this error.
  • DESCRIPTION:  
    This is the field within the CVU segment of the IFCAP vendor conversion that made this error appear. There may be nothing wrong with this field. Look at the ERROR field to see what is wrong.
6 ERROR 0;7 POINTER TO IFCAP CONVERSION ERROR FILE (#411.4) IFCAP CONVERSION ERROR(#411.4)

  • LAST EDITED:  JUN 13, 1994
  • HELP-PROMPT:  Enter the appropriate error for this problem.
  • DESCRIPTION:  
    This is an error message pointer. The error codes are found in file 411.4.
  • TECHNICAL DESCR:  
    This field points to the IFCAP CONVERSION ERROR file. This file will hold all the errors from the IFCAP 5.0 CONVERSION.
7 ENTRY POINT OF PROGRAM 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
  • LAST EDITED:  DEC 31, 1992
  • HELP-PROMPT:  Answer must be 1-8 characters in length.
  • DESCRIPTION:  
    This is the line label within a routine. For the VENDOR conversion it is not used.
8 CONVERSION PROGRAM NAME 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<3) X
  • LAST EDITED:  DEC 31, 1992
  • HELP-PROMPT:  Answer must be 3-8 characters in length.
  • DESCRIPTION:  
    This is the name of a routine. For VENDOR conversion this field is not used.
9 FMS CONVERSION TRANSACTION 0;10 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  JUN 21, 1994
  • HELP-PROMPT:  Enter FMS TRANSACTION CLASS value.
  • DESCRIPTION:  
    This is the name of the FMS segment with the error. See the error field to find out what is actually wrong.
  • CROSS-REFERENCE:  411.3^AC^MUMPS
    1)= I $P(^(0),U,2)]"" S ^PRC(411.3,"AAA",X,$P(^(0),U,2),DA)=""
    2)= I $P(^(0),U,2)]"" K ^PRC(411.3,"AAA",X,$P(^(0),U,2),DA)
    This x-ref and the DATE & TIME OF ERROR field are used when a report is created from these errors. This x-ref allows the reoirt to choose those entries that fall within a user selected time range.
10 442 RECORD 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  JUL 25, 1994
  • HELP-PROMPT:  Answer must be 1-12 characters in length.
  • DESCRIPTION:  
    This field holds the INTERNAL ENTRY NUMBER of the last record in file 442 that was converted.
  • TECHNICAL DESCR:  This field will keep track of the last record converted. This is done to allow the conversion routine PRCHPRCV to be restartable. The conversion routine will automatically pick up where it left off, without harming any
    previously converted records.
    This field is used for the conversion of file 442 for version 5 of IFCAP.
  • CROSS-REFERENCE:  411.3^AD^MUMPS
    1)= S ^PRC(411.3,"AD",DA,$E(X,1,30))=""
    2)= K ^PRC(411.3,"AD",DA,$E(X,1,30))
  • CROSS-REFERENCE:  ^^TRIGGER^411.3^11
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRC(411.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,12),X=X S DIU=X K Y S X=DIV S X=DIU+1 X ^DD(411.3,10,1,2,1.4)
    1.4)= S DIH=$S($D(^PRC(411.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,12)=DIV,DIH=411.3,DIG=11 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= RECORD COUNT+1
    DELETE VALUE)= NO EFFECT
    FIELD)= RECORD COUNT
    This x-ref will keep track of how many records were converted in file 442 during the conversion.
11 RECORD COUNT 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 25, 1994
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the number of records entered into this file during the conversion process.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the 442 RECORD field of the IFCAP CONVERSION DISCREPANCY File
12 RECORD NUMBER (442) 0;13 POINTER TO PROCUREMENT & ACCOUNTING TRANSACTIONS FILE (#442) PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)

  • LAST EDITED:  JUL 26, 1994
  • DESCRIPTION:  
    The internal entry number in File 442 that caused the error.

External References

Name Field # of Occurrence
^%DT 1+1
NOW^%DTC .01(XREF 2n1.1)
^DICR .01(XREF 2n1.4), .01(XREF 3n1.4), 10(XREF 2n1.4)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( .01(XREF 2n1.4), .01(XREF 3n1.4), 10(XREF 2n1.4)
^DD(411.3 .01(XREF 2S), .01(XREF 3S), 10(XREF 2S)
^PRC(411.3 - [#411.3] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3n1.4), 1(XREF 1S), 1(XREF 1K), 9(XREF 1S), 9(XREF 1K)
, 10(XREF 1S), 10(XREF 1K), 10(XREF 2S), 10(XREF 2n1.4)

Naked Globals

Name Field # of Occurrence
^(0 .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3n1.4), 1(XREF 1S), 1(XREF 1K), 9(XREF 1S), 9(XREF 1K), 10(XREF 2S), 10(XREF 2n1.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% .01(XREF 2n1.1)
>> %DT 1+1*
%H .01(XREF 2n1.1)
%I .01(XREF 2n1.1)
>> D0 .01(XREF 2S), .01(XREF 3S), 10(XREF 2S)
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 3S), 1(XREF 1S), 1(XREF 1K), 9(XREF 1S), 9(XREF 1K), 10(XREF 1S), 10(XREF 1K)
, 10(XREF 2S)
>> DIG .01(XREF 2n1.4), .01(XREF 3n1.4), 10(XREF 2n1.4)
>> DIH .01(XREF 2n1.4), .01(XREF 3n1.4), 10(XREF 2n1.4)
>> DINUM .01+1*
>> DIU .01(XREF 2S), .01(XREF 3S), 10(XREF 2S)
DIV .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3n1.4), 10(XREF 2S), 10(XREF 2n1.4)
DIV(0 .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3n1.4), 10(XREF 2S), 10(XREF 2n1.4)
DUZ .01(XREF 3S)
U .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3n1.4), 1(XREF 1S), 1(XREF 1K), 9(XREF 1S), 9(XREF 1K), 10(XREF 2S), 10(XREF 2n1.4)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3n1.4), 1+1*!, 1(XREF 1S)
, 1(XREF 1K), 4+1!, 5+1!, 7+1!, 8+1!, 9+1!, 9(XREF 1S), 9(XREF 1K), 10+1!, 10(XREF 1S)
, 10(XREF 1K), 10(XREF 2S), 10(XREF 2n1.4), 11+1!
Y .01(XREF 2S), .01(XREF 3S), 1+1, 10(XREF 2S)
Y(1 .01(XREF 2S), .01(XREF 3S), 10(XREF 2S)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All