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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSOCPF1

Package: Outpatient Pharmacy

Routine: PSOCPF1


Information

PSOCPF1 ;BIR/BAA - Pharmacy CO-PAY Application Utilities for IB ;02/06/92

Source Information

Source file <PSOCPF1.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Outpatient Pharmacy 8 ACTLOG^PSOCPA  PRTSUMM^PSOCPB  (EXEMCHK,SETSUMM)^PSOCPC  ASKCAN^PSOCPD  BLD^PSOCPF  ICN^PSODPT  ^PSOLSET  ($$LF,PFSA)^PSOPFSU1  
Kernel 3 ^%ZIS  ^%ZISC  $$FMTE^XLFDT  
VA FileMan 3 ^DIC  $$GET1^DIQ  ^DIR  
List Manager 2 (CLEAR,FULL,PAUSE)^VALM1  EN^VALM2  
Integrated Billing 1 $$RXST^IBARXEU  
Registration 1 (DEM,ELIG)^VADPT  

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: 5

Package Total Caller Graph
Outpatient Pharmacy 5 PSO PATIENT MED CANCEL  PSO PATIENT MED EXPORT  PSO PATIENT MED RESET  PSOCPF  PSOCPF2  

Entry Points

Name Comments DBIA/ICR reference
SORT ; get the data
SORTRF ;Set fill number and call getdata
GETDATA(RIEN) ;SET UP DATA FOR LIST MANAGER
CANCEL ; CANCEL COPAY STATUS
RESET ; RESET/CANCEL COPAY STATUS
STATUS(PSODA,RFL) ; PROCESS STATUS CHANGE
ASKCAN
RESETE
EXPORT ; -- print excel spreadsheet.
EXCEL(FILTERS) ; print the data in excel format
DEVICE(TYPE) ; Ask user to select device
ENQ
EXHDR ; -- excel header

External References

Name Field # of Occurrence
^%ZIS DEVICE+7
^%ZISC EXPORT+4, DEVICE+14
^DIC STATUS+19, STATUS+27
$$GET1^DIQ GETDATA+4, GETDATA+5, GETDATA+9, GETDATA+11, GETDATA+12, GETDATA+16, GETDATA+17, GETDATA+18, GETDATA+20, GETDATA+21
, GETDATA+22, GETDATA+24, GETDATA+25, GETDATA+26, GETDATA+27
^DIR STATUS+17, STATUS+25
$$RXST^IBARXEU GETDATA+10
ACTLOG^PSOCPA STATUS+20, STATUS+28
PRTSUMM^PSOCPB ASKCAN+2
EXEMCHK^PSOCPC STATUS+13
SETSUMM^PSOCPC STATUS+21, STATUS+29
ASKCAN^PSOCPD ASKCAN
BLD^PSOCPF CANCEL+19, RESET+12, EXPORT+1, EXPORT+7
ICN^PSODPT CANCEL+14, STATUS+8
^PSOLSET CANCEL+10, STATUS+3
$$LF^PSOPFSU1 STATUS+12
PFSA^PSOPFSU1 STATUS+12
DEM^VADPT GETDATA+7
ELIG^VADPT GETDATA+8
CLEAR^VALM1 EXPORT+2, DEVICE+2
FULL^VALM1 CANCEL+2, RESET+2, EXPORT+2, DEVICE+3
PAUSE^VALM1 EXPORT+8
EN^VALM2 CANCEL+5, RESET+5
$$FMTE^XLFDT EXCEL+5, EXCEL+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?17,"PATIENT: ",NAME
  • Line Location: CANCEL+11
Function Call: WRITE
  • Prompt: !,?17,"Medication: ",MED
  • Line Location: CANCEL+12
Function Call: WRITE
  • Prompt: !,?17,"RX: ",RX_"-"_RFL
  • Line Location: CANCEL+13
Function Call: WRITE
  • Prompt: !!,?17,"PATIENT: ",NAME
  • Line Location: STATUS+4
Function Call: WRITE
  • Prompt: !,?17,"Medication: ",MED
  • Line Location: STATUS+5
Function Call: WRITE
  • Prompt: !,?17,"RX: ",RX_"-"_RFL
  • Line Location: STATUS+6
Function Call: WRITE
  • Prompt: !!,"Rx # ",PSORXN," is a ",$S(+PCOPAY:"Copay",1:"No Copay")," prescription"
  • Line Location: STATUS+11
Function Call: WRITE
  • Prompt: !,REC
  • Line Location: EXCEL+15
Function Call: WRITE
  • Prompt: !,"END OF REPORT"
  • Line Location: EXCEL+16
Function Call: WRITE
  • Prompt: !,"NO QUEUING ALLOWED FOR THIS REPORT"
  • Line Location: DEVICE+5
Function Call: WRITE
  • Prompt: !,"This report must have a line length of at least 256.",!
  • Line Location: DEVICE+6
Function Call: WRITE
  • Prompt: !,"Reset/Cancel Report"
  • Line Location: EXHDR+3
Function Call: WRITE
  • Prompt: !,"From ",BDATE," TO ",EDATE
  • Line Location: EXHDR+4
Function Call: WRITE
  • Prompt: !,HDR
  • Line Location: EXHDR+6
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+7
Routine Call
  • DIC
  • Line Location:
    • STATUS+19
    • STATUS+27
Routine Call
  • DIR
  • Line Location:
    • STATUS+17
    • STATUS+25

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^IB - [#350] GET1^DIQ
^IBE(350.21 - [#350.21] GET1^DIQ
^IBE(350.3 - [#350.3] Classic Fileman Calls
^PRCA(430 - [#430] GET1^DIQ
^PRCA(433 - [#433] GET1^DIQ
^PSRX - [#52] GET1^DIQ
52.1 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] SORTRF+1
^PS(55 - [#55] SORT+8, SORT+9
^PSRX - [#52] SORT+10, SORT+12, SORT+14, SORT+15, SORT+16, CANCEL+14, CANCEL+15, CANCEL+16, STATUS+8, STATUS+9
, STATUS+10, STATUS+14, STATUS+16, STATUS+22*, STATUS+24, STATUS+30*
^PSRX("AD" SORTRF+1
^TMP($J SORT+2!, GETDATA+28*, CANCEL+6, CANCEL+8, RESET+6, RESET+8, EXPORT+1, EXCEL+9, EXCEL+11, EXCEL+13
, EXCEL+14

Label References

Name Line Occurrences
ASKCAN CANCEL+17, STATUS+16, STATUS+24
DEVICE EXPORT+5
ENQ DEVICE+7
EXCEL DEVICE+12
EXHDR EXCEL+7
GETDATA SORTRF+1
SORT CANCEL+18, RESET+11
SORTRF SORT+14, SORT+16
STATUS RESET+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+4~, DEVICE+7*
ARST GETDATA+2~, GETDATA+13*, GETDATA+15*, GETDATA+21*, GETDATA+24*, GETDATA+26*, GETDATA+27*, GETDATA+28
ARST1 GETDATA+2~, GETDATA+13*, GETDATA+15*, GETDATA+21*, GETDATA+24*, GETDATA+26*, GETDATA+27*, GETDATA+28
ARTRN GETDATA+2~, GETDATA+13*, GETDATA+15*, GETDATA+17*, GETDATA+18, GETDATA+20*, GETDATA+22, GETDATA+28
BCNT EXCEL+3~
BDATE SORT+4~, SORT+5*, SORT+14, SORT+16, EXCEL+4~, EXCEL+5*, EXHDR+4
BLNO GETDATA+2~, GETDATA+13*, GETDATA+15*, GETDATA+16*, GETDATA+25*, GETDATA+28
CNT CANCEL+4*, CANCEL+8*, RESET+4*, RESET+8*, EXCEL+3~
CPY GETDATA+2~, GETDATA+10*, GETDATA+28
CRT DEVICE+4~, DEVICE+9*, DEVICE+10*
DEBTOR GETDATA+1~, GETDATA+13*, GETDATA+15*, GETDATA+25*, GETDATA+26*, GETDATA+28
DFN SORT+4~, SORT+6*, SORT+8, SORT+9, SORTRF+1, GETDATA+9, GETDATA+10, GETDATA+28
DIC STATUS+19*!, STATUS+27*!
DIC("A" STATUS+19*, STATUS+27*
DIC("S" STATUS+19*, STATUS+27*
DIC(0 STATUS+19*, STATUS+27*
DIR STATUS+17!, STATUS+25!
DIR("A" STATUS+17*, STATUS+25*
DIR("B" STATUS+17*, STATUS+25*
DIR(0 STATUS+17*, STATUS+25*
DRG GETDATA+2~, GETDATA+5*, GETDATA+6
DT GETDATA+10
ECNT CANCEL+3~, RESET+3~
EDATE SORT+4~, SORT+5*, SORT+14, SORT+16, EXCEL+4~, EXCEL+6*, EXHDR+4
END SORT+4~
FILDT SORT+4~, SORT+14*, SORT+16*, SORTRF+1, GETDATA+28
FILTERS EXCEL~, EXCEL+5, EXCEL+6
FILTERS(0 SORT+5, SORT+6, DEVICE+12
FILTERS(1 SORT+11
FLAG STATUS+1~
GOTPAT CANCEL+3~, RESET+3~
HDR EXHDR+1~, EXHDR+5*, EXHDR+6
I CANCEL+3~, RESET+3~
IBFR CANCEL+3~, RESET+3~
IBN GETDATA+2~, GETDATA+11*, GETDATA+12*, GETDATA+13, GETDATA+16, GETDATA+17, GETDATA+18, GETDATA+19, GETDATA+23, GETDATA+27
, GETDATA+28
IBND GETDATA+2~
IBST1 GETDATA+1~
IBTO CANCEL+3~, RESET+3~
IBXX CANCEL+3~, CANCEL+7*, CANCEL+8, RESET+3~, RESET+7*, RESET+8
IO EXCEL+2, DEVICE+12
IOSL DEVICE+4~, DEVICE+9, DEVICE+10
IOST DEVICE+4~, DEVICE+9
J CANCEL+3~, RESET+3~
LCNT EXPORT+3*, EXCEL+3~, EXCEL+8*
MAXCNT DEVICE+4~, DEVICE+9*, DEVICE+10*
MED GETDATA+1~, GETDATA+5*, GETDATA+28, CANCEL+9*, CANCEL+12, RESET+9*, STATUS+5
MIEN GETDATA+1~
MREC GETDATA+2~
MTS GETDATA+1~, GETDATA+8*, GETDATA+28
MTSD GETDATA+1~, GETDATA+9*, GETDATA+28
NAME CANCEL+3~, CANCEL+9*, CANCEL+11, RESET+3~, RESET+9*, STATUS+4, EXCEL+3~, EXCEL+8*, EXCEL+9*, EXCEL+11
, EXCEL+13, EXCEL+14
NXT EXCEL+3~
OUT EXCEL+3~
PAT SORT+4~
PBIL GETDATA+2~, GETDATA+13*, GETDATA+15*, GETDATA+22*, GETDATA+25, GETDATA+28
PCE EXCEL+3~
PCOPAY CANCEL+16*, STATUS+10*, STATUS+11, RESETE!
PIBN GETDATA+3~, GETDATA+15*, GETDATA+18*, GETDATA+19, GETDATA+20, GETDATA+21, GETDATA+23, GETDATA+24, GETDATA+26
PID GETDATA+1~, GETDATA+7*, GETDATA+28
POP DEVICE+4~, DEVICE+7
PREA CANCEL+15*, STATUS+1~, STATUS+9*, STATUS+20*, STATUS+28*, RESETE!
PRIEN GETDATA+3~, GETDATA+13*, GETDATA+15*, GETDATA+22*, GETDATA+26, GETDATA+28
PSI STATUS+1~, STATUS+21*, STATUS+29*, RESETE!
PSOCOMM STATUS+1~, STATUS+20*, STATUS+21*, STATUS+28*, STATUS+29*, RESETE!
PSODA CANCEL+9*, CANCEL+14, CANCEL+15, CANCEL+16, RESET+9*, RESET+10, STATUS~, STATUS+8, STATUS+9, STATUS+10
, STATUS+12, STATUS+14, STATUS+16, STATUS+22, STATUS+24, STATUS+30, RESETE!
PSOIBQ STATUS+1~, STATUS+14*, STATUS+16
PSOINDPT STATUS+1~
>> PSOLFIL STATUS+12*
PSONEW STATUS+1~
PSONW STATUS+1~, STATUS+20*, STATUS+28*
PSOOLD STATUS+1~, STATUS+20*, STATUS+28*
>> PSOPAR CANCEL+10, STATUS+3
PSOREF RESETE!
PSORSN STATUS+19*, STATUS+27*, RESETE!
PSORXN CANCEL+15*, STATUS+9*, STATUS+11, RESETE!
PSOSUMM STATUS+1~, STATUS+2*
PTNM GETDATA+1~, GETDATA+7*, GETDATA+28
RC CANCEL+3~, CANCEL+8*, CANCEL+9, RESET+3~, RESET+8*, RESET+9
REC EXCEL+3~, EXCEL+14*, EXCEL+15
RFDT SORT+4~, SORT+15*, SORT+16
RFL SORT+4~, SORTRF+1*, GETDATA+11, GETDATA+12, GETDATA+28, CANCEL+9*, CANCEL+13, RESET+9*, RESET+10, STATUS~
, STATUS+6, EXCEL+4~, EXCEL+12*, EXCEL+13*, EXCEL+14
RIEN SORT+4~, SORT+9*, SORT+10, SORT+11, SORT+12, SORT+14, SORT+15, SORT+16, SORTRF+1, GETDATA~
, GETDATA+4, GETDATA+5, GETDATA+11, GETDATA+12, GETDATA+28, EXCEL+4~, EXCEL+10*, EXCEL+11*, EXCEL+13, EXCEL+14
RNB GETDATA+1~
RSX SORT+4~
RX SORT+8*, SORT+9, GETDATA+1~, GETDATA+4*, GETDATA+28, CANCEL+9*, CANCEL+13, RESET+9*, STATUS+6
RXS SORT+4~, SORT+6*, SORT+11
SC GETDATA+1~, GETDATA+8*, GETDATA+28
SCP GETDATA+1~, GETDATA+8*, GETDATA+28
TYPE DEVICE~, DEVICE+12
U SORT+5, SORT+6, SORT+9, SORT+14, SORT+16, GETDATA+7, GETDATA+8, GETDATA+10, GETDATA+28, CANCEL+9
RESET+9, EXCEL+5, EXCEL+6, EXHDR+5
VADM SORT+4~
VADM(1 GETDATA+7
VADM(2 GETDATA+7
VAEL SORT+4~
VAEL(3 GETDATA+8
VAEL(9 GETDATA+8
>> VALMBCK CANCEL+20*, RESET+13*, EXPORT+1*, EXPORT+9*
VALMY CANCEL+3~, CANCEL+6, RESET+3~, RESET+6
VALMY( CANCEL+7, RESET+7
X GETDATA+2~, GETDATA+10*, RESETE!
>> XQORNOD(0 CANCEL+5, RESET+5
XX EXCEL+3~
Y STATUS+18, STATUS+19, STATUS+26, STATUS+27, RESETE!
>> ZTQUEUED DEVICE+16
ZTREQ DEVICE+4~, DEVICE+16*
ZZ EXCEL+3~
ZZ1 EXCEL+3~
ZZ2 EXCEL+3~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All