Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCNAU3

Package: Integrated Billing

Routine: IBCNAU3


Information

IBCNAU3 ;ALB/KML/AWC - USER EDIT REPORT (PRINT) ;6-APRIL-2015

Source Information

Source file <IBCNAU3.m>

Entry Points

Name Comments DBIA/ICR reference
EN(ALLPLANS,PLANS,ALLPYRS,REPTYP) ;
; Print the report.
;
PRINT ; IB*737/DTG new tag for better control of quits
ENX ;/vd-IB*2.0*664 - End of new code.
HDR(ALLPLANS,PLANS) ; Print REPORT header - /vd-IB*2.0*664 Replaced the variable IOM with the new variable WIDTH
PLAN ; Print plan information.
HDR2(ALLPYRS) ; Print REPORT header - /vd-IB*2.0*664 Replaced the variable IOM with the new variable WIDTH
PAYER ; Print plan information.
PAUSE ; Pause for screen output.
EXCEL(PLANS,ALLPYRS,REPTYP) ; user selected format that can be viewed in MS Excel
EXEOR ;IB*737/CKB - called if no data was found
EXLCK ; IB*737/DTG new tag for excel to check for pause
ENOUT ; IB*737/DTG new TAG to cleanup temp files on exit.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"User Edits do not exist per the selected filters."
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,"User Edits do not exist per the selected filters.",!!
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !!,"User Edits do not exist per the selected filters.",!!
  • Line Location: PRINT+23
Function Call: WRITE
  • Prompt: "END OF REPORT"
  • Line Location: ENX+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"USER EDIT REPORT"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?WIDTH-34,IBHDT,?WIDTH-10,"Page: ",IBPAG
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"Insurance Company"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: ?42,"Group Name"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: ?37,"Group Name"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !!,?2,"User",?22,"Date/Time of Change",?46,"Modified Field",?72,"Previous Value of Data"
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: ?103,"Modified Value of Data"
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: !,$TR($J(" ",WIDTH)," ","_"),!
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: !,$P(IBPD,U)
  • Line Location: PLAN+6
Function Call: WRITE
  • Prompt: !,?2,USER,?22,DATE,?46,$P(IBPD,U,7),?72,$S($P(IBPD,U,5)="":"<no previous value>",1:$E($P(IBPD,U,5),1,29))
  • Line Location: PLAN+9
Function Call: WRITE
  • Prompt: ?103,$E($P(IBPD,U,6),1,29),!!
  • Line Location: PLAN+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR2+1
Function Call: WRITE
  • Prompt: !,"USER EDIT REPORT"
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: ?WIDTH-34,IBHDT,?WIDTH-10,"Page: ",IBPAG
  • Line Location: HDR2+4
Function Call: WRITE
  • Prompt: !,"Payer"
  • Line Location: HDR2+7
Function Call: WRITE
  • Prompt: !!,?2,"User",?22,"Date/Time of Change",?46,"Modified Field"
  • Line Location: HDR2+9
Function Call: WRITE
  • Prompt: ?72,"Previous Value of Data",?103,"Modified Value of Data"
  • Line Location: HDR2+10
Function Call: WRITE
  • Prompt: !,$TR($J(" ",WIDTH)," ","_"),!
  • Line Location: HDR2+11
Function Call: WRITE
  • Prompt: !,$P(IBPD,U)
  • Line Location: PAYER+6
Function Call: WRITE
  • Prompt: !,?2,USER,?22,DATE,?46,$P(IBPD,U,6),?72,$S($P(IBPD,U,4)="":"<no previous value>",1:$E($P(IBPD,U,4),1,29))
  • Line Location: PAYER+9
Function Call: WRITE
  • Prompt: ?103,$E($P(IBPD,U,5),1,29),!!
  • Line Location: PAYER+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: !,"USER EDIT REPORT^"_$$FMTE^XLFDT($$NOW^XLFDT,1)
  • Line Location: EXCEL+5
Function Call: WRITE
  • Prompt: !,"For Insurance Companies/Plans"
  • Line Location: EXCEL+8
Function Call: WRITE
  • Prompt: !,"For Payers"
  • Line Location: EXCEL+10
Function Call: WRITE
  • Prompt: !,"For Both Insurance Companies/Plans and Payers"
  • Line Location: EXCEL+11
Function Call: WRITE
  • Prompt: !,"Insurance Company^Group Name^User^Date/Time of Change^Modified Field^Previous Value of Data^Modified Value of Data",!
  • Line Location: EXCEL+15
Function Call: WRITE
  • Prompt: !,"Insurance Company^User^Date/Time of Change^Modified Field^Previous Value of Data^Modified Value of Data",!
  • Line Location: EXCEL+16
Function Call: WRITE
  • Prompt: !,"User Edits do not exist per the selected filters.",!
  • Line Location: EXCEL+19
Function Call: WRITE
  • Prompt: $P(IBPD,U)_U_USER_U_DATE_U_$P(IBPD,U,7)_U_$S($P(IBPD,U,5)="":"<no previous value>",1:$P(IBPD,U,5))_U_$P(IBPD,U,6)
  • Line Location: EXCEL+26
Function Call: WRITE
  • Prompt: $P(IBPD,U)_U_$P(IBPD,U,2)_U_USER_U_DATE_U_$P(IBPD,U,7)_U_$S($P(IBPD,U,5)="":"<no previous value>",1:$P(IBPD,U,5))_U_$P(IBPD,U,6)
  • Line Location: EXCEL+27
Function Call: WRITE
  • Prompt: $P(IBPD,U)_U_USER_U_DATE_U_$P(IBPD,U,7)_U
  • Line Location: EXCEL+29
Function Call: WRITE
  • Prompt: $S($P(IBPD,U,5)="":"<no previous value>",1:$P(IBPD,U,5))_U_$P(IBPD,U,6)
  • Line Location: EXCEL+30
Function Call: WRITE
  • Prompt: $P(IBPD,U)_U
  • Line Location: EXCEL+32
Function Call: WRITE
  • Prompt: IBPL_U
  • Line Location: EXCEL+34
Function Call: WRITE
  • Prompt: USER_U_DATE_U_$P(IBPD,U,7)_U_$S($P(IBPD,U,5)="":"<no previous value>",1:$P(IBPD,U,5))_U
  • Line Location: EXCEL+35
Function Call: WRITE
  • Prompt: $P(IBPD,U,6)
  • Line Location: EXCEL+36
Function Call: WRITE
  • Prompt: !
  • Line Location: EXCEL+37
Function Call: WRITE
  • Prompt: !,"Payer^User^Date/Time of Change^Modified Field^Previous Value of Data^Modified Value of Data",!
  • Line Location: EXCEL+45
Function Call: WRITE
  • Prompt: !,"User Edits do not exist per the selected filters.",!
  • Line Location: EXCEL+47
Function Call: WRITE
  • Prompt: $P(IBPD,U)_U_USER_U_DATE_U_$P(IBPD,U,6)_U_$S($P(IBPD,U,4)="":"<no previous value>",1:$P(IBPD,U,4))_U_$P(IBPD,U,5)
  • Line Location: EXCEL+51
Function Call: WRITE
  • Prompt: !
  • Line Location: EXCEL+52
Function Call: WRITE
  • Prompt: !,"[END OF REPORT]",!
  • Line Location: EXCEL+57
Function Call: WRITE
  • Prompt: "[END OF REPORT]",!
  • Line Location: EXEOR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EXLCK+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call