RCDPARC ;ALB/TJB - CARC REPORT ON PAYER OR CARC CODE ;9/15/14 3:00pm
Source file <RCDPARC.m>
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 6 | SORT^RCDPARC1 GCARC^RCDPCRR $$NMORTIN^RCDPEAPP ($$ISSEL,$$ISTYPE,$$PAYRNG,$$RTYPE,$$SELPAY)^RCDPEU1 ($$CHECKDT,$$DATE,$$NOW,$$VAL,ASK,RNG)^RCDPRU ($$CHK,$$GPAYR,$$PAYTIN,PAYTINS)^RCDPRU2 |
| VA FileMan | 4 | ($$GET1,GETS)^DIQ ^DIR ^DIWP ^DIWW |
| Kernel | 3 | (,HOME)^%ZIS ^%ZTLOAD $$NOW^XLFDT |
| Registration | 1 | DIVISION^VAUTOMA |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry point for Report
|
|
| ENQ | ; Queue point for report.
|
|
| REPORT | ; Print out the report
; Set up Division Header Text and CARC Header Text |
|
| ARCQ | ; Clean-up and quit
|
|
| PRTREP(DATA,SUMM,SORT,CD,RA,RCSTOP) | ; Print report data out of the "REPORT" subarray
; Input: DATA - Compiled report data in ^TMP("RCDPARC_REPORT",$J) ; SUM - Compiled grand totals in ^TMP("RCDPARC_REPORT",$J,"~~SUM") ; SORT - Selected Sort Option ; CD - 'D' - Detail report, 'S' - Summary report ; RA - Always 0 for now to not display CARCS on report ; Output: RCSTOP - 1 if user quit out of the display, 0 otherwise |
|
| DETAIL(DATA,L1,L2,RCSL,DSTOP) | ; Print detail information for this entry
|
|
| HDR(CD,RA) | ; Report header
|
|
| HDRP(Z,X,Z1) | ; Print Header (Z=String, X=1 (line feed) X=0 (no LF), Z1 (page number right justified)
|
|
| NEWPG(RCPG,RCNEW,RCSL,CD,RA) | ; Check for new page needed, output header
; RCPG = Page number passwd by referece ; RCNEW = 1 to force new page ; RCSL = page length passed by reference ; Function returns 1 if user chooses to stop output |
|
| CARC | ;
|
|
| GETDATA(GCARC,GPAYER,GTIN,GSORT,GRARC,GSTART,GSTOP,GARRAY,GDIV) | ;
; Input: GCCARC - Range of CARC codes to include ; GPAYER - Range of payers to include ; GTIN - Range of TINs to include ; GSORT - Sort order ; GRARC - Flag to display RARC codes on the report (0 = No) ; GSTART - Start date ; GSTOP - End date ; GARRAY - Root of the array in which to store the output data ; GDIV - Range of Divisions to include ; Output: @GARRAY("BILLS",IEN,0)=A1^A2^A3^A4^A5^A6^A7 ; A1=Pointer to BILL/CLAIM file (#399) ; A2=Bill Number ; A3=Pointer to patient file (#2) ; A4=Payer Name from EOB, pointer to Insurance file (#36) ; A5=TIN from EOB ; A6=Total Charges ; A7=Paid amount |
| Name | Field # of Occurrence |
|---|---|
| ^%ZIS | EN+51 |
| HOME^%ZIS | EN+56 |
| ^%ZTLOAD | EN+54 |
| $$GET1^DIQ | DETAIL+10, DETAIL+12, GETDATA+26, GETDATA+28 |
| GETS^DIQ | GETDATA+50, GETDATA+60 |
| ^DIR | EN+9, EN+33, EN+38, EN+43, CARC+6 |
| ^DIWP | PRTREP+29, PRTREP+76, DETAIL+17 |
| ^DIWW | PRTREP+29, PRTREP+76, DETAIL+17 |
| SORT^RCDPARC1 | GETDATA+70 |
| GCARC^RCDPCRR | EN+13 |
| $$NMORTIN^RCDPEAPP | EN+19 |
| $$ISSEL^RCDPEU1 | GETDATA+40 |
| $$ISTYPE^RCDPEU1 | GETDATA+36 |
| $$PAYRNG^RCDPEU1 | EN+21 |
| $$RTYPE^RCDPEU1 | EN+17 |
| $$SELPAY^RCDPEU1 | EN+30 |
| $$CHECKDT^RCDPRU | EN+46 |
| $$DATE^RCDPRU | EN+42, EN+47, DETAIL+10, NEWPG+18 |
| $$NOW^RCDPRU | ENQ+1 |
| $$VAL^RCDPRU | CARC+8 |
| ASK^RCDPRU | EN+47, REPORT+20, NEWPG+8 |
| RNG^RCDPRU | GETDATA+22 |
| $$CHK^RCDPRU2 | GETDATA+54, GETDATA+64 |
| $$GPAYR^RCDPRU2 | GETDATA+30 |
| $$PAYTIN^RCDPRU2 | PRTREP+42, PRTREP+60 |
| PAYTINS^RCDPRU2 | PRTREP+38, PRTREP+56 |
| DIVISION^VAUTOMA | EN+5 |
| $$NOW^XLFDT | EN+42 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBM(361.1 - [#361.1] | GET1^DIQ, GETS^DIQ |
| ^DGCR(399 - [#399] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | GETDATA+44, GETDATA+45 |
| ^IBM(361.1 - [#361.1] | GETDATA+20, GETDATA+24, GETDATA+25, GETDATA+30, GETDATA+33, GETDATA+45, GETDATA+48, GETDATA+58 |
| ^TMP("RCDPARC_REPORT" | ENQ+3!, ENQ+5, REPORT+19 |
| ^TMP("RCDPEU1" | ARCQ+2! |
| ^UTILITY($J | PRTREP+29!, PRTREP+76!, DETAIL+17! |
| Name | Line Occurrences |
|---|---|
| $$HDR | NEWPG+10 |
| $$NEWPG | REPORT+14, PRTREP+14, PRTREP+26, PRTREP+28, PRTREP+30, PRTREP+32, PRTREP+36, PRTREP+44, PRTREP+46, PRTREP+48 , PRTREP+50, PRTREP+52, PRTREP+62, PRTREP+70, PRTREP+73, PRTREP+75, PRTREP+77, PRTREP+79, PRTREP+81, DETAIL+9 , DETAIL+14, DETAIL+18 |
| ARCQ | EN+6, EN+10, EN+13, EN+17, EN+19, EN+22, EN+25, EN+34, EN+39, EN+44 , EN+47, REPORT+19 |
| CARC | CARC+9 |
| DETAIL | PRTREP+49, PRTREP+78 |
| GETDATA | ENQ+5 |
| HDRP | NEWPG+10, NEWPG+11, NEWPG+12, NEWPG+17, NEWPG+18 |
| PRTREP | REPORT+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | EN+1~, EN+51* |
| AMTA | PRTREP+7~, PRTREP+24*, PRTREP+27, PRTREP+64*, PRTREP+65 |
| AMTB | PRTREP+7~, PRTREP+21*, PRTREP+24*, PRTREP+27, PRTREP+64*, PRTREP+65 |
| AMTP | PRTREP+7~, PRTREP+21*, PRTREP+24*, PRTREP+27, PRTREP+64*, PRTREP+65 |
| CARR | GETDATA+19~, GETDATA+22, GETDATA+54, GETDATA+64 |
| CD | PRTREP~, PRTREP+14, PRTREP+26, PRTREP+28, PRTREP+30, PRTREP+32, PRTREP+36, PRTREP+44, PRTREP+46, PRTREP+48 , PRTREP+50, PRTREP+52, PRTREP+62, PRTREP+70, PRTREP+73, PRTREP+75, PRTREP+77, PRTREP+79, PRTREP+81, DETAIL+9 , DETAIL+14, DETAIL+18, HDR~, HDR+2, NEWPG~, NEWPG+10 |
| CH | REPORT+8~*, REPORT+9* |
| CL | PRTREP+7~, PRTREP+21*, PRTREP+24*, PRTREP+25, PRTREP+64*, PRTREP+65 |
| CNT | GETDATA+19~, GETDATA+46*, GETDATA+55*, GETDATA+56, GETDATA+65*, GETDATA+66 |
| CRHDR | EN+1~, REPORT+4*, REPORT+5*, REPORT+7, REPORT+9, REPORT+11*, NEWPG+12 |
| CZ | PRTREP+7~, PRTREP+33*, PRTREP+35, PRTREP+67*, PRTREP+69 |
| DATA | PRTREP~, PRTREP+22, PRTREP+24, PRTREP+33, PRTREP+34, PRTREP+49, PRTREP+64, PRTREP+67, PRTREP+68, PRTREP+78 , DETAIL~, DETAIL+3, DETAIL+10 |
| DESC | PRTREP+7~, PRTREP+21*, PRTREP+24*, PRTREP+29 |
| DH | REPORT+8~*, REPORT+9* |
| DHDR | ARCQ+1! |
| DIR | EN+1~, EN+9!, EN+33!, EN+38!, EN+43!, CARC+1~, CARC+6! |
| DIR("?" | EN+37*, EN+41*, CARC+3*, CARC+4*, CARC+5* |
| DIR("A" | EN+8*, EN+32*, EN+38*, EN+43*, CARC+2*, CARC+9*, CARC+10! |
| DIR("B" | EN+9*, EN+33*, EN+38*, EN+42*, EN+43* |
| DIR(0 | EN+8*, EN+32*, EN+38*, EN+43*, CARC+2* |
| DIVHDR | EN+1~, REPORT+2*, REPORT+3*, REPORT+7, REPORT+9, REPORT+10*, NEWPG+12 |
| DIWL | PRTREP+7~, PRTREP+29*, PRTREP+76*, DETAIL+17* |
| DIWR | PRTREP+7~, PRTREP+29*, PRTREP+76*, DETAIL+17* |
| DLN | PRTREP+7~, PRTREP+9*, PRTREP+19 |
| DOS | DETAIL+1~, DETAIL+10*, DETAIL+13 |
| DSTOP | DETAIL~, DETAIL+3, DETAIL+5, DETAIL+9*, DETAIL+14*, DETAIL+18* |
| DT | EN+38, EN+43 |
| DTOK | EN+1~, EN+46*, EN+47 |
| DTOUT | EN+1~, EN+10, EN+34, EN+39, EN+44, CARC+7 |
| DUOUT | EN+1~, EN+10, EN+34, EN+39, EN+44, CARC+7 |
| DX | DETAIL+1~, DETAIL+10*, DETAIL+12, DETAIL+13 |
| DX0 | PRTREP+7~, PRTREP+11*, PRTREP+12, PRTREP+13, PRTREP+17, PRTREP+18, PRTREP+24*, PRTREP+64* |
| DY | DETAIL+1~, DETAIL+10*, DETAIL+13, DETAIL+17 |
| DZ | PRTREP+7~, PRTREP+34*, PRTREP+47, PRTREP+68*, PRTREP+71, PRTREP+72, PRTREP+74, PRTREP+76 |
| DZN | GETDATA+19~, GETDATA+44*, GETDATA+45 |
| EX | EN+2~ |
| GARRAY | GETDATA~, GETDATA+45, GETDATA+56, GETDATA+66, GETDATA+68, GETDATA+70 |
| GCARC | GETDATA~, GETDATA+22 |
| GDIV | GETDATA~, GETDATA+28 |
| GDIV( | GETDATA+28 |
| GLINE | GETDATA+19~ |
| GPAYER | GETDATA~ |
| GRARC | GETDATA~ |
| GSORT | GETDATA~, GETDATA+70 |
| GSTART | GETDATA~, GETDATA+20 |
| GSTOP | GETDATA~, GETDATA+24 |
| GTIN | GETDATA~ |
| HDR | DETAIL+1~, DETAIL+2*, DETAIL+3*, DETAIL+5 |
| I | REPORT+3~* |
| IEN | PRTREP+21*, DETAIL+1~, DETAIL+3*, DETAIL+10, GETDATA+19~, GETDATA+25*, GETDATA+26, GETDATA+28, GETDATA+30, GETDATA+33 , GETDATA+36, GETDATA+40, GETDATA+45, GETDATA+48, GETDATA+50, GETDATA+56, GETDATA+58, GETDATA+60, GETDATA+66, GETDATA+68 |
| IO | EN+57 |
| IO("Q" | EN+52, EN+56! |
| IOF | NEWPG+9 |
| IOM | ENQ+1, REPORT+7, REPORT+8, HDRP+2 |
| IOSL | PRTREP+14, PRTREP+26, PRTREP+28, PRTREP+30, PRTREP+32, PRTREP+36, PRTREP+44, PRTREP+46, PRTREP+48, PRTREP+50 , PRTREP+52, PRTREP+62, PRTREP+70, PRTREP+73, PRTREP+75, PRTREP+77, PRTREP+79, PRTREP+81, DETAIL+9, DETAIL+14 , DETAIL+18, NEWPG+7 |
| IX | PRTREP+7~, PRTREP+21*, PRTREP+22*, PRTREP+24, PRTREP+25, PRTREP+33, PRTREP+34, PRTREP+49, PRTREP+56, PRTREP+64 , PRTREP+67, PRTREP+68, PRTREP+78, GETDATA+50~*, GETDATA+52*, GETDATA+54, GETDATA+56, GETDATA+60~*, GETDATA+62*, GETDATA+64 , GETDATA+66, GETDATA+68* |
| IY | PRTREP+7~, PRTREP+22*, PRTREP+67*, PRTREP+68, PRTREP+72, PRTREP+78 |
| L1 | DETAIL~, DETAIL+3, DETAIL+10 |
| L2 | DETAIL~, DETAIL+3, DETAIL+10 |
| LN | PRTREP+7~, PRTREP+9*, PRTREP+31, PRTREP+51, PRTREP+66, PRTREP+80 |
| LN2 | PRTREP+7~, PRTREP+9*, PRTREP+35, PRTREP+69 |
| OKAY | CARC+1~, CARC+8*, CARC+9 |
| PAT | DETAIL+1~, DETAIL+12*, DETAIL+13 |
| PAY | PRTREP+7~, PRTREP+33*, PRTREP+34, PRTREP+38, PRTREP+49 |
| PCT | PRTREP+7~, PRTREP+11*, PRTREP+12*, PRTREP+13*, PRTREP+17, PRTREP+24*, PRTREP+25, PRTREP+34*, PRTREP+47, PRTREP+64* , PRTREP+65, PRTREP+71*, PRTREP+72, DETAIL+1~, DETAIL+10*, DETAIL+13 |
| PNARR | GETDATA+19~ |
| POP | EN+1~, EN+51 |
| PTARR | GETDATA+19~ |
| PTR | GETDATA+19~, GETDATA+30*, GETDATA+44, GETDATA+45 |
| PYRTINS | PRTREP+7~, PRTREP+38, PRTREP+56 |
| PYRTINS( | PRTREP+41, PRTREP+42, PRTREP+59, PRTREP+60 |
| PYZ | PRTREP+7~, PRTREP+41*, PRTREP+42, PRTREP+59*, PRTREP+60 |
| R1 | REPORT+8~*, REPORT+9*, REPORT+11 |
| R2 | REPORT+8~*, REPORT+9*, REPORT+10, REPORT+11 |
| RA | PRTREP~, PRTREP+14, PRTREP+26, PRTREP+28, PRTREP+30, PRTREP+32, PRTREP+36, PRTREP+44, PRTREP+46, PRTREP+48 , PRTREP+50, PRTREP+52, PRTREP+62, PRTREP+70, PRTREP+73, PRTREP+75, PRTREP+77, PRTREP+79, PRTREP+81, DETAIL+9 , DETAIL+14, DETAIL+18, HDR~, HDR+1, NEWPG~, NEWPG+10 |
| RCDEN | GETDATA+19~, GETDATA+28* |
| RCDET | EN+1~, EN+11*, REPORT+14, REPORT+19, PRTREP+49, PRTREP+78 |
| RCDIV | EN+2~, GETDATA+28* |
| RCDT1 | EN+1~, EN+40*, EN+43, EN+46, EN+47, ENQ+5, NEWPG+18 |
| RCDT2 | EN+1~, EN+45*, EN+46, EN+47, ENQ+5, NEWPG+18 |
| RCERR | GETDATA+19~ |
| RCEXCEL | EN+49*, REPORT+13, ARCQ+1! |
| RCGX | GETDATA+50~, GETDATA+60~ |
| RCGX("361.111" | GETDATA+52, GETDATA+54, GETDATA+56 |
| RCGX("361.11511" | GETDATA+62, GETDATA+64, GETDATA+66 |
| RCGX("361.1154" | GETDATA+68 |
| RCHR | EN+2~, ENQ+1*, NEWPG+19 |
| RCINC | EN+2~ |
| RCJOB | EN+2~ |
| RCLAIM | EN+2~, EN+17*, EN+26, NEWPG+16, GETDATA+35, GETDATA+36 |
| RCLIST | ARCQ+1! |
| RCLPAY | ARCQ+1! |
| RCNEW | NEWPG~, NEWPG+7 |
| RCNOW | EN+2~, ENQ+1*, NEWPG+11 |
| RCNP | EN+2~ |
| RCNP1 | EN+2~ |
| RCODE | EN+2~, EN+13, ARCQ+1!, CARC+8*, CARC+11 |
| RCODE("CARC" | ENQ+5, REPORT+4, REPORT+5 |
| RCPAR | EN+2~, EN+30 |
| RCPAR("DICA" | EN+29* |
| RCPAR("FILE" | EN+28* |
| RCPAR("SELC" | EN+21*, EN+22, EN+23, EN+25 |
| RCPAR("SRCH" | EN+27* |
| RCPAR("TYPE" | EN+26* |
| RCPAY | EN+2~, EN+23*, ENQ+5, ARCQ+1!, NEWPG+14, GETDATA+35, GETDATA+39 |
| RCPG | EN+2~, ENQ+1*, REPORT+14, PRTREP+14, PRTREP+26, PRTREP+28, PRTREP+30, PRTREP+32, PRTREP+36, PRTREP+44 , PRTREP+46, PRTREP+48, PRTREP+50, PRTREP+52, PRTREP+62, PRTREP+70, PRTREP+73, PRTREP+75, PRTREP+77, PRTREP+79 , PRTREP+81, DETAIL+9, DETAIL+14, DETAIL+18, NEWPG~, NEWPG+7, NEWPG+8, NEWPG+9*, NEWPG+10 |
| RCRANGE | EN+2~ |
| RCRARC | EN+2~, EN+3*, EN+15*, ENQ+5, REPORT+14, REPORT+19, ARCQ+1!, DETAIL+17 |
| RCSET | GETDATA+19~, GETDATA+31*, GETDATA+33*, GETDATA+35, GETDATA+36*, GETDATA+40*, GETDATA+42 |
| RCSL | REPORT+14, PRTREP+7~, PRTREP+9*, PRTREP+14, PRTREP+19*, PRTREP+25*, PRTREP+26, PRTREP+27*, PRTREP+28, PRTREP+29* , PRTREP+30, PRTREP+31*, PRTREP+32, PRTREP+35*, PRTREP+36, PRTREP+40*, PRTREP+43*, PRTREP+44, PRTREP+46, PRTREP+47* , PRTREP+48, PRTREP+49, PRTREP+50, PRTREP+51*, PRTREP+52, PRTREP+58*, PRTREP+61*, PRTREP+62, PRTREP+65*, PRTREP+66* , PRTREP+69*, PRTREP+70, PRTREP+72*, PRTREP+73, PRTREP+74*, PRTREP+75, PRTREP+76*, PRTREP+77, PRTREP+78, PRTREP+79 , PRTREP+80*, PRTREP+81, DETAIL~, DETAIL+6*, DETAIL+7*, DETAIL+8*, DETAIL+9, DETAIL+13*, DETAIL+14, DETAIL+17* , DETAIL+18, DETAIL+19*, NEWPG~, NEWPG+19* |
| RCSORT | EN+35*, ENQ+5, REPORT+19, ARCQ+1!, NEWPG+11 |
| RCSTOP | EN+2~, EN+3*, EN+13, EN+47, REPORT+14*, REPORT+19, REPORT+20, PRTREP~, PRTREP+14*, PRTREP+22 , PRTREP+23, PRTREP+26*, PRTREP+28*, PRTREP+30*, PRTREP+32*, PRTREP+33, PRTREP+36*, PRTREP+41, PRTREP+44*, PRTREP+46* , PRTREP+48*, PRTREP+49, PRTREP+50*, PRTREP+51, PRTREP+52*, PRTREP+53, PRTREP+54, PRTREP+59, PRTREP+62*, PRTREP+67 , PRTREP+70*, PRTREP+73*, PRTREP+75*, PRTREP+77*, PRTREP+78, PRTREP+79*, PRTREP+80, PRTREP+81*, CARC+7* |
| RCTIN | ENQ+5, ARCQ+1! |
| RCTLIST | ARCQ+1! |
| RCWHICH | EN+2~, EN+19*, EN+21, EN+27, EN+29, NEWPG+14 |
| RM | GETDATA+19~, GETDATA+26* |
| SDT | GETDATA+19~, GETDATA+20*, GETDATA+24*, GETDATA+25 |
| SORT | PRTREP~, PRTREP+23, PRTREP+54 |
| SSN | DETAIL+1~, DETAIL+12*, DETAIL+13 |
| SUMM | PRTREP~, PRTREP+11 |
| TIN | PRTREP+8~ |
| TIX | PRTREP+8~, PRTREP+22* |
| TIY | PRTREP+8~ |
| U | PRTREP+12, PRTREP+13, PRTREP+17, PRTREP+18, PRTREP+24, PRTREP+34, PRTREP+47, PRTREP+64, PRTREP+71, PRTREP+72 , PRTREP+74, PRTREP+76, DETAIL+10, DETAIL+12, DETAIL+13, DETAIL+17, GETDATA+30, GETDATA+45, GETDATA+56, GETDATA+66 , GETDATA+68 |
| VAL | REPORT+8~*, REPORT+9, REPORT+10, REPORT+11 |
| VAUTD | EN+2~, EN+6, ENQ+5, REPORT+2 |
| VAUTD( | REPORT+3 |
| X | EN+1~, PRTREP+8~, PRTREP+29*, PRTREP+76*, DETAIL+17*, HDRP~, HDRP+1, CARC+8 |
| XX | EN+25, EN+30*, PRTREP+8~, NEWPG+5~, NEWPG+14*, NEWPG+15*, NEWPG+16*, NEWPG+17 |
| Y | EN+1~, EN+10, EN+11, EN+34, EN+35, EN+39, EN+40, EN+44, EN+45, CARC+7 |
| YY | PRTREP+8~ |
| Z | HDRP~, HDRP+2 |
| Z1 | HDRP~, HDRP+2 |
| ZND | GETDATA+19~, GETDATA+30*, GETDATA+45 |
| ZPAY | GETDATA+19~, GETDATA+30* |
| ZSTOP | NEWPG+5~, NEWPG+6*, NEWPG+8, NEWPG+20 |
| ZTDESC | EN+1~, EN+53* |
| ZTRTN | EN+1~, EN+53* |
| ZTSAVE | EN+1~ |
| ZTSAVE("*" | EN+53* |
| ZTSK | EN+1~, EN+55, EN+56! |
| ZTSTOP | EN+1~ |
| ZX | GETDATA+19~, GETDATA+68* |
| ZZ | PRTREP+8~, HDR+1~*, HDR+2 |