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

Package: IHS GPRA Information System

Global: ^BGPCMSMN


Information

FileMan FileNo FileMan Filename Package
90538.07 BGP 09 CMS PATIENT LISTS IHS GPRA Information System

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
IHS GPRA Information System 6 BGP9C1    BGP9CP    BGP9CSII    BGP9CTXC    BGP9GT    BGP9POS2    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
IHS GPRA Information System 1 BGP9POS2    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
IHS GPRA Information System 2 BGP 09 CMS MEASURES(#90538.01)[.01]    BGP 09 TAXONOMIES(#90536.08)[#90538.0711(.01)]    

Fields, Total: 21

Field # Name Loc Type Details
.01 MEASURE 0;1 POINTER TO BGP 09 CMS MEASURES FILE (#90538.01)
************************REQUIRED FIELD************************
BGP 09 CMS MEASURES(#90538.01)

  • LAST EDITED:  MAY 23, 2007
  • CROSS-REFERENCE:  90538.07^B
    1)= S ^BGPCMSMN("B",$E(X,1,30),DA)=""
    2)= K ^BGPCMSMN("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  90538.07^AC^MUMPS
    1)= I $P(^BGPCMSMN(DA,0),U,2)]"" S ^BGPCMSMN("AO",$P(^BGPCMSMN(DA,0),U),$P(^BGPCMSMN(DA,0),U,2),DA)=""
    2)= I $P(^BGPCMSMN(DA,0),U,2)]"" K ^BGCMSME("AO",$P(^BGPCMSMN(DA,0),U),$P(^BGPCMSMN(DA,0),U,2),DA)
.02 ORDER 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • CROSS-REFERENCE:  90538.07^AOTOO^MUMPS
    1)= S ^BGPCMSMN("AO",$P(^BGPCMSMN(DA,0),U),$P(^BGPCMSMN(DA,0),U,2),DA)=""
    2)= K ^BGPCMSMN("AO",$P(^BGPCMSMN(DA,0),U),$P(^BGPCMSMN(DA,0),U,2),DA)
.03 SELECTION TITLE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
.04 HDR TITLE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
.05 DISPLAY # EXCLUSIONS? 0;5 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
.06 MAIN PATIENT LIST? 0;6 SET
  • '1' FOR YES;

  • LAST EDITED:  APR 25, 2008
1 PRINT ROUTINE 1;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
2 COMPUTE ROUTINE 2;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
1100 TAXONOMIES USED 11;0 POINTER Multiple #90538.0711 90538.0711
2100 REPORT INTRO TEXT 21;0 WORD-PROCESSING #90538.0721
7101 HDR 2 71;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
7102 MEASURE TITLE 71;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
7103 HDR 3 71;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 31, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
7201 ASTERISK ADM TYPE? 72;1 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7202 ASTERISK DSCH TYPE? 72;2 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7203 ASTERISK ASPIRIN ALLERGY? 72;3 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7204 ASTERISK WARFARIN RX? 72;4 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7205 ASTERISK ON ACE/ARB ALLERGY? 72;5 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7206 ASTERISK BETA ALLERGY? 72;6 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2007
7207 ASTERISK DATES? 72;7 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 27, 2007
7300 FIRST PAGE LIST HEADER 73;0 WORD-PROCESSING #90538.0773

Found Entries, Total: 44

MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    
MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^1^1    MEASURE: 90538.01^2^2    
MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    MEASURE: 90538.01^2^2    
MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    
MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^3^3    MEASURE: 90538.01^4^4    
MEASURE: 90538.01^4^4    MEASURE: 90538.01^4^4    MEASURE: 90538.01^4^4    MEASURE: 90538.01^4^4    
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All