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

Package: Women's Health

Global: ^BWGRI


Information

FileMan FileNo FileMan Filename Package
9002086.87 BW GENERAL RETRIEVAL ITEMS Women's Health

Description

Directly Accessed By Routines, Total: 8

Package Total Routines
Women's Health 8 BWGRVL0    BWGRVL1    BWGRVL4    BWGRVLP    BWGRVLP1    BWGRVLS    BWPATCH8    BWPATCH9

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Women's Health 2 BWPATCH8    BWPATCH9    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Women's Health 1 BW GENERAL RETRIEVAL TMP(#9002086.88)[.07, #9002086.89101(.01), #9002086.89102(.01)]

Fields, Total: 21

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 08, 1993
  • HELP-PROMPT:  Type a Number between 1 and 9999999, 0 Decimal Digits
.01 ITEM 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  APR 02, 1996
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • CROSS-REFERENCE:  9002086.87^B
    1)= S ^BWGRI("B",$E(X,1,30),DA)=""
    2)= K ^BWGRI("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002086.87^U^MUMPS
    1)= S ^BWGRI("U",$$UP^XLFSTR(X),DA)=""
    2)= K ^BWGRI("U",$$UP^XLFSTR(X),DA)
.02 TYPE 0;2 SET
  • 'Q' FOR QMAN;
  • 'R' FOR READER;
  • 'D' FOR DATE RANGE;
  • 'N' FOR NUMERIC;
  • 'F' FOR FREE TEXT;
  • 'Y' FOR YES/NO;
  • 'W' FOR WORD PROCESSING;
  • 'J' FOR JUST A HIT, NO INTERACTION;

  • LAST EDITED:  SEP 29, 1994
.021 INPUT TX FOR FREE TEXT 21;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  AUG 10, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
.022 HELP PROMPT FOR FREE TEXT 22;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  AUG 10, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
.025 INPUT TX FOR NUMERIC 25;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  AUG 10, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
.026 HELP PROMPT FOR NUMERIC 26;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  AUG 10, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
.03 QMAN TERM 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  SEP 20, 1993
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
.04 FILE,FIELD FOR DIR/DIQ 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 23, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
.05 PRINT/SELECT/SORT 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  MAY 09, 1994
  • HELP-PROMPT:  Answer must be 1-3 characters in length.
.06 COLUMN HEADER 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 21, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
.07 SUGGESTED COLUMN WIDTH 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>80)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 23, 1993
  • HELP-PROMPT:  Type a Number between 1 and 80, 0 Decimal Digits
.08 MULT LOGIC 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 21, 1993
.09 ORDER ON MENU 0;9 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."2N.N) X
  • LAST EDITED:  FEB 17, 1994
  • HELP-PROMPT:  Type a Number between 1 and 999, 1 Decimal Digit
  • CROSS-REFERENCE:  9002086.87^C
    1)= S ^BWGRI("C",$E(X,1,30),DA)=""
    2)= K ^BWGRI("C",$E(X,1,30),DA)
.11 PATIENT/VISIT 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<1) X
  • LAST EDITED:  DEC 29, 1993
  • HELP-PROMPT:  Answer must be 1-2 characters in length.
.12 PRINT MENU HEADER 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
  • LAST EDITED:  MAY 31, 1994
  • HELP-PROMPT:  Answer must be 3-20 characters in length.
.13 DATE RANGE NECESSARY 0;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAY 04, 1998
1 SCREEN LOGIC 1;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 21, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
2 TRANSLATION LOGIC 2;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 09, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
3 PRINT LOGIC 3;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 23, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
4 SORT LOGIC 4;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  OCT 04, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  All