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: ^AUPNPCRT

Package: IHS Patient

Global: ^AUPNPCRT


Information

FileMan FileNo FileMan Filename Package
9000036 PRE-CERTIFICATION IHS Patient

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Local Area Programs 1 AZAXDPM1    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
IHS Patient Registration 1 AGEL4    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
IHS Patient 1 PATIENT(#9000001)[.02]    

Fields, Total: 4

Field # Name Loc Type Details
.01 PRE-CERTIFICATION NUMBER 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  AUG 01, 2002
  • HELP-PROMPT:  Answer must be 3-15 characters in length.
  • TECHNICAL DESCR:  
    Created 8/1/2002 for V7.0 of AG.  Distributed in AUPN*99.1*8
  • CROSS-REFERENCE:  9000036^B
    1)= S ^AUPNPCRT("B",$E(X,1,30),DA)=""
    2)= K ^AUPNPCRT("B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • LAST EDITED:  AUG 01, 2002
  • TECHNICAL DESCR:  
    Created 8/1/2002 for V7.0 of AG Distributed in AUPN*99.1*8
.03 PRE-CERTIFICATION DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 02, 2002
  • TECHNICAL DESCR:  
    Created 8/1/2002 for V7.0 of AG Distributed in AUPN*99.1*8
  • CROSS-REFERENCE:  9000036^C^MUMPS
    1)= S ^AUPNPCRT("C",$P(^AUPNPCRT(DA,0),U,2),$P(^(0),U,3),DA)=""
    2)= K ^AUPNPCRT("C",$P(^AUPNPCRT(DA,0),U,2),X,DA)
.04 PRE-CERTIFICATION CONTACT 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  AUG 01, 2002
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • TECHNICAL DESCR:  
    Created 8/1/2002 for V7.0 of AG Distributed in AUPN*99.1*8
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All