Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FBCHRJP

Package: Fee Basis

Routine: FBCHRJP


Information

FBCHRJP ;AISC/DMK/CMR - PRINT REJECTED PAYMENTS FROM PRICER ;18APR90

Source Information

Source file <FBCHRJP.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Fee Basis 3 ($$SSN,CLOSE,ZIS)^FBAAUTL  (END,VET)^FBCHDI  SET^FBPAY67  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Fee Basis 1 FBCH PRICER REJECTS  

Entry Points

Name Comments DBIA/ICR reference
START
END
PRINT
HED

External References

Name Field # of Occurrence
^DIR PRINT
$$SSN^FBAAUTL PRINT+6
CLOSE^FBAAUTL END+1
ZIS^FBAAUTL FBCHRJP+4
END^FBCHDI END+1
VET^FBCHDI START+3
SET^FBPAY67 START+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"No payments rejected!",!
  • Line Location: FBCHRJP+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !!,"Vendor: ",$P(FBVEN,";"),?41,"Vendor ID: ",+$P(FBVEN,";",2)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,"Patient: ",$P(FBNAME,";"),?41,"Patient ID: ",$$SSN^FBAAUTL($P(FBNAME,";",2))
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: "*"
  • Condition for execution: FBIN(8)["R"
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: "#"
  • Condition for execution: FBIN(9)]""
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?3,FBIN(1),?23,FBIN(2),?33,FBIN(3),?42,FBIN(4),?49,FBIN(5),?61,FBIN(6),?72,FBIN(7)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !?3,"DX: ",$P($P($G(^TMP($J,"FB",6,FBVEN,FBNAME,FBDT,FBI,"DX")),U,1),"/",1)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !?3,"Associated 7078: ",FB7078,!?3,$S(FBREJ(1)="P":"Rejects Pending!",FBREJ(1)="C":"Rejected!",1:""),?23,"Reject Reason: ",FBREJ(2),!?3,"Old Batch #: ",FBREJ(3)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !?18,"CIVIL HOSPITAL REJECTED PAYMENT HISTORY",!?18,QQ
  • Line Location: HED+0
Function Call: WRITE
  • Prompt: !!?3,"('*' Represents Reimbursement to Patient",?50,"'#' Represents Voided Payment)"
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !?2,"Inv Date",?23,"Amount",?33," Amount",?42,"Adj",?49,"Invoice",?61,"From",?73,"To"
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: !?23,"Claimed",?35,"Paid",?42,"Code",?53,"Num",?61,"Date",?71,"Date",!,Q
  • Line Location: HED+3
Routine Call
  • DIR
  • Line Location:
    • PRINT

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FB7078 - [#162.4] START+8
^FBAA(161.7 - [#161.7] START+1
^FBAAI - [#162.5] START+2, START+8
^FBAAI("AH" FBCHRJP+3, START+1, START+2
^TMP($J START!, START+5, START+6, START+7, END!, PRINT+2, PRINT+12

Label References

Name Line Occurrences
END FBCHRJP+4
HED START, PRINT+1
PRINT START+6

Naked Globals

Name Field # of Occurrence
^(0 START+1, START+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN END!
DIR PRINT!
DIR(0 PRINT*
FB END!
FB7078 START+8*, END!, PRINT+13
FBA START+1*, START+2, END!
FBAAOUT START*, START+5, START+6, END!, PRINT*
>> FBDT START+4*, START+5*, START+6, START+7, PRINT+2, PRINT+12
FBDX END!
FBI START+2*, START+4*, START+6*, START+7, START+8, END!, PRINT+2, PRINT+12
FBIN START+4!, END!
FBIN( START+7*
FBIN(1 PRINT+7
FBIN(2 PRINT+7
FBIN(3 PRINT+7
FBIN(4 PRINT+4*, PRINT+7
FBIN(5 PRINT+7
FBIN(6 PRINT+7
FBIN(7 PRINT+7
FBIN(8 PRINT+7
FBIN(9 PRINT+7
FBINV END!, PRINT+2*, PRINT+4, PRINT+9, PRINT+10
FBLISTC START*, END!
FBN START+1*, END!
>> FBNAME START+4*, START+5*, START+6, START+7, PRINT+2, PRINT+6, PRINT+12
>> FBPOP FBCHRJP+4
FBPROC END!
FBPROC1 END!
FBREJ END!
FBREJ( START+8*
FBREJ(1 PRINT+13
FBREJ(2 PRINT+13
FBREJ(3 PRINT+13
>> FBSORT START+3*
FBVEN START+4*, START+5*, START+6, START+7, END!, PRINT+2, PRINT+5, PRINT+12
FBVID END!
>> I START+7*, START+8*
IO START
IOF START, PRINT+1
IOSL PRINT, PRINT+1
IOST START, PRINT
J END!
K END!
L END!
PGM FBCHRJP+4*, END!
Q START*, END!, HED+3
QQ START*, END!, HED
U PRINT+4, PRINT+9, PRINT+10, PRINT+12
VA END!
VADM END!
VAL FBCHRJP+4*, END!
VAR FBCHRJP+4*, END!
Y END!, PRINT
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All