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 |  Pointed To By FileMan Files |  Fields |  All
Print Page as PDF
Global: ^AGEDERRS

Package: IHS Patient Registration

Global: ^AGEDERRS


Information

FileMan FileNo FileMan Filename Package
9009061.5 AG PATIENT REGISTRATION ERROR CODES IHS Patient Registration

Description

Directly Accessed By Routines, Total: 13

Package Total Routines
IHS Patient Registration 12 AG71A    AG71A1    AG71A2    AG71A3    AG71A4    AG71A5    AG71A7    AG71A8
AGEDERR    AGEDERR1    AGERRAU1    AGERRAUD    
Patient Registration GUI 1 AGGEDCHK    

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
IHS Patient Registration 4 AG71A7    AG71A8    AGEDERR    AGERRAU1    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
IHS Patient Registration 1 AG ERROR/WARNING AUDIT(#9009061.6)[#9009061.60101(.01)]    

Fields, Total: 9

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

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1.N) X S:$D(X) DINUM=X
  • LAST EDITED:  APR 21, 2004
  • HELP-PROMPT:  Type a number between 1 and 999, 0 Decimal Digits
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9009061.5^B
    1)= S ^AGEDERRS("B",$E(X,1,30),DA)=""
    2)= K ^AGEDERRS("B",$E(X,1,30),DA)
.02 ERROR TYPE 0;2 SET
  • 'W' FOR WARNING;
  • 'E' FOR ERROR;
  • 'F' FOR FATAL ERROR;
  • 'A' FOR ALERT;

  • LAST EDITED:  AUG 23, 2004
  • DESCRIPTION:  
    Enter the error type Warning or Error
  • TECHNICAL DESCR:  
    At this time only W and E are used programmatically. The set category has F and A as possible types for future use. Fatal error and alerts.
.03 ERROR MESSAGE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>79!($L(X)<1) X
  • LAST EDITED:  AUG 23, 2004
  • HELP-PROMPT:  1-79 CHARS IN LENGTH PLACE (#) TO INSERT POLICY INFO
  • DESCRIPTION:  
    This is the message which appeasr on the screen when the user is displayed the errors at the bottom of all edit screens.
  • TECHNICAL DESCR:  
    By placing a '(#)' information will be inserted inplace of the pound sign to assist the user in identifying what is wrong.
.04 ROUTINE TAG 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
  • LAST EDITED:  AUG 23, 2004
  • HELP-PROMPT:  ENTER THE MUMPS ROUTINE TAG THAT DETERMINES THE ERROR
  • TECHNICAL DESCR:  This is the routine tag called to perform the error check. The tag and routine were separated into their own fields to allow movement of these calls to different routines as the need arises e.g. edit checks routine becomes
    too big and new edit check must be placed/moved into another routine.
.05 ROUTINE 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  AUG 23, 2004
  • HELP-PROMPT:  Answer must be 1-50 characters in length
  • TECHNICAL DESCR:  This is the routine called to perform the error check. The tag and routine were separated into their own fields to allow movement of these calls to different routines as the need arises e.g. edit checks routine becomes too
    big and new edit check must be placed/moved into another routine.
501 CORRECTIVE ACTION 1;0 WORD-PROCESSING #9009061.501

  • DESCRIPTION:  
    This is the corrective action to be taken to correct the error or warning.
502 LOGIC REASONING FOR ERROR 2;0 WORD-PROCESSING #9009061.502
1101 APPLY TO PAGE 11;0 Multiple #9009061.511 9009061.511

  • DESCRIPTION:  This field contains the edit screen "labels". These "labels" identify what screens the error is applied to. The labels must correspond to the value set in the variable AG("PG") e.g. S AG("PG")="4TPLA" The "label" "4TPLA"
    is then enterred intot his field so the edit check is perfomred for that particular screen. The programmer must make sure that the associated screen sets this variable before the call to FETCH^AGEDERR so the proper edit
    checks are performed for that particular screen. Setting this variable is best done in the DRAW subroutine of the standard 7.1 screen routines.
  • TECHNICAL DESCR:  This field contains the edit screen "labels". These "labels" identify what screens the error is applied to. The labels must correspond to the value set in the variable AG("PG") e.g. S AG("PG")="4TPLA" The "label" "4TPLA"
    is then enterred intot his field so the edit check is perfomred for that particular screen. The programmer must make sure that the associated screen sets this variable before the call to FETCH^AGEDERR so the proper edit
    checks are performed for that particular screen. Setting this variable is best done in the DRAW subroutine of the standard 7.1 screen routines.
2101 ERROR CHECKING OVERRIDE 12;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  JUL 23, 2008
  • HELP-PROMPT:  Enter Standard MUMPS code. See technical description for more info.
  • TECHNICAL DESCR:  The code entered here should be a functon designed to set the variable RETURN to true if the error code passed into it is to "overridden" in other words NOT performed. An example would be error 30 which checks Medicaid
    coverage type. If the field MEDICAID COVERAGE REQUIRED field in the INSURER is set to "N" then this error is not checked at all.
    Example:
    S RETURN=$$OVERRIDE^AGEROVR(ERROR,RECORD)
    All such overrides will be placed in AGEROVR. The approrpiate subroutine will be called depending on ERROR. If any additional overrides are need they can be placed in AGEROVR1,AGEROVR2 and so on.







    



Info | 
Desc | 
Directly Accessed By Routines | 
Accessed By FileMan Db Calls | 
Pointed To By FileMan Files | 
Fields | 
All