Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^BAR(90052.05,6613,0)

Package: IHS Accounts Receivable

Global: ^BAR(90052.05,6613,0)


Information

FileMan FileNo FileMan Filename Package
90052.05 A/R PARENT/SATELLITE/IHS IHS Accounts Receivable

Description

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
IHS Accounts Receivable 1 BARRPVC    

Pointed To By FileMan Files, Total: 6

Package Total FileMan Files
IHS Accounts Receivable 6 A/R PARENT/SATELLITE/IHS(#90052.05)[3]    A/R ACCOUNTS/IHS(#90050.02)[.01, 8]    A/R BILL/IHS(#90050.01)[8, 108]    A/R COLLECTION BATCH/IHS(#90051.01)[#90051.1101(8), #90051.1101601(.01)]    A/R FLAT RATE POSTING(#90054.01)[.08, #90054.0102(.01)]    A/R TRANSACTIONS/IHS(#90050.03)[8, 11]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
IHS Accounts Receivable 1 A/R PARENT/SATELLITE/IHS(#90052.05)[3]    
Utility Tables 1 LOCATION(#9999999.06)[.01]    

Fields, Total: 8

Field # Name Loc Type Details
.01 LOCATION 0;1 POINTER TO LOCATION FILE (#9999999.06)
************************REQUIRED FIELD************************
LOCATION(#9999999.06)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X
  • LAST EDITED:  SEP 25, 1995
  • EXECUTABLE HELP:  D PSHLP^BARUTL
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  90052.05^B
    1)= S ^BAR(90052.05,DUZ(2),"B",$E(X,1,30),DA)=""
    2)= K ^BAR(90052.05,DUZ(2),"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^90052.05^4
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^BAR(90052.05,DUZ(2),D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y X ^DD(90052.05,.01,1,2,1.1) X ^DD(90052.05,.01,1,2,1.4)
    1.1)= S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^AUTTLOC(+D0,0)) D0=-1 S Y(101)=$S($D(^AUTTLOC(D0,0)):^(0),1:"") S X=$S('$D(^DIC(4,+$P(Y(101),U,1),0)):"",1:$P(^(0),U,1)) S D0=I(0,0)
    1.4)= S DIH=$S($D(^BAR(90052.05,DUZ(2),DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,4)=DIV,DIH=90052.05,DIG=4 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= #.01
    DELETE VALUE)= NO EFFECT
    FIELD)= #4
    Lookup via FM is not selecting entries properly. Yhis free text trigger will load a field upon which an index will be built.
.05 PARENT - SATELLITE USABLE 0;5 SET
  • '0' FOR USABLE;
  • '1' FOR NOT USABLE;

  • LAST EDITED:  SEP 11, 1996
.06 SATELLITE START DATE 0;6 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 28, 1996
  • HELP-PROMPT:  Enter the date that this Satellite was added to the Parent Location
  • DESCRIPTION:  
    The start date that this site is usable within the Parent site
.07 SATELLITE END DATE 0;7 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 28, 1996
  • HELP-PROMPT:  Enter the date is satellite is no longer under the parent
.5 LOCATION ASUFAC COMPUTED

  • MUMPS CODE:  X ^DD(90052.05,.5,9.2) S Y(90052.05,.5,101)=$S($D(^AUTTLOC(D0,0)):^(0),1:"") S X=$P(Y(90052.05,.5,101),U,10) S D0=Y(90052.05,.5,80)
    9.2 = S Y(90052.05,.5,80)=$S($D(D0):D0,1:""),Y(90052.05,.5,1)=$S($D(^BAR(90052.05,DUZ(2),D0,0)):^(0),1:""),D0=$P(Y(90052.05,.5,1),U,1) S:'$D(^AUTTLOC(+D0,0)) D0=-1
  • ALGORITHM:  .01:ASUFAC INDEX
2 SUFFIX 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  OCT 11, 1994
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
  • CROSS-REFERENCE:  90052.05^C
    1)= S ^BAR(90052.05,DUZ(2),"C",$E(X,1,30),DA)=""
    2)= K ^BAR(90052.05,DUZ(2),"C",$E(X,1,30),DA)
3 PARENT 0;3 POINTER ** TO AN UNDEFINED FILE **

  • LAST EDITED:  OCT 04, 1994
4 LOCATION (FT) 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  NOV 28, 1994
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • NOTES:  TRIGGERED by the LOCATION field of the A/R PARENT/SATELLITE/IHS File
  • CROSS-REFERENCE:  90052.05^D
    1)= S ^BAR(90052.05,DUZ(2),"D",$E(X,1,30),DA)=""
    2)= K ^BAR(90052.05,DUZ(2),"D",$E(X,1,30),DA)
    FM lookup not working properly from the .01 field so this field with a FT crossreference is built.

External References

Name Field # of Occurrence
^%DT .06+1, .07+1
PSHLP^BARUTL .01(HELP )
^DICR .01(XREF 2n1.4)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTLOC - [#9999999.06] .01(XREF 2n1.1), .5+1, .5OF9.2+1
^BAR(90052.05 .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.4), .5OF9.2+1, 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K)
^DD( .01(XREF 2n1.4)
^DD(90052.05 .01(XREF 2S), .5+1
^DIC(4 - [#4] .01(XREF 2n1.1)

Naked Globals

Name Field # of Occurrence
^(0 .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .5+1, .5OF9.2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .06+1*, .07+1*
>> D0 .01(XREF 2S), .01(XREF 2n1.1), .5+1*, .5OF9.2+1*
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K)
>> DIG .01(XREF 2n1.4)
>> DIH .01(XREF 2n1.4)
>> DINUM .01+1*
>> DIU .01(XREF 2S)
DIV .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4)
DIV(0 .01(XREF 2S), .01(XREF 2n1.4)
DUZ(2 .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.4), .5OF9.2+1, 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K)
>> I(0 .01(XREF 2n1.1)
U .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .5+1, .5OF9.2+1
X .01+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .06+1*!, .07+1*!, .5+1*, 2+1!
, 2(XREF 1S), 2(XREF 1K), 4+1!, 4(XREF 1S), 4(XREF 1K)
Y .01(XREF 2S), .06+1, .07+1
Y( .5+1*, .5OF9.2+1*
Y(1 .01(XREF 2S)
Y(101 .01(XREF 2n1.1)
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All