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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IBE(352.3

Package: Integrated Billing

Global: ^IBE(352.3


Information

FileMan FileNo FileMan Filename Package
352.3 NON-BILLABLE CLINIC STOP CODES Integrated Billing

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Integrated Billing 4 ^IBE(399.6    IBEFUNC    ^IBE(352.3    IBYJPT    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Integrated Billing 2 IB20PT51    IBYJPT    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Scheduling 1 CLINIC STOP(#40.7)[.01]    

Fields, Total: 6

Field # Name Loc Type Details
.01 CLINIC STOP CODE 0;1 POINTER TO CLINIC STOP FILE (#40.7)
************************REQUIRED FIELD************************
CLINIC STOP(#40.7)

  • LAST EDITED:  JAN 30, 1996
  • HELP-PROMPT:  Please enter a clinic stop code.
  • DESCRIPTION:  
    This field is a pointer to the CLINIC STOP (#40.7) file and identifies the clinic stop code which is being established as either billable or non-billable.
  • CROSS-REFERENCE:  352.3^B
    1)= S ^IBE(352.3,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(352.3,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  352.3^AIVDT^MUMPS
    1)= I $P($G(^IBE(352.3,DA,0)),"^",4)=1,$P(^(0),"^",2) S ^IBE(352.3,"AIVDT",X,-$P(^(0),"^",2),DA)=""
    2)= I $P($G(^IBE(352.3,DA,0)),"^",4)=1,$P(^(0),"^",2) K ^IBE(352.3,"AIVDT",X,-$P(^(0),"^",2),DA)
    This cross-reference on the CLINIC STOP CODE (#.01) field and the EFFECTIVE DATE (#.02) field is used to locate the appropriate record for a clinic stop code on a specific effective date. Entries created only for Means
    Test billing.
  • CROSS-REFERENCE:  352.3^AIVDTT^MUMPS
    1)= I $P($G(^IBE(352.3,DA,0)),"^",4)>1,$P(^(0),"^",2) S ^IBE(352.3,"AIVDTT"_$P(^(0),"^",4),X,-$P(^(0),"^",2),DA)=""
    2)= I $P($G(^IBE(352.3,DA,0)),"^",4)>1,$P(^(0),"^",2) K ^IBE(352.3,"AIVDTT"_$P(^(0),"^",4),X,-$P(^(0),"^",2),DA)
    Cross-reference on CLINIC STOP CODE (.01) and EFFECTIVE DATE (.02) for quick reference to a clinics Third Party status on any given date.
.02 EFFECTIVE DATE 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 30, 1996
  • HELP-PROMPT:  Please enter an effective date.
  • DESCRIPTION:  
    This is the date on which billing for this clinic stop code should be activated or ignored.
  • CROSS-REFERENCE:  352.3^AIVDT1^MUMPS
    1)= I $P($G(^IBE(352.3,DA,0)),"^",4)=1,+^(0) S ^IBE(352.3,"AIVDT",+^(0),-X,DA)=""
    2)= I $P($G(^IBE(352.3,DA,0)),"^",4)=1,+^(0) K ^IBE(352.3,"AIVDT",+^(0),-X,DA)
    This cross-reference on the CLINIC STOP CODE (#.01) field and the EFFECTIVE DATE (#.02) field is used to locate the appropriate record for a clinic stop code on a specific effective date. Entries created only for Means
    Test billing.
  • CROSS-REFERENCE:  352.3^AIVDTT1^MUMPS
    1)= I $P($G(^IBE(352.3,DA,0)),"^",4)>1,+^(0) S ^IBE(352.3,"AIVDTT"_$P(^(0),"^",4),+^(0),-X,DA)=""
    2)= I $P($G(^IBE(352.3,DA,0)),"^",4)>1,+^(0) K ^IBE(352.3,"AIVDTT"_$P(^(0),"^",4),+^(0),-X,DA)
    Cross-reference on CLINIC STOP CODE (.01) and EFFECTIVE DATE (.02) for quick reference to a stops Third Party status on any given date.
.03 IGNORE MEANS TEST BILLING? 0;3 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  AUG 05, 1993
  • HELP-PROMPT:  Please enter 'YES' or 'NO.'
  • DESCRIPTION:  This field is used to determine whether Means Test billing should be activated or ignored, as of the EFFECTIVE DATE (field #.02).
    Please note that you only need an entry in this file for a clinic stop code for which you would like Means Test billing to be IGNORED.
.04 TYPE 0;4 SET
************************REQUIRED FIELD************************
  • '1' FOR MEANS TEST;
  • '2' FOR THIRD PARTY;

  • LAST EDITED:  FEB 28, 1996
  • HELP-PROMPT:  Enter the type of billing this entry applies to.
  • DESCRIPTION:  
    This specifies the type of billing this bill/not bill Stop Code flag applies to.
  • CROSS-REFERENCE:  352.3^AIVDT2^MUMPS
    1)= I X=1,+$G(^IBE(352.3,DA,0)),$P(^(0),"^",2) S ^IBE(352.3,"AIVDT",+^(0),-$P(^(0),"^",2),DA)=""
    2)= I X=1,+$G(^IBE(352.3,DA,0)),$P(^(0),"^",2) K ^IBE(352.3,"AIVDT",+^(0),-$P(^(0),"^",2),DA)
    Cross-reference on CLINIC STOP CODE (.01) and EFFECTIVE DATE (.02) for quick reference to a stops Means Test status on any given date.
  • CROSS-REFERENCE:  352.3^AIVDTT2^MUMPS
    1)= I X>1,+$G(^IBE(352.3,DA,0)),$P(^(0),"^",2) S ^IBE(352.3,"AIVDTT"_X,+^(0),-$P(^(0),"^",2),DA)=""
    2)= I X>1,+$G(^IBE(352.3,DA,0)),$P(^(0),"^",2) K ^IBE(352.3,"AIVDTT"_X,+^(0),-$P(^(0),"^",2),DA)
    Cross-reference on CLINIC STOP CODE (.01) and EFFECTIVE DATE (.02) for quick reference to a stops Third Party status on any given date.
.05 THIRD PARTY NON-BILLABLE 0;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 30, 1996
  • HELP-PROMPT:  Enter 'Yes' if this stop code is not billable to a third party.
  • DESCRIPTION:  
    This field is used to determine if the stop code should be billed to a Third Party payer.
  • CROSS-REFERENCE:  ^^TRIGGER^352.3^.06
    1)= X ^DD(352.3,.05,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^IBE(352.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X="" X ^DD(352.3,.05,1,1,1.4)
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(2)=$C(59)_$S($D(^DD(352.3,.06,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^IBE(352.3,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,6)_":",2),$C(59),1)="NO"
    1.4)= S DIH=$S($D(^IBE(352.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=352.3,DIG=.06 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= X ^DD(352.3,.05,1,1,2.3) I X S X=DIV S Y(1)=$S($D(^IBE(352.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X="" X ^DD(352.3,.05,1,1,2.4)
    2.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(2)=$C(59)_$S($D(^DD(352.3,.06,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^IBE(352.3,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,6)_":",2),$C(59),1)="NO"
    2.4)= S DIH=$S($D(^IBE(352.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=352.3,DIG=.06 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    CREATE CONDITION)= THIRD PARTY AUTO BILL="NO"
    CREATE VALUE)= @
    DELETE CONDITION)= THIRD PARTY AUTO BILL="NO"
    DELETE VALUE)= @
    FIELD)= THIRD PARTY AUTO BILL
    Deletes the flag that stops auto billing for this stop code whenever the non-billable status of the stop code changes.
.06 THIRD PARTY AUTO BILL 0;6 SET
  • '1' FOR NO;
  • '0' FOR YES;

  • LAST EDITED:  JAN 30, 1996
  • HELP-PROMPT:  Should visits with this stop code be automatically billed?
  • DESCRIPTION:  
    Enter 'No' if the Third Party auto biller should NOT create bills for visits with this stop code. This should only be set for stops that are billable.
  • NOTES:  TRIGGERED by the THIRD PARTY NON-BILLABLE field of the NON-BILLABLE CLINIC STOP CODES File

Found Entries, Total: 31

CLINIC STOP CODE: 40.7^294^TELEPHONE TRIAGE    CLINIC STOP CODE: 40.7^296^TELEPHONE/MEDICINE    CLINIC STOP CODE: 40.7^297^TELEPHONE/SURGERY    CLINIC STOP CODE: 40.7^298^TELEPHONE/SPECIAL PSYCHIATRY    CLINIC STOP CODE: 40.7^299^TELEPHONE MH    CLINIC STOP CODE: 40.7^300^TELEPHONE/PTSD    CLINIC STOP CODE: 40.7^301^TELEPHONE/ALCOHOL DEPENDENCE    CLINIC STOP CODE: 40.7^302^TELEPHONE/DRUG DEPENDENCE    
CLINIC STOP CODE: 40.7^303^TELEPHONE SUD    CLINIC STOP CODE: 40.7^304^TELEPHONE/ANCILLARY    CLINIC STOP CODE: 40.7^305^TELEPHONE/REHAB AND SUPPORT    CLINIC STOP CODE: 40.7^306^TELEPHONE/DIAGNOSTIC    CLINIC STOP CODE: 40.7^307^TELEPHONE/PROSTHETICS/ORTHOTIC    CLINIC STOP CODE: 40.7^308^TELEPHONE/DENTAL    CLINIC STOP CODE: 40.7^309^TELEPHONE/DIALYSIS    CLINIC STOP CODE: 40.7^294^TELEPHONE TRIAGE    
CLINIC STOP CODE: 40.7^296^TELEPHONE/MEDICINE    CLINIC STOP CODE: 40.7^297^TELEPHONE/SURGERY    CLINIC STOP CODE: 40.7^298^TELEPHONE/SPECIAL PSYCHIATRY    CLINIC STOP CODE: 40.7^299^TELEPHONE MH    CLINIC STOP CODE: 40.7^300^TELEPHONE/PTSD    CLINIC STOP CODE: 40.7^301^TELEPHONE/ALCOHOL DEPENDENCE    CLINIC STOP CODE: 40.7^302^TELEPHONE/DRUG DEPENDENCE    CLINIC STOP CODE: 40.7^303^TELEPHONE SUD    
CLINIC STOP CODE: 40.7^304^TELEPHONE/ANCILLARY    CLINIC STOP CODE: 40.7^305^TELEPHONE/REHAB AND SUPPORT    CLINIC STOP CODE: 40.7^306^TELEPHONE/DIAGNOSTIC    CLINIC STOP CODE: 40.7^307^TELEPHONE/PROSTHETICS/ORTHOTIC    CLINIC STOP CODE: 40.7^308^TELEPHONE/DENTAL    CLINIC STOP CODE: 40.7^309^TELEPHONE/DIALYSIS    CLINIC STOP CODE: 40.7^437^TRANSITIONAL PHARMACY BENEFIT    

External References

Name Field # of Occurrence
^%DT .02+1
^DICR .05(XREF 1n1.4), .05(XREF 1n2.4)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( .05(XREF 1n1.4), .05(XREF 1n2.4)
^DD(352.3 .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1K), .05(XREF 1n2.3)
^IBE(352.3 - [#352.3] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)
.04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K), .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1n1.4), .05(XREF 1K), .05(XREF 1n2.3), .05(XREF 1n2.4)

Naked Globals

Name Field # of Occurrence
^(0 .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .04(XREF 1S), .04(XREF 1K)
.04(XREF 2S), .04(XREF 2K), .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1n1.4), .05(XREF 1K), .05(XREF 1n2.3), .05(XREF 1n2.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .02+1*
>> D0 .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1K), .05(XREF 1n2.3)
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)
.04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K), .05(XREF 1n1.3), .05(XREF 1n2.3)
>> DIG .05(XREF 1n1.4), .05(XREF 1n2.4)
>> DIH .05(XREF 1n1.4), .05(XREF 1n2.4)
>> DIU .05(XREF 1S), .05(XREF 1K)
DIV .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1n1.4), .05(XREF 1K), .05(XREF 1n2.3), .05(XREF 1n2.4)
DIV(0 .05(XREF 1n1.3), .05(XREF 1n1.4), .05(XREF 1n2.3), .05(XREF 1n2.4)
U .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1n1.4), .05(XREF 1K), .05(XREF 1n2.3), .05(XREF 1n2.4)
X .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02+1*!, .02(XREF 1S), .02(XREF 1K), .02(XREF 2S)
.02(XREF 2K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K), .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1n1.4), .05(XREF 1K), .05(XREF 1n2.3)
.05(XREF 1n2.4)
Y .02+1, .05(XREF 1S), .05(XREF 1K)
Y(0 .05(XREF 1n1.3), .05(XREF 1n2.3)
Y(1 .05(XREF 1S), .05(XREF 1n1.3), .05(XREF 1K), .05(XREF 1n2.3)
Y(2 .05(XREF 1n1.3), .05(XREF 1n2.3)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All