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 |  Fields |  ICR |  Found Entries  | All
Print Page as PDF
Global: ^IBE(355.12

Package: Integrated Billing

Global: ^IBE(355.12


Information

FileMan FileNo FileMan Filename Package
355.12 SOURCE OF INFORMATION Integrated Billing

Description

Accessed By FileMan Db Calls, Total: 21

Package Total Routines
Integrated Billing 21 IB20P496    IBCNBAR    IBCNBLL    IBCNEDE2    IBCNEDE4    IBCNEHL7    IBCNEHLQ    IBCNEQU
IBCNEQU1    IBCNERPG    IBCNERTQ    IBCNIUH1    IBCOPR    IBCOPR1    IBY345PR    IBY435PO
IBY593PR    IBY595PO    IBY631PO    IBY664PO    IBY668PR    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Integrated Billing 3 INSURANCE VERIFICATION PROCESSOR(#355.33)[.03]    CREATION TO PROCESSING TRACKING(#355.36)[.03]    IIV TRANSMISSION QUEUE(#365.1)[3.02]    
Registration 1 PATIENT(#2)[#2.312(1.09)]    

Fields, Total: 3

Field # Name Loc Type Details
.01 CODE 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • OUTPUT TRANSFORM:  S Y=$$GET1^DIQ(355.12,Y_",",.02,"E")
  • LAST EDITED:  NOV 08, 2006
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    Source of Information code represents the origination of the patients insurance information.
  • CROSS-REFERENCE:  355.12^B
    1)= S ^IBE(355.12,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(355.12,"B",$E(X,1,30),DA)
.02 DESCRIPTION 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  NOV 08, 2006
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This is the description of the Source of Information code.
  • CROSS-REFERENCE:  355.12^C
    1)= S ^IBE(355.12,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(355.12,"C",$E(X,1,30),DA)
.03 IB BUFFER ACRONYM 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  NOV 08, 2006
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
  • DESCRIPTION:  
    This acronym is used for display purposes in the Insurance Buffer screen.

Found Entries, Total: 22

CODE: 1    CODE: 2    CODE: 3    CODE: 4    CODE: 5    CODE: 6    CODE: 7    CODE: 8    
CODE: 9    CODE: 10    CODE: 11    CODE: 12    CODE: 13    CODE: 14    CODE: 15    CODE: 16    
CODE: 17    CODE: 18    CODE: 19    CODE: 20    CODE: 21    CODE: 22    

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5305
  • Insurance Capture Buffer
    		•
    Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  ICR |  Found Entries  | All