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 |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Global: ^BCHEXDEL

Package: IHS RPMS CHR System

Global: ^BCHEXDEL


Information

FileMan FileNo FileMan Filename Package
90002.95 CHR EXTRACT DELETE RECORDS IHS RPMS CHR System

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
IHS RPMS CHR System 2 BCHEXD2    BCHEXRE1    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
IHS RPMS CHR System 2 BCHEXD    BCHUDEL    

Fields, Total: 7

Field # Name Loc Type Details
.01 PROVIDER 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<5) X
  • LAST EDITED:  OCT 26, 1994
  • HELP-PROMPT:  Answer must be 5-6 characters in length.
  • CROSS-REFERENCE:  90002.95^B
    1)= S ^BCHEXDEL("B",$E(X,1,30),DA)=""
    2)= K ^BCHEXDEL("B",$E(X,1,30),DA)
.02 PROGRAM CODE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<7)!'(X?7N) X
  • LAST EDITED:  OCT 26, 1994
  • HELP-PROMPT:  Answer must be 7 characters in length.
.03 DATE OF SERVICE 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 26, 1994
.04 FORM # 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 29, 1994
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
.05 DATE DELETED 0;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 29, 1994
  • CROSS-REFERENCE:  90002.95^AEX
    1)= S ^BCHEXDEL("AEX",$E(X,1,30),DA)=""
    2)= K ^BCHEXDEL("AEX",$E(X,1,30),DA)
.06 DATE EXPORTED 0;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 29, 1994
  • CROSS-REFERENCE:  90002.95^AD
    1)= S ^BCHEXDEL("AD",$E(X,1,30),DA)=""
    2)= K ^BCHEXDEL("AD",$E(X,1,30),DA)
.07 ASSESSMENTS 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>99!($L(X)<1) X
  • LAST EDITED:  OCT 03, 1995
  • HELP-PROMPT:  Answer must be 1-99 characters in length.

External References

Name Field # of Occurrence
^%DT .03+1, .05+1, .06+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BCHEXDEL("AD" .06(XREF 1S), .06(XREF 1K)
^BCHEXDEL("AEX" .05(XREF 1S), .05(XREF 1K)
^BCHEXDEL("B" .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .03+1*, .05+1*, .06+1*
>> DA .01(XREF 1S), .01(XREF 1K), .05(XREF 1S), .05(XREF 1K), .06(XREF 1S), .06(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .03+1*!, .04+1!, .05+1*!, .05(XREF 1S), .05(XREF 1K), .06+1*!
.06(XREF 1S), .06(XREF 1K), .07+1!
>> Y .03+1, .05+1, .06+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables |  All