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 |  Found Entries |  All
Print Page as PDF
Global: ^AUPNWRKC

Package: IHS Patient

Global: ^AUPNWRKC


Information

FileMan FileNo FileMan Filename Package
9000032 WORKMAN'S COMP IHS Patient

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
IHS Patient Registration 2 AGCNVWC    AGED4B    
Local Area Programs 1 AZAXDPM1    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
IHS Patient Registration 1 AGED4B    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
IHS Patient 1 PATIENT(#9000001)[.02]    
Utility Tables 1 EMPLOYER(#9999999.75)[.07]    

Fields, Total: 8

Field # Name Loc Type Details
.01 DATE OF WC INJURY 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 02, 2002
  • TECHNICAL DESCR:  
    Created 6/13/2002 for V7.0 of AG Distributed in AUPN*99.1*8
  • CROSS-REFERENCE:  9000032^B
    1)= S ^AUPNWRKC("B",$E(X,1,30),DA)=""
    2)= K ^AUPNWRKC("B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • LAST EDITED:  MAR 31, 2003
  • TECHNICAL DESCR:  
    Created 6/20/02 for V7.0 of AG Distributed in AUPN*99.1*8
  • CROSS-REFERENCE:  9000032^C
    1)= S ^AUPNWRKC("C",$E(X,1,30),DA)=""
    2)= K ^AUPNWRKC("C",$E(X,1,30),DA)
.03 DESCRIPTION OF INJURY 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>45!($L(X)<3) X
  • LAST EDITED:  JUN 14, 2002
  • HELP-PROMPT:  Enter a free-text description (up to 45 characters) of the injury that pertains to this patient's episode of injury. Be as specific as possible noting injury location, affected body area(s), etc.
  • TECHNICAL DESCR:  
    Created 6/20/02 for V7.0 of AG Distributed in AUPN*99.1*8
.04 CLAIM FILED 0;4 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUN 14, 2002
  • HELP-PROMPT:  This field is used to indicate whether the injured party filed a claim with the state workmen's compensation ombudsmen or with their employer. This policy may vary from state to state.
  • TECHNICAL DESCR:  
    Created 6/20/02 for V7.0 of AG Distributed in AUPN*99.1*8
.05 CLAIM NUMBER 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  JUN 14, 2002
  • HELP-PROMPT:  Enter the claim or policy number assigned to this work-related incident. This field is free-text up to 15 characters and in some cases may be the patient's social security number.
  • TECHNICAL DESCR:  
    Created 6/20/02 for V7.0 of AG Distributed in AUPN*99.1*8
.06 NAME OF PATIENT'S ATTORNEY 0;6 FREE TEXT

  • INPUT TRANSFORM:  D NAME^AUPNPED
  • LAST EDITED:  APR 01, 2003
  • HELP-PROMPT:  Enter attorney name in 'LAST,FIRST MIDDLE' FORMAT (3 - 30 characters long).
  • DESCRIPTION:  
    Enter the attorney's name the same as you do for the patient's name. 3 - 30 characters long. ie: LAST,FIRST MIDDLE  (NO spaces after comma)
  • TECHNICAL DESCR:  
    Created 6/20/02 for V7.0 of AG Distributed in AUPN*99.1*8
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.07 PATIENT'S EMPLOYER 0;7 POINTER TO EMPLOYER FILE (#9999999.75) EMPLOYER(#9999999.75)

  • LAST EDITED:  JUN 14, 2002
  • HELP-PROMPT:  Enter the employer name of where the patient was employed at the time the injury occurred. The entries are taken from the Employer File and must exist prior to entry.
  • TECHNICAL DESCR:  
    Created 6/20/02 for V7.0 of AG Distributed in AUPN*99.1*8
.08 DATE CASE CLOSED 0;8 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 31, 2003
  • HELP-PROMPT:  Enter the date this case was closed.
  • DESCRIPTION:  
    Enter the date this case was closed.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All