©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ZISHMSMD ; IHS/DSM/MFD - HOST COMMANDS FOR DOS (MSMD); [ 04/02/2003 8:29 AM ]
Source file <ZISHMSMD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DF(X) | ; ----- Directory format.
|
|
| JW | ; ----- Call DOS $ZOS.
|
|
| LIST(ZISH1,ZISH2,ZISH3) | ; ----- Create local array holding filename(s).
; S Y=$$LIST^%ZISH("\dir\","fl",".return array") ; "fl*", ; .array, |
|
| FL(X) | ; ----- Check for filename length.
|
|
| FROM(ZISH1,ZISH2,ZISH3,ZISH4,ZISH5) | ; ----- Get DOS file(s) from.
; S Y=$$FROM^%ZISH("\dir\","fl","mach","qlfr","\dir\") ; "fl*" ; .array |
|
| STATUS() | ; -----EndOfFile flag.
|
|
| DEL(ZISH1,ZISH2) | ; ----- Delete file(s).
; S Y=$$DEL^%ZISH("\directory\","filename") ; ,.array) |
|
| OPEN(ZISH1,ZISH2,ZISH3) | ; ----- Open DOS file.
; S Y=$$OPEN^%ZISH("\directory\","filename","R") |
|
| MV(ZISH1,ZISH2,ZISH3,ZISH4) | ; ----- Rename a file(s).
; S Y=$$MV^%ZISH("\dir\","fl","\dir\","fl") |
|
| SEND(ZISH1,ZISH2,ZISH3) | ; ----- Send DOS file(s). (MV to export directory.)
; S Y=$$SEND^%ZISH("\dir\","fl","mach") ; "fl*" ; .array |
|
| PWD(ZISH1) | ; ----- Print working directory.
; S Y=$$PWD^%ZISH(.return array) |
| Name | Line Occurrences |
|---|---|
| $$LIST | SEND+7 |
| $$MV | SEND+8 |
| DF | OPEN+21, DEL+8, LIST+11, MV+6, MV+7 |
| FL | OPEN+27 |
| JW | DEL+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | OPEN+18~ |
| %ZIS("IOPAR" | OPEN+32* |
| IO | OPEN+37 |
| IO(0 | OPEN+40 |
| IO(1 | OPEN+32 |
| >> IOP | OPEN+32* |
| POP | OPEN+18~, OPEN+32, OPEN+33 |
| U | LIST+22, LIST+24 |
| X | LIST+5~, PWD+10~, DF~, DF+1, DF+2*, DF+3*, FL~, FL+2 |
| Y | SEND+4~, SEND+7*, SEND+8*, SEND+9, LIST+5~, PWD+10~ |
| ZISH | SEND+4~, SEND+8* |
| ZISH1 | OPEN~, OPEN+21, OPEN+29, DEL~, DEL+8, DEL+18, DEL+19, FROM~, SEND~, SEND+7 , SEND+8, LIST~, LIST+11, LIST+20, MV~, MV+6, MV+13, PWD~ |
| ZISH1(1 | PWD+11*, PWD+13 |
| ZISH2 | OPEN~, OPEN+27, OPEN+29, DEL~, DEL+11, FROM~, SEND~, SEND+5, SEND+7, LIST~ , LIST+15, MV~, MV+13*, MV+16 |
| ZISH2( | DEL+15, DEL+17, SEND+8, LIST+18 |
| ZISH2(0 | OPEN+24, DEL+11, LIST+15, MV+10 |
| ZISH2(1 | DEL+11*, LIST+15* |
| ZISH3 | OPEN~, OPEN+32, OPEN+36, FROM~, SEND~, LIST~, MV~, MV+7, MV+14 |
| ZISH3( | LIST+22*, LIST+24* |
| ZISH4 | FROM~, MV~, MV+14*, MV+16 |
| ZISH4(0 | MV+10 |
| ZISH5 | FROM~ |
| ZISHC | DEL+5~, DEL+19*, LIST+5~, MV+3~, JW+1 |
| ZISHCNT | LIST+5~, LIST+8*, LIST+22*, LIST+24* |
| ZISHDA | DEL+5~, DEL+15*, DEL+17*, LIST+5~, LIST+18* |
| ZISHDF | OPEN+18~, OPEN+29*, OPEN+32, DEL+5~, DEL+18*, DEL+19, LIST+5~, LIST+20*, LIST+22 |
| ZISHF | DEL+5~, DEL+15*, DEL+17*, DEL+18, DEL+19, LIST+5~, LIST+18*, LIST+19*, LIST+20 |
| ZISHIOP | OPEN+18~, OPEN+32* |
| ZISHNUM | DEL+5~, DEL+20*, JW+1 |
| ZISHP1 | FL+1~, FL+2* |
| ZISHP2 | FL+1~, FL+2* |
| ZISHPARM | SEND+4~ |
| ZISHQ | OPEN+18~, OPEN+37*, OPEN+40, OPEN+41, DEL+5~, DEL+15*, DEL+16 |
| ZISHX | OPEN+24*, DEL+5~, DEL+15*, DEL+16, DEL+23, LIST+5~, LIST+22*, LIST+24*, LIST+27, MV+3~ , MV+10*, MV+16*, MV+18, JW+1* |
| >> ZTQUEUED | OPEN+40 |